[Haskell-cafe] Producing MinimumValue

[Benja Fallenstein]

2007/7/20, Bulat Ziganshin <bulat.ziganshin at gmail.com>:
> > allEqual [] = True
> > allEqual (x:xs) = all (== x) xs
>
> > with the same caveat about allEqual [] as in your case.
>
> allEqual xs  =  all (== head xs) xs

Riiiight. Not evaluated in the edge case, because xs is empty. Didn't
think of that, nice :-)

- Benja