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