Skip to content

Instantly share code, notes, and snippets.

@calebh

calebh/monad.hs

Created July 21, 2019 00:08
Show Gist options
  • Save calebh/aa8a409cd6bed38be52d3d8d1fa4de02 to your computer and use it in GitHub Desktop.
Save calebh/aa8a409cd6bed38be52d3d8d1fa4de02 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
monad.hs
class Monad m where
(>>=) :: m a -> ( a -> m b) -> m b
(>>) :: m a -> m b -> m b
x >> y = x >>= \_ -> y
return :: a -> m a
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment