Ви не можете вибрати більше 25 тем
Теми мають розпочинатися з літери або цифри, можуть містити дефіси (-) і не повинні перевищувати 35 символів.
|
- module CChokeProblemsVariables
- use CProblemDifinition
-
- implicit none
- public
-
- ! Input vars
- type:: ChokeProblemsType
- type(CProblem) :: HydraulicChoke1Plugged
- type(CProblem) :: HydraulicChoke1Fail
- type(CProblem) :: HydraulicChoke1Washout
- type(CProblem) :: HydraulicChoke2Plugged
- type(CProblem) :: HydraulicChoke2Fail
- type(CProblem) :: HydraulicChoke2Washout
- type(CProblem) :: ManualChoke1Plugged
- type(CProblem) :: ManualChoke1Fail
- type(CProblem) :: ManualChoke1Washout
- type(CProblem) :: ManualChoke2Plugged
- type(CProblem) :: ManualChoke2Fail
- type(CProblem) :: ManualChoke2Washout
- type(CProblem) :: ChokePanelAirFail
-
- integer :: ManualChoke1PluggedPercent
- integer :: HydraulicChoke2PluggedPercent
- integer :: HydraulicChoke1PluggedPercent
- integer :: ManualChoke2PluggedPercent
- end type ChokeProblemsType
-
- contains
-
- end module CChokeProblemsVariables
|