j
k
j a
j l
On 11 Jul 2005, at 17:37, Dinh Tien Tuan Anh wrote:
sumHam :: Integer -> Float sumHam n = sum [1/x | x<-[1..n]]
Try this: sumHam :: Integer -> Float sumHam n = sum [1.0/(fromIntegral x) | x<-[-1..n]] -- Andy
Back to the thread
Back to the list
