view src/monad_and_bind.hs @ 26:de3397af1f8d

Temporary save
author Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
date Tue, 10 Feb 2015 15:30:01 +0900
parents fc44782929a7
children
line wrap: on
line source

return x = eta x
x >>= f  = mu (fmap f x)

eta x = return x
mu  x = (>>= id)