| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | NodeNameIn | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | NodeNameOut | = | ' ' | ||
| integer, | public | :: | NodeNumIn | = | 0 | ||
| integer, | public | :: | NodeNumOut | = | 0 |
TYPE ComponentData
CHARACTER(len=MaxNameLength) :: Name = ' ' ! Name of the component
CHARACTER(len=MaxNameLength) :: NodeNameIn = ' ' ! Name of Node In
CHARACTER(len=MaxNameLength) :: NodeNameOut = ' ' ! Name of Node Out
INTEGER :: NodeNumIn = 0 ! Inlet node number
INTEGER :: NodeNumOut = 0 ! Outlet node number
END TYPE ComponentData