|
- MODULE TopDrive_VARIABLES
-
- IMPLICIT NONE
- PUBLIC
-
-
- REAL, PARAMETER :: pi=3.14159265d0
-
-
- !****************************************************************************************************
- !**************** Define Top Drive Array ****************************************************
- TYPE, PUBLIC :: TDS_Var
-
- !***** TopDrive_VARIABLES *************************
- INTEGER :: MotorFaileMalf , OverideTorqueLimitMalf , PowerState , OldPowerMode , DrillTorqueState
-
- REAL :: Speed, Inertia_Moment, Torque, RpmKnob, TorqueLimitKnob
- REAL :: Conv_Ratio, High_Conv_Ratio, Low_Conv_Ratio, RateChange, N_new, N_old, N_ref, TDS_wOld ! N[rpm] , w[rad/s]
- REAL :: RpmGaugeOutput, RPMUnityOutput, TorqueGaugeOutput, MaxRPM, MaxTorque
- REAL :: String_Torque, String_JCoef, J_coef
- REAL :: time_step
-
-
-
- INTEGER :: PowerLed ! 1=On , 0=Off
- INTEGER :: OperationFaultLed
-
- !************* Sound_VARIABLES **********************
- INTEGER :: SoundRPM
- Logical :: SoundBlower
-
-
-
- END TYPE TDS_Var
- TYPE(TDS_Var) :: TDS
- !***********************************************************************************************
- !****************************************************************************************************
-
-
-
-
- END MODULE
|
