Simulation Core
Nevar pievienot vairāk kā 25 tēmas Tēmai ir jāsākas ar burtu vai ciparu, tā var saturēt domu zīmes ('-') un var būt līdz 35 simboliem gara.
 
 
 
 
 
 

27 rindas
793 B

  1. # 1 "/home/admin/SimulationCore2/CSharp/BasicInputs/Geology/CReservoirVariables.f90"
  2. module CReservoirVariables
  3. implicit none
  4. public
  5. !constants
  6. ! integer :: Gas_FluidType = 0
  7. ! integer :: Oil_FluidType = 1
  8. ! integer :: Water_FluidType = 2
  9. Type :: ReservoirType
  10. ! variables
  11. integer :: FormationNo
  12. real(8) :: FormationTop
  13. ! real(8) :: PressureGradient
  14. real(8) :: FormationPermeability
  15. ! real(8) :: GeothermalGradient
  16. ! integer :: FluidType
  17. ! real(8) :: FluidGradient
  18. ! real(8) :: FluidViscosity
  19. logical :: InactiveInflux
  20. logical :: IsAutoMigrationRateSelected
  21. real(8) :: AutoMigrationRate
  22. logical :: MakeKickSinglePacket
  23. End type ReservoirType
  24. Type(ReservoirType)::Reservoir
  25. end module CReservoirVariables