Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
logical, | public | :: | status | = | .false. | ||
integer, | public | :: | size | ||||
type(input_node), | public, | pointer | :: | root |
type input_list logical :: status=.false. integer :: size type(input_node),pointer :: root end type input_list