1 2 3 4 5 6 7 8 9
==================== Parser ==================== main = print (test :: Int) where test = 0 test2 = 1 test3 = 2