view src/monad_and_bind.hs @ 57:5f0e13923cfd

Fixes
author Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
date Mon, 16 Feb 2015 16:24:42 +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)