Why not forget about ApproxEq for () and Bool and simply define a function?
(~=) :: (Ord a, Num a) => a -> a -> Bool x ~= y = abs (x-y) < 1
Indeed, this works best. The instance for lists is also not too important.
Christian _______________________________________________ Haskell-Cafe mailing list Haskell-Cafe@haskell.org http://www.haskell.org/mailman/listinfo/haskell-cafe
