module CCommonVariables use CIntegerEventHandler implicit none public ! Input vars integer :: StandRack type(IntegerEventHandler) :: OnStandRackChange ! Output vars logical :: DrillWatchOperationMode contains end module CCommonVariables