import System

main = aaa 1

aaa 10 = exitFailure
aaa x  = do putStr (show x)
	    aaa (x+1)