Extremely simple quine in Haskell