Hello Benja,

Friday, July 20, 2007, 6:10:15 PM, you wrote:
> My natural instinct is,

> allEqual [] = True
> allEqual (x:xs) = all (== x) xs

> with the same caveat about allEqual [] as in your case.

allEqual xs  =  all (== head xs) xs

-- 
Best regards,
 Bulat                            mailto:[EMAIL PROTECTED]

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

Reply via email to