]> gerrit.simantics Code Review - simantics/platform.git/blob - SumOfInverses2.scl
Code Review / simantics / platform.git / blob
? search:


5b2e99ae26642f6b6353f9e7579bc319b2ffaead
[simantics/platform.git] / SumOfInverses2.scl
1 import "Prelude"
2
3 main :: Integer -> Double
4 main m = sum [1/(fromInteger x) | x <- [1..m]]
Simantics Platform SDK.