j
k
j a
j l
On 7/19/07, Dan Weston wrote:
I would define: allEqual [] = True allEqual [_] = True allEqual (x1:x2:xs) = (x1 == x2) && allEqual xs
I would define:
allEqual [] = True allEqual [_] = True allEqual (x1:x2:xs) = (x1 == x2) && allEqual xs
What does this function do for "allEqual [1, 1, 2]" ? Antoine
Back to the thread
Back to the list