úνÿNoneIf  occurs or  is used in the left monad, . then the right monad is performed. Note that    throws . Go to the next   monad by throwing . Run any one lifted   monad. None   None=A function to generate a choice operator in lifted IO monad.  1 is automatically added to specified exceptions.  So,  can be used with  the new operator. " {-# LANGUAGE TemplateHaskell #-}  import Control.Exception - import Control.Exception.IOChoice.Lifted.TH  6 (||>>) :: MonadBaseControl IO m => m a -> m a -> m a 9 (||>>) = $(newIOChoice [''ErrorCall, ''ArithException]) None6A function to generate a choice operator in IO monad.  1 is automatically added to specified exceptions.  So,  can be used with  the new operator. " {-# LANGUAGE TemplateHaskell #-}  import Control.Exception & import Control.Exception.IOChoice.TH   (||>>) :: IO a -> IO a -> IO a 9 (||>>) = $(newIOChoice [''ErrorCall, ''ArithException])  Safe-InferredIf  occurs or  is used in the left IO, + then the right IO is performed. Note that    throws . Go to the next   monad by throwing .  Run any one   monad.     io-choice-0.0.5!Control.Exception.IOChoice.Lifted$Control.Exception.IOChoice.Lifted.THControl.Exception.IOChoice.THControl.Exception.IOChoice!Control.Exception.IOChoice.THUtilgoNext||> runAnyOne newIOChoicebaseGHC.IO.Exception IOExceptionGHC.Basefailghc-prim GHC.TypesIO newChoice mkHandlercheckSupported