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

35 行
641 B

  1. module COtherProblemsVariables
  2. use CProblemDifinition
  3. implicit none
  4. public
  5. ! Input vars
  6. TYPE:: OtherProblemsType
  7. type(CProblem) :: RigAlarm
  8. type(CProblem) :: RigWaterSupply
  9. type(CProblem) :: RigAir
  10. type(CProblem) :: Gen1
  11. type(CProblem) :: Gen2
  12. type(CProblem) :: Gen3
  13. type(CProblem) :: Gen4
  14. type(CProblem) :: Scr1
  15. type(CProblem) :: Scr2
  16. type(CProblem) :: Scr3
  17. type(CProblem) :: Scr4
  18. end type OtherProblemsType
  19. contains
  20. end module COtherProblemsVariables