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 (.*) #-}