Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | SurfFirst | = | 0 | ||
integer, | public | :: | NumOfSurfs | = | 0 | ||
integer, | public | :: | MundtZoneIndex | = | 0 |
TYPE DefineZoneData
INTEGER :: SurfFirst =0 ! index for first surface of the zone
INTEGER :: NumOfSurfs =0 ! number of surfaces in the zone
INTEGER :: MundtZoneIndex =0 ! index for zones using Mundt model
END TYPE DefineZoneData