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.
 
 
 
 
 
 

15 line
302 B

  1. module CCommonVariables
  2. use CIntegerEventHandler
  3. implicit none
  4. public
  5. ! Input vars
  6. integer :: StandRack
  7. type(IntegerEventHandler) :: OnStandRackChange
  8. ! Output vars
  9. logical :: DrillWatchOperationMode
  10. contains
  11. end module CCommonVariables