3 Jan
2009
3 Jan
'09
3:09 p.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