Simulation Core
Não pode escolher mais do que 25 tópicos Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.

CCommonVariables.f90 377 B

há 1 ano
há 1 ano
há 1 ano
12345678910111213141516
  1. module CCommonVariables
  2. !**use CIntegerEventHandler
  3. implicit none
  4. public
  5. type :: CommonType
  6. ! Input vars
  7. integer :: StandRack
  8. ! type(IntegerEventHandler) :: OnStandRackChange
  9. ! Output vars
  10. logical :: DrillWatchOperationMode
  11. end type
  12. type(CommonType):: Common
  13. contains
  14. end module CCommonVariables