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.

CStudentStationVariables.f90 601 B

1 year ago
123456789101112131415161718192021
  1. module CStudentStationVariables
  2. use CVoidEventHandlerCollection
  3. implicit none
  4. public
  5. ! Input vars
  6. logical :: FillupHeadInstallation
  7. type(VoidEventHandlerCollection) :: OnFillupHeadInstallationPress
  8. type(VoidEventHandlerCollection) :: OnFillupHeadRemovePress
  9. logical :: MudBoxInstallation
  10. type(VoidEventHandlerCollection) :: OnMudBoxInstallationPress
  11. type(VoidEventHandlerCollection) :: OnMudBoxRemovePress
  12. logical :: TapSelector
  13. logical :: PitGainLossZero
  14. ! Output vars
  15. contains
  16. end module CStudentStationVariables