module MonadVar.Prelude ( module Export , module MonadVar.Prelude ) where import Prelude as Export hiding (read) import Data.Function as Export import Control.Exception as Export (mask, mask_, evaluate, onException) import Control.Monad.IO.Class as Export infixr 9 .* infixl 1 <&> (<&>) :: Functor f => f a -> (a -> b) -> f b f a x <&> :: f a -> (a -> b) -> f b <&> a -> b f = a -> b f (a -> b) -> f a -> f b forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> f a x {-# INLINE (<&>) #-} (.*) :: (c -> d) -> (a -> b -> c) -> a -> b -> d c -> d g .* :: (c -> d) -> (a -> b -> c) -> a -> b -> d .* a -> b -> c f = \a x b y -> c -> d g (a -> b -> c f a x b y) {-# INLINE (.*) #-}