BLD euler 6

eigenfoo · eigenfoo · commit 1d21f581e850 · 2017-08-10T07:58:06.000+08:00
diff --git a/euler006.hs b/euler006.hs
@@ -0,0 +1,3 @@
+main = print (squaredsum - sumsquares)
+  where squaredsum = (sum [1..100])^2
+        sumsquares = (sum $ map (^2) [1..100])

Original file line number	Diff line number	Diff line change
`@@ -0,0 +1,3 @@`
	`1`	`+main = print (squaredsum - sumsquares)`
	`2`	`+ where squaredsum = (sum [1..100])^2`
	`3`	`+ sumsquares = (sum $ map (^2) [1..100])`