X07AAF Example Program Results

 Turn exception halting off ...
 Exception halting mode is now:   0  0  0

 Diagnosis of value "one" which prints as   1.0000E+00
 "one" is finite
 "one" is not NaN
 "one" does not compare less than zero.
 "one" does not compare equal to zero.
 "one" compares greater than zero.

 Diagnosis of value "-two" which prints as  -2.0000E+00
 "-two" is finite
 "-two" is not NaN
 "-two" compares less than zero.
 "-two" does not compare equal to zero.
 "-two" does not compare greater than zero.

 Diagnosis of value "zero" which prints as   0.0000E+00
 "zero" is finite
 "zero" is not NaN
 "zero" does not compare less than zero.
 "zero" compares equal to zero.
 "zero" does not compare greater than zero.

 Diagnosis of value "-Infinity"
 "-Infinity" is not finite
 "-Infinity" is not NaN
 "-Infinity" compares less than zero.
 "-Infinity" does not compare equal to zero.
 "-Infinity" does not compare greater than zero.

 Diagnosis of value "Quiet NaN" which prints as          NaN
 "Quiet NaN" is not finite
 "Quiet NaN" is NaN
 "Quiet NaN" does not compare less than zero.
 "Quiet NaN" does not compare equal to zero.
 "Quiet NaN" does not compare greater than zero.

 Try to cause overflow - no trap should occur:
 y = huge() * huge() > huge() 

 Try to cause NaN - no trap should occur:
 y = 0.0 / 0.0 = NaN

 Try to cause division by zero - no trap should occur:
 y = 1.0 / 0.0 > huge()