summaryrefslogtreecommitdiff
path: root/Haskell-book/17/FixerUpper.hs
blob: b09877f64756f750f0e0936ed88e1c78a42abd38 (plain)
1
2
3
4
5
6
module FixerUpper where

a = const <$> Just <$> "Hello" <*> "World"

b = (,,,) <$> Just 90
    <*> Just 10 <*> Just "Tierness" <*> pure [1, 2, 3]