-\r
-class Foo a where\r
- foo :: a -> Integer\r
- \r
-instance Foo Integer where\r
- foo x = x\r
- \r
-main = foo (13 :: Integer)\r
---\r
+
+class Foo a where
+ foo :: a -> Integer
+
+instance Foo Integer where
+ foo x = x
+
+main = foo (13 :: Integer)
+--
13
\ No newline at end of file