From: Marcin 'Qrczak' Kowalczyk <qrczak>
Date: Tue Nov 28 15:30:42 2006
Alan Watson <alan_at_alan-watson.org> writes:
> Does this work, assuming x and y are both inexact numbers and we have
> IEEE arithmetic?
>
> (cond
> ((nan? x) (nan? y))
> ((and (zero? x) (zero? y)) (= (/ 1.0 x) (/ 1.0 y)))
> (else (= x y)))