module CStandPipeManifoldVariables implicit none public Type::StandPipeManifoldType ! Input vars logical :: StandPipeManifoldValve1 logical :: StandPipeManifoldValve2 logical :: StandPipeManifoldValve3 logical :: StandPipeManifoldValve4 logical :: StandPipeManifoldValve5 logical :: StandPipeManifoldValve6 logical :: StandPipeManifoldValve7 logical :: StandPipeManifoldValve8 logical :: StandPipeManifoldValve9 logical :: StandPipeManifoldValve10 logical :: StandPipeManifoldValve11 logical :: StandPipeManifoldValve12 logical :: StandPipeManifoldValve13 logical :: StandPipeManifoldValve14 logical :: StandPipeManifoldValve15 ! Output vars real(8) :: StandPipeGauge1 real(8) :: StandPipeGauge2 End type StandPipeManifoldType type(StandPipeManifoldType)::StandPipeManifold end module CStandPipeManifoldVariables