Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(PlantNode_), | public, | allocatable | :: | NodeSystem(:) | |||
integer(kind=int32), | public | :: | num_of_node |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(PlantRoot_), | public, | allocatable | :: | RootSystem(:) | |||
integer(kind=int32), | public | :: | num_of_root |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(Leaf_), | public, | allocatable | :: | LeafList(:) | |||
type(Peti_), | public, | allocatable | :: | PetiList(:) | |||
type(Flower_), | public, | allocatable | :: | FlowerList(:) | |||
type(Stem_), | public, | allocatable | :: | StemList(:) | |||
type(PlantRoot_), | public, | allocatable | :: | RootList(:) |
procedure, public :: Init => InitLsystem |