Impurity in Main.hs