Simulation Core
Ви не можете вибрати більше 25 тем Теми мають розпочинатися з літери або цифри, можуть містити дефіси (-) і не повинні перевищувати 35 символів.
 
 
 
 
 
 

33 рядки
1.1 KiB

  1. module CWarningsVariables
  2. implicit none
  3. public
  4. type:: WarmingsType
  5. logical :: PumpWithKellyDisconnected
  6. logical :: PumpWithTopdriveDisconnected
  7. logical :: Pump1PopOffValveBlown
  8. logical :: Pump1Failure
  9. logical :: Pump2PopOffValveBlown
  10. logical :: Pump2Failure
  11. logical :: Pump3PopOffValveBlown
  12. logical :: Pump3Failure
  13. logical :: DrawworksGearsAbuse
  14. logical :: RotaryGearsAbuse
  15. logical :: HoistLineBreak
  16. logical :: PartedDrillString
  17. logical :: ActiveTankOverflow
  18. logical :: ActiveTankUnderVolume
  19. logical :: TripTankOverflow
  20. logical :: DrillPipeTwistOff
  21. logical :: DrillPipeParted
  22. logical :: TripWithSlipsSet
  23. logical :: Blowout
  24. logical :: UndergroundBlowout
  25. logical :: MaximumWellDepthExceeded
  26. logical :: CrownCollision
  27. logical :: FloorCollision
  28. logical :: TopdriveRotaryTableConfilict
  29. end type WarmingsType
  30. contains
  31. end module CWarningsVariables