24 Aug
2007
24 Aug
'07
9:50 a.m.
Arie Groeneveld wrote:
tm = sum . takeWhile(>0) . iterate f . f where f = flip div 5
Which one is the most elegant one generally speaking?
I like that tm only uses div.
My personal choice is 'tm'. I like 'tm3' (a revised version of tm2) in terms of pointlessness and not having a 'where', but I think it's a bit contrived because of the 'flip'.
You can make tm whereless by noticing that you use because you use the function twice in iterate f . f, which is because you don't want the initial value that iterate gives. You can instead use tail on iterate's result, and use a section to avoid flip: tm = sum . takeWhile (>0) . tail . iterate (`div` 5) (Hope that works, can't test now...) All the best Christian Sievers