Anonymous user
Lucky and even lucky numbers: Difference between revisions
m
→{{header|Haskell}}: typos introduced in last change
(→{{header|Haskell}}: Correction on interval function.) |
m (→{{header|Haskell}}: typos introduced in last change) |
||
Line 148:
interval x x2 l = let x'' = (-1 * x2) in
case l of
Lucky -> let n = length (takeWhile (<x) (luckyNumbers oddNumbers)) in
drop n (takeWhile (<
EvenLucky -> let n = length (takeWhile (<x) (luckyNumbers evenNumbers)) in
drop n (takeWhile (<=x'') (luckyNumbers evenNumbers))
| |||