(<++>) :: Monoid o => Coroutine i o -> Coroutine i o -> Coroutine i o
(<++>) = liftA2 mappend
(<++>) :: Monoid o => Coroutine i o -> Coroutine i o -> Coroutine i o
(<++>) = liftA2 mappend
(<++>) = liftA2 mappend