Must contain the value 0.0 This is passed to prevent the compiler from optimizing away this code.

ONE (input) REAL

Must contain the value 1.0 This is passed to prevent the compiler from optimizing away this code. RETURN VALUE: INTEGER = 0: Arithmetic failed to produce the correct answers
= 1: Arithmetic produced the correct answers Return if we were only asked to check infinity arithmetic