subroutine TopDrive_StartUp

    Use TopDrive_VARIABLES
    
	IMPLICIT NONE
    
    
    
    TDS%MaxRPM            = 200.d0            ![RPM]      !??????? motaghayere voroudi
    TDS%MaxTorque         = 1500.d0           ![ft.lbf]   !??????? motaghayere voroudi
    TDS%time_step         = 0.10d0            ![s]
    
    TDS%Inertia_Moment    = 23.261341d0                                      ! 23.261341 [kg.m^2] = 552 [lb.ft^2]
    TDS%J_coef            = TDS%Inertia_Moment+(1.d0*(TDS%Inertia_Moment))   ! [kg.m^2]???????????
    TDS%String_JCoef      = 0.d0
    !TDS%Mech_Efficiency  = 0.930d0
    TDS%Torque            = 0.d0
    TDS%Speed             = 0.d0
    TDS%OperationFaultLed = 0
    TDS%OldPowerMode      = 0
    TDS%MotorFaileMalf    = 0
    
    TDS%High_Conv_Ratio   = 4.825d0
    TDS%Low_Conv_Ratio    = 7.310d0
    TDS%Conv_Ratio        = TDS%High_Conv_Ratio
    
    Call TopDrive_OffMode
    
    
    
    
end subroutine