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.
 
 
 
 
 
 

18 lines
758 B

  1. # 1 "/home/admin/SimulationCore2/CSharp/OperationScenarios/Permissions/PermissionsVariables.f90"
  2. module PermissionsVariables
  3. ! use CVoidEventHandlerCollection
  4. type::PermissionsType
  5. logical :: FillupHeadPermission = .false.
  6. logical :: InstallFillupHeadPermission = .false.
  7. logical :: InstallMudBucketPermission = .false.
  8. logical :: IrIbopPermission = .false.
  9. logical :: IrSafetyValvePermission = .false.
  10. logical :: RemoveFillupHeadPermission = .false.
  11. logical :: RemoveMudBucketPermission = .false.
  12. logical :: SwingDrillPermission = .false.
  13. logical :: SwingOffPermission = .false.
  14. logical :: SwingTiltPermission = .false.
  15. end type PermissionsType
  16. contains
  17. end module