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.
59 Commits
2 Branches
134 MiB
 
 
 
 
 
 
Tree: 9f4b16fe97
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '9f4b16fe97'
${ noResults }
SimulationCore2/CSharp/Equipments/ControlPanels/CChokeManifoldVariables.i90

38 lines
1.1 KiB
Raw Blame History 

  1. # 1 "/mnt/c/Projects/VSIM/SimulationCore2/CSharp/Equipments/ControlPanels/CChokeManifoldVariables.f90"

  2. module CChokeManifoldVariables

  3.     implicit none    

  4.     public    

  5.     Type :: ChokeManifoldType

  6. ! Input vars

  7.         logical :: ChokeManifoldValve1

  8.         logical :: ChokeManifoldValve2

  9.         real(8) :: LeftManualChoke

  10.         logical :: ChokeManifoldValve4

  11.         logical :: ChokeManifoldValve5

  12.         real(8) :: RightManualChoke

  13.         logical :: ChokeManifoldValve7

  14.         logical :: ChokeManifoldValve8

  15.         logical :: ChokeManifoldValve9

  16.         logical :: ChokeManifoldValve10

  17.         logical :: ChokeManifoldValve11

  18.         logical :: ChokeManifoldValve12

  19.         logical :: ChokeManifoldValve13

  20. 

  21. ! Output vars

  22.         integer :: HydraulicChock1

  23.         integer :: HydraulicChock2

  24. 

  25. ! Control vars

  26.         logical :: HyChock1OnProblem = .false.

  27.         logical :: HyChock2OnProblem = .false.

  28.         logical :: LeftManChokeOnProblem = .false.

  29.         logical :: RightManChokeOnProblem = .false.

  30.     End Type ChokeManifoldType

  31.     

  32.     

  33.     

  34.     contains    

  35. 

  36.     

  37. endmodule CChokeManifoldVariables