6 lines
128 B
Haskell
6 lines
128 B
Haskell
|
composeList :: [a -> a] -> a -> a
|
||
|
|
composeList = flip (foldr id)
|
||
|
|
|
||
|
|
main :: IO ()
|
||
|
|
main = print $ composeList [(/ 2), succ, sqrt] 5
|