Simulation Core
25'ten fazla konu seçemezsiniz Konular bir harf veya rakamla başlamalı, kısa çizgiler ('-') içerebilir ve en fazla 35 karakter uzunluğunda olabilir.

CPumpProblemsVariables.f90 513 B

1 yıl önce
12345678910111213141516171819
  1. module CPumpProblemsVariables
  2. use CProblemDifinition
  3. implicit none
  4. public
  5. ! Input vars
  6. type :: PumpProblemsType
  7. type(CProblem) :: Pump1PowerFail
  8. type(CProblem) :: Pump1BlowPopOffValve
  9. type(CProblem) :: Pump2PowerFail
  10. type(CProblem) :: Pump2BlowPopOffValve
  11. type(CProblem) :: CementPumpPowerFail
  12. type(CProblem) :: CementPumpBlowPopOffValve
  13. end type PumpProblemsType
  14. contains
  15. end module CPumpProblemsVariables