Re: [Haskell-cafe] An alternative break

On Wed, May 28, 2008 at 2:53 PM, Pieter Laeremans wrote:

Hello,

I need a break function that splits the list one element further than the ordinary break. This is the simplest solution I could imagine:

breakI :: (a -> Bool) -> [a] -> ([a], [a]) breakI p s = case break p s of ([], []) -> ([], []) (x, []) -> (x, []) (x, l) -> (x ++ [head l], tail l )

Is there a better way to write this ?

Your first two cases are redundant; you can eliminate the first one. Other than that, it looks fine.

thanks in advance,

Pieter

-- Pieter Laeremans _______________________________________________ Haskell-Cafe mailing list Haskell-Cafe@haskell.org http://www.haskell.org/mailman/listinfo/haskell-cafe