gerrit.simantics Code Review - simantics/platform.git/blob

   1 import "Prelude"\r
   2 \r
   3 main :: Integer -> Double\r
   4 main m = sum [1/(fromInteger x) | x <- [1..m]]\r