$ private
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
class(ConcreteComposite), | public, | pointer | :: | composite | => | null() |
procedure, public :: add_child | |
procedure(i_AddChildComponent), public, deferred :: add_child_component | |
procedure(i_Run), public, deferred :: finalize | |
generic, public :: get_child => get_child_by_name, get_child_by_index | |
procedure, public :: get_child_by_index | |
procedure, public :: get_child_by_name | |
procedure(i_GetComponent), public, deferred :: get_component | |
procedure, public :: get_composite | |
procedure(i_GetState), public, deferred :: get_internal_state | |
procedure, public :: get_num_children | |
procedure, public :: get_parent | |
procedure(i_Run), public, deferred :: initialize | |
procedure(i_Run), public, deferred :: run | |
procedure(i_RunChild), public, deferred :: run_child | |
procedure(i_SetComponent), public, deferred :: set_component | |
procedure, public :: set_composite |