Re: [Haskell-cafe] Need some help with an infinite list

On Wed, 17 Jun 2009, Richard O'Keefe wrote:

On 17 Jun 2009, at 2:01 pm, Richard O'Keefe wrote: On second thoughts,

let strings = "" : [pref++[last] | pref <- strings, last <- ['a'..'z']] in tail strings

last:pref instead of pref++[last] should do more sharing. You can also write it this way: let strings = "" : Monad.liftM2 (flip (:)) strings ['a'..'z'] in tail strings