func divZero a b .
   r = a / b
   if r <> r or abs r = 1 / 0 : return 1
   return 0
.
print divZero 5 7
print divZero -2 0
print divZero 3 0
print divZero 0 0