Simulation Core
選択できるのは25トピックまでです。 トピックは、先頭が英数字で、英数字とダッシュ('-')を使用した35文字以内のものにしてください。

CPumpProblemsVariables.f90 513 B

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