Rename function lift to liftM ; add bindl function (equivalent to
haskell's (=<<) .