[Haskell-cafe] Rewriting ord (revisited)

Hi This was my original version plus some modifications as advised by the list: f c = sum [1 | x <- ['\0'..], x < c] The following version was sent by a list member: f c = length $ takeWhile (