HP SunSoft Pascal 4.0 - Manual (Page 261)

Math Libraries 237
11
ieee_functions()
The functions described in ieee_functions (3M) provide capabilities either
required by the IEEE standard or recommended in its appendix. Example:
ieee_values()
IEEE values, such as infinity, NaN, minimum and maximum positive floating-
point numbers, are provided by special functions described in the
ieee_values (3M) man page. Another example follows.
program TestIEEEFunctions(output);
#include "math_p.h"
var
d1: double := 1.0;
d2: double := 2.0;
i1: integer := 1;
begin
writeln('IEEE functions');
writeln(ilogb(d1));
writeln(isnan(d1));
writeln(copysign(d1, d2));
writeln(fabs(d1));
writeln(fmod(d1, d1));
writeln(nextafter(d1, d1));
writeln(remainder(d1, d1));
writeln(scalbn(d1, i1));
end.