-\r
-data List a = Nil | Cons a (List a)\r
-\r
-data Foo = Foo\r
-\r
-main = Foo `Cons` (Foo `Cons` Nil)\r
---\r
+
+data List a = Nil | Cons a (List a)
+
+data Foo = Foo
+
+main = Foo `Cons` (Foo `Cons` Nil)
+--
(Cons Foo (Cons Foo Nil))
\ No newline at end of file