lol.hs

fib = (\ n -> (if ((((==) n)) 0) then 0 else (if ((((==) n)) 1) then 1 else ((((+) ((fib) ((n) -1)))) ((fib) ((n) -2))))))
fact = (\ n -> (if ((((==) n)) 0) then 1 else ((((*) ((fact) ((n) -1)))) n)))
ns = (((((:)) 1)) (((((:)) 2)) (((((:)) 3)) (((((:)) 4)) (((((:)) 5)) [])))))
main = ((((>>) ((print) ((fib) 19)))) ((print) ((((>>=) ns)) ((((.) return)) fact))))