| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=3), | public | :: | name | = | '' | ||
| character(len=3), | public, | dimension(2) | :: | lr | |||
| integer, | public, | dimension(2) | :: | lr_idx |
type :: node character(len=3) :: name = '' character(len=3),dimension(2) :: lr integer,dimension(2) :: lr_idx ! the indices in the nodes array of the l,r nodes end type node