mahmood19227
/
SimulationCore2
1
0
포크 0
코드 이슈 0 풀 리퀘스트 0 릴리즈 0 위키 활동
Simulation Core
25개 이상의 토픽을 선택하실 수 없습니다. Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
42 커밋
2 브랜치
134 MiB
 
 
 
 
 
 
브렌치: najafi
브랜치 태그
${ item.name }
${ searchTerm } 브랜치 생성
from 'najafi'
${ noResults }
SimulationCore2/CSharp/Problems/CChokeProblemsVariables.f90

30 lines
1.0 KiB
Raw 고유링크 Blame 히스토리 

  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