I bow to your superior ingenuity.  :)

- Lyle

>
> Why so long-winded :-)?
>
>   combs = mapM (enumFromTo 0)
>
>       mike
>
> Lyle Kopnicky <[EMAIL PROTECTED]> writes:
> ...
>> Here is the
>> improved version:
>>
>> combs [] = [[]]
>> combs (n:r) = [i:cr | i <- [0..n], cr <- combs r]
> ...
>

_______________________________________________
Haskell-Cafe mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to