-import "Prelude"\r
-\r
-a = [1, 2]\r
-b = [5, 6]\r
-\r
-main = mdo \r
- x <- a\r
- y <- b\r
- return (x+y) \r
---\r
+import "Prelude"
+
+a = [1, 2]
+b = [5, 6]
+
+main = mdo
+ x <- a
+ y <- b
+ return (x+y)
+--
[6, 7, 7, 8]
\ No newline at end of file