mahmood19227
/
SimulationCore2
1
0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
Simulation Core
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.
65 Commits
2 Branches
134 MiB
 
 
 
 
 
 
Tree: 4936189823
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '4936189823'
${ noResults }
SimulationCore2/Equipments/RotaryTable/RTable_StartUp.f90

32 lines
1.3 KiB
Raw Blame History 

  1. subroutine RTable_StartUp

  2. 

  3.     Use SimulationVariables

  4.     

  5. 	IMPLICIT NONE

  6.     

  7.     

  8.         

  9.     data%State%RTable%Inertia_Moment  = 23.261341d0       ! 23.261341[kg.m^2] = 552[lb.ft^2]

  10.     data%State%RTable%Mech_Efficiency = 0.93d0

  11.     data%State%RTable%RateChange      = 1.d0              ![RPM/min]     !??????? motaghayere voroudi

  12.     data%State%RTable%High_Conv_Ratio = 4.825d0

  13.     data%State%RTable%Low_Conv_Ratio  = 7.31d0

  14.     data%State%RTable%time_step       = 0.1d0             ![s]

  15.     data%State%RTable%MaxRPM          = 200.d0            ![RPM]      !??????? motaghayere voroudi

  16.     data%State%RTable%MaxTorque       = 1500.d0           ![ft.lbf]   !??????? motaghayere voroudi

  17.     

  18.     

  19.     

  20.     data%State%RTable%RateChange    = 193.d0 !data%State%RTable%RateChange/60.d0   ![RPM/s]         ![cycle/min]=[RPM]     !1[Hz]=60[RPM]

  21.     data%State%RTable%J_coef        = data%State%RTable%Inertia_Moment+(1.d0*(data%State%RTable%Inertia_Moment)) 

  22.     data%State%RTable%Conv_Ratio    = data%State%RTable%Low_Conv_Ratio

  23.     data%State%RTable%String_JCoef  = 0.d0  

  24.     data%State%RTable%Torque        = 0.d0

  25.     data%State%RTable%K_throttle    = 0

  26.     data%State%RTable%Speed         = 0.d0

  27.     data%State%RTable%TorqueGaugeOutput = 0.d0

  28.     call RTable_OffMode

  29.     

  30.     

  31.     

  32. end subroutine RTable_StartUp