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