0 | ||| Provide Do-Notation support for Indexed Monad. Withouth this, the Indexed interfaces use 1 | ||| operators that do not collide with the non-Indexed interfaces. 2 | module Control.Monad.Indexed.Do 3 | 4 | import Control.Monad.Indexed 5 | 6 | namespace Indexed 7 | public export 8 | (>>=) : IndexedMonad z m => m a i j -> (a -> m b j k) -> m b i k 9 | (>>=) = (>>>=) 10 | 11 | public export 12 | (>>) : IndexedMonad z m => m () i j -> Lazy (m b j k) -> m b i k 13 | (>>) = (>>>) 14 | 15 |