A Quine in Haskell
June 18, 2026
main = putStr (c ++ [toEnum 34] ++ c ++ [toEnum 34]) where c = "main = putStr (c ++ [toEnum 34] ++ c ++ [toEnum 34]) where c = "
main = putStr (c ++ [toEnum 34] ++ c ++ [toEnum 34]) where c = "main = putStr (c ++ [toEnum 34] ++ c ++ [toEnum 34]) where c = "