-import "Prelude"\r
-\r
-class Container c a b | c -> a, c -> b where\r
- get :: c -> a -> b\r
-\r
-instance Container [a] Integer a where\r
- get = (!)\r
-\r
-main = get [1,2,3,4,5] 3\r
---\r
+import "Prelude"
+
+class Container c a b | c -> a, c -> b where
+ get :: c -> a -> b
+
+instance Container [a] Integer a where
+ get = (!)
+
+main = get [1,2,3,4,5] 3
+--
4
\ No newline at end of file