Simulation Core
Nelze vybrat více než 25 témat Téma musí začínat písmenem nebo číslem, může obsahovat pomlčky („-“) a může být dlouhé až 35 znaků.

SoftwareInputsVariables.f90 559 B

123456789101112131415161718
  1. module SoftwareInputsVariables
  2. ! use CVoidEventHandlerCollection
  3. type:: SoftwareInputsType
  4. real :: HookHeight = 0
  5. real :: IbopHeight = 0
  6. real :: NearFloorConnection = 0
  7. real :: SafetyValveHeight = 0
  8. logical :: SlackOff = .false.
  9. integer :: StandRack = 0
  10. real :: StringPressure = 0
  11. real :: TdsStemJointHeight = 0
  12. logical :: ZeroStringSpeed = .false.
  13. end type SoftwareInputsType
  14. ! type(SoftwareInputsType):: softwareInputs
  15. contains
  16. end module