mahmood19227
/
SimulationCore2
1
0
Bifurcation 0
Code Tickets 0 Demandes d'ajout 0 Versions 0 Wiki Activité
Simulation Core
Vous ne pouvez pas sélectionner plus de 25 sujets Les noms de sujets doivent commencer par une lettre ou un nombre, peuvent contenir des tirets ('-') et peuvent comporter jusqu'à 35 caractères.
19 Révisions
2 Branches
134 MiB
 
 
 
 
 
 
Aborescence: 8d59cc0a67
Branches Tags
${ item.name }
Créer la branche ${ searchTerm }
de '8d59cc0a67'
${ noResults }
SimulationCore2/Equipments/TopDrive/TopDrive_StartUp.f90

46 lignes
1.0 KiB
Brut Annotations Historique 

  1. subroutine TopDrive_StartUp

  2. 

  3.     use CTopDrivePanelVariables

  4.     use TopDrive_VARIABLES

  5.     

  6. 	IMPLICIT NONE

  7.     

  8.     

  9.     TopDrivePanel%TopDriveOperationFaultLed = 0

  10.     TDS_OldPowerMode = 0

  11.     

  12.     

  13.     

  14.     !TDS%=0.

  15.     

  16.     TDS%Inertia_Moment  = 23.261341                                            ! 23.261341 [kg.m^2] = 552 [lb.ft^2]

  17.     TDS%J_coef          = TDS%Inertia_Moment+(1.*(TDS%Inertia_Moment))   ! [kg.m^2]???????????

  18.     TDS%String_JCoef    = 0.                             !???????????????

  19.     TDS%Mech_Efficiency = 0.930

  20.     TDS%ConstLoad       = 2000.                          ![lb.in]

  21.     TDS%ConstLoad       = 0.112984829*TDS%ConstLoad   ![N.m]

  22.     TDS%Torque          = 0.0

  23.     

  24.     

  25.     TDS%High_Conv_Ratio = 4.8250

  26.     TDS%Low_Conv_Ratio  = 7.310

  27.     TDS%Conv_Ratio      = TDS%High_Conv_Ratio

  28.     TDS%time_step       = .10

  29.     

  30.     

  31.     TDS%w     = 0.0

  32.     TDS%w_new = 0.0

  33. 

  34.     

  35.     

  36.     

  37.     !TDS_OldTransMode  = RTTransmissionLever   ??????

  38. 

  39.     

  40.     

  41.     call TopDrive_OffMode

  42.     

  43.     

  44.     

  45.     

  46. end subroutine