inf 0 = putStrLn("done")
inf n = inf (n - 1)
main = inf 10000000