module CReservoirVariables implicit none public !constants ! integer :: Gas_FluidType = 0 ! integer :: Oil_FluidType = 1 ! integer :: Water_FluidType = 2 Type :: ReservoirType ! variables integer :: FormationNo real(8) :: FormationTop ! real(8) :: PressureGradient real(8) :: FormationPermeability ! real(8) :: GeothermalGradient ! integer :: FluidType ! real(8) :: FluidGradient ! real(8) :: FluidViscosity logical :: InactiveInflux logical :: IsAutoMigrationRateSelected real(8) :: AutoMigrationRate logical :: MakeKickSinglePacket End type ReservoirType Type(ReservoirType)::Reservoir end module CReservoirVariables