10 lines
144 B
Haskell
10 lines
144 B
Haskell
|
import Control.Monad ((>=>))
|
||
|
|
||
|
f :: Int -> [Int]
|
||
|
f n = [n, n+1]
|
||
|
|
||
|
g :: Int -> [String]
|
||
|
g n = [show n,">"++show (n+1)]
|
||
|
|
||
|
main = print $ (f >=> g) 2
|