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.
|
- # 1 "/home/admin/SimulationCore2/CSharp/OperationScenarios/Unity/CUnityOutputs.f90"
- module CUnityOutputs
- implicit none
- type :: UnityOutputsType
- real(8) :: KellyHoseVibrationRate
- real(8) :: BlowoutFromStringPercent
- real(8) :: Pedal
- real(8) :: FlowRate
- real(8) :: RotaryRpm
- logical :: BlowoutFromString
- logical :: BlowoutFromAnnular
- logical :: FlowFromReturnLine
- real :: FlowFromKelly
- real :: FlowFromFillupHead
- logical :: FlowKellyDisconnect
- logical :: FlowPipeDisconnect
- end type UnityOutputsType
-
- contains
-
- ! subroutine Setup()
- ! use CDataDisplayConsole
- ! use ConfigurationVariables
- ! implicit none
- ! ! PumpsSpmChanges => Calc_KellyHoseVibrationRate
- ! ! call data%Equipments%DataDisplayConsole%OnRotaryRpmChange%Add(Set_RotaryRpm)
- ! end subroutine
-
-
-
-
-
-
-
-
-
-
- end module CUnityOutputs
|