module CWarningsVariables implicit none public type:: WarmingsType logical :: PumpWithKellyDisconnected logical :: PumpWithTopdriveDisconnected logical :: Pump1PopOffValveBlown logical :: Pump1Failure logical :: Pump2PopOffValveBlown logical :: Pump2Failure logical :: Pump3PopOffValveBlown logical :: Pump3Failure logical :: DrawworksGearsAbuse logical :: RotaryGearsAbuse logical :: HoistLineBreak logical :: PartedDrillString logical :: ActiveTankOverflow logical :: ActiveTankUnderVolume logical :: TripTankOverflow logical :: DrillPipeTwistOff logical :: DrillPipeParted logical :: TripWithSlipsSet logical :: Blowout logical :: UndergroundBlowout logical :: MaximumWellDepthExceeded logical :: CrownCollision logical :: FloorCollision logical :: TopdriveRotaryTableConfilict end type WarmingsType contains end module CWarningsVariables