Add remaining haskell book exercises
This commit is contained in:
6
Haskell-book/18/Bind.hs
Normal file
6
Haskell-book/18/Bind.hs
Normal file
@@ -0,0 +1,6 @@
|
||||
module Bind where
|
||||
|
||||
import Control.Monad
|
||||
|
||||
bind :: Monad m => (a -> m b) -> m a -> m b
|
||||
bind f x = join $ fmap f x
|
||||
Reference in New Issue
Block a user