-import "Prelude"\r
-\r
-dists l = sum [sqrt (x*x+y*y) \r
- | (x,y) <- l ]\r
- \r
-main = dists [(0,0),(1,1),(2,0)]\r
--- \r
+import "Prelude"
+
+dists l = sum [sqrt (x*x+y*y)
+ | (x,y) <- l ]
+
+main = dists [(0,0),(1,1),(2,0)]
+--
3.414213562373095
\ No newline at end of file