4 Jan
2009
4 Jan
'09
4:09 a.m.
Colin Paul Adams wrote:
I have the following function: northern_range:: Piece_type -> Int northern_range piece | elem piece [Lance, Reverse_chariot, Vertical_mover, etc.] = 11 | elem piece [Bishop, Kylin, etc.] = 0 | otherwise = 1
if you have an Eq instance for Piece_type. Cheers Christian