Simulation Core
No puede seleccionar más de 25 temas Los temas deben comenzar con una letra o número, pueden incluir guiones ('-') y pueden tener hasta 35 caracteres de largo.
 
 
 
 
 
 

25 líneas
841 B

  1. # 1 "/mnt/c/Projects/VSIM/SimulationCore2/CSharp/Equipments/ControlPanels/CChokeControlPanelVariables.f90"
  2. module CChokeControlPanelVariables
  3. implicit none
  4. type, public :: ChokeControlPanelType
  5. ! Input vars
  6. integer :: ChokePanelPumpSelectorSwitch
  7. logical :: ChokePanelStrokeResetSwitch
  8. logical :: ChokeSelectorSwitch
  9. real(8) :: ChokeRateControlKnob
  10. real(8) :: ChokeControlLever
  11. logical :: ChokePanelRigAirSwitch
  12. ! logical :: EnableAutoChoke
  13. ! Output vars
  14. real(8) :: StandPipePressure
  15. real(8) :: CasingPressure
  16. real(8) :: ChokePosition
  17. real(8) :: ChokePanelSPMCounter
  18. real(8) :: ChokePanelTotalStrokeCounter
  19. integer :: Choke1LED
  20. integer :: Choke2LED
  21. End Type ChokeControlPanelType
  22. end module CChokeControlPanelVariables