mahmood19227
/
SimulationCore2
1
0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
Simulation Core
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
42 Commits
2 Branches
134 MiB
 
 
 
 
 
 
Branch: najafi
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'najafi'
${ noResults }
SimulationCore2/CSharp/Problems/CChokeProblemsVariables.f90

30 lines
1.0 KiB
Raw Permalink Blame History 

  1. module CChokeProblemsVariables

  2.     use CProblemDifinition

  3.     

  4. 	implicit none    

  5. 	public 

  6.     

  7.     ! Input vars

  8.     type:: ChokeProblemsType

  9.         type(CProblem) :: HydraulicChoke1Plugged

  10.         type(CProblem) :: HydraulicChoke1Fail

  11.         type(CProblem) :: HydraulicChoke1Washout

  12.         integer :: HydraulicChoke1PluggedPercent

  13.         type(CProblem) :: HydraulicChoke2Plugged

  14.         type(CProblem) :: HydraulicChoke2Fail

  15.         type(CProblem) :: HydraulicChoke2Washout

  16.         integer :: HydraulicChoke2PluggedPercent

  17.         type(CProblem) :: ManualChoke1Plugged

  18.         type(CProblem) :: ManualChoke1Fail

  19.         type(CProblem) :: ManualChoke1Washout

  20.         integer :: ManualChoke1PluggedPercent

  21.         type(CProblem) :: ManualChoke2Plugged

  22.         type(CProblem) :: ManualChoke2Fail

  23.         type(CProblem) :: ManualChoke2Washout

  24.         integer :: ManualChoke2PluggedPercent

  25.         type(CProblem) :: ChokePanelAirFail

  26.     end type ChokeProblemsType

  27.     

  28.     contains

  29. 

  30. end module CChokeProblemsVariables