rabbit = 1 : concatMap ((0:) . flip replicate 1 . (1+)) rabbit > This nasty acquaintance of mine... > demanded the solution (in Haskell) as a one-liner. It wasn't you yourself, was it? No. Please, tell me it isn't so. Regards, Yitz