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.
30 Commits
2 Branches
136 MiB
 
 
 
 
 
 
Tree: 4baa86455f
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '4baa86455f'
${ noResults }
SimulationCore2/CSharp/OperationScenarios/Common/COperationScenariosVariable...

48 lines
1.5 KiB
Raw Blame History 

  1. module COperationScenariosVariables    

  2.     implicit none

  3.     public

  4.     type::OperationScenarioType

  5.         real :: HKL = 63.76     ! Hook And Kelly Length

  6.         real :: HL  = 17.81     ! Hook Length

  7.         real :: PL  = 30.0      ! Pipe Length

  8.         real :: SL  = 90.0      ! Stand Length

  9.         real :: LG  = 8.0       ! Limit Gap

  10.         real :: SG  = 3.0       ! Slips Gap

  11.         real :: TG  = 4.0       ! Tong Gap

  12.         real :: RE  = 3.0       ! Release

  13.         real :: ECG = 2.3       ! Elevator Connection Gap

  14. 

  15.         !moved from enum/CElevatorConnectionEnum

  16.         integer :: ElevatorConnection = 0

  17. 

  18.         !moved from SoftwareOutputs/CStringUpdateVariables

  19.         integer :: StringUpdate = 0

  20.         

  21.         integer :: KellyConnection = 0

  22.         

  23.     end type OperationScenarioType

  24.     

  25.     enum, bind(c)

  26.         enumerator STRING_UPDATE_NEUTRAL

  27.         enumerator STRING_UPDATE_ADD_SINGLE

  28.         enumerator STRING_UPDATE_ADD_STAND

  29.         enumerator STRING_UPDATE_REMOVE_SINGLE

  30.         enumerator STRING_UPDATE_REMOVE_STAND

  31. 

  32.         enumerator KELLY_CONNECTION_NOTHING

  33.         enumerator KELLY_CONNECTION_STRING

  34.         enumerator KELLY_CONNECTION_SINGLE

  35. 

  36.         enumerator ELEVATOR_CONNECTION_NOTHING

  37.         enumerator ELEVATOR_CONNECTION_STRING

  38.         enumerator ELEVATOR_CONNECTION_STAND

  39.         enumerator ELEVATOR_CONNECTION_SINGLE

  40.         enumerator ELEVATOR_LATCH_STRING

  41.         enumerator ELEVATOR_LATCH_SINGLE

  42.         enumerator ELEVATOR_LATCH_STAND

  43.     end enum

  44.     contains

  45.     

  46. 

  47. 

  48. end module COperationScenariosVariables