Simulation Core
25개 이상의 토픽을 선택하실 수 없습니다. Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

15 lines
282 B

  1. module CHookVariables
  2. !**use CRealEventHandlerCollection
  3. ! use CHookActions
  4. implicit none
  5. Type :: HookType
  6. real :: HookHeight_S = 0.0
  7. real :: HookHeight
  8. end type HookType
  9. contains
  10. end module CHookVariables