Simulation Core
Du kannst nicht mehr als 25 Themen auswählen Themen müssen entweder mit einem Buchstaben oder einer Ziffer beginnen. Sie können Bindestriche („-“) enthalten und bis zu 35 Zeichen lang sein.

CChokeProblemsVariables.i90 1.1 KiB

vor 1 Jahr
1234567891011121314151617181920212223242526272829303132
  1. # 1 "/mnt/c/Projects/VSIM/SimulationCore2/CSharp/Problems/CChokeProblemsVariables.f90"
  2. module CChokeProblemsVariables
  3. use CProblemDifinition
  4. implicit none
  5. public
  6. ! Input vars
  7. type:: ChokeProblemsType
  8. type(CProblem) :: HydraulicChoke1Plugged
  9. type(CProblem) :: HydraulicChoke1Fail
  10. type(CProblem) :: HydraulicChoke1Washout
  11. type(CProblem) :: HydraulicChoke2Plugged
  12. type(CProblem) :: HydraulicChoke2Fail
  13. type(CProblem) :: HydraulicChoke2Washout
  14. type(CProblem) :: ManualChoke1Plugged
  15. type(CProblem) :: ManualChoke1Fail
  16. type(CProblem) :: ManualChoke1Washout
  17. type(CProblem) :: ManualChoke2Plugged
  18. type(CProblem) :: ManualChoke2Fail
  19. type(CProblem) :: ManualChoke2Washout
  20. type(CProblem) :: ChokePanelAirFail
  21. integer :: ManualChoke1PluggedPercent
  22. integer :: HydraulicChoke2PluggedPercent
  23. integer :: HydraulicChoke1PluggedPercent
  24. integer :: ManualChoke2PluggedPercent
  25. end type ChokeProblemsType
  26. contains
  27. end module CChokeProblemsVariables