akiradeveloper/ApplicativeGetLine.hs

Created August 11, 2011 13:15

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/akiradeveloper/1139614.js"></script>
Save akiradeveloper/1139614 to your computer and use it in GitHub Desktop.

Download ZIP

The power of Applicative Functor

Raw

ApplicativeGetLine.hs

	Prelude Control.Applicative> let x = (++) <$> getLine <*> getLine
	Prelude Control.Applicative> x
	akira
	developer
	"akiradeveloper"

Author

akiradeveloper commented Aug 11, 2011

This is also the power of Applicative.

Prelude Control.Applicative> liftA2 (^) <$> [Just 1] <*> [Nothing, Just 2]
[Nothing,Just 1]

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment