Inter-comparison of numbers stored using any numerical data type, to test for equality or inequality relations, may be performed by invoking the appropriate NUM_ inter-comparison functions, using statements such as:
RESULT = NUM_ROPER
T
( ARG1, ARG2 )
Here, the NUM_ function takes two arguments of type
T
and returns a logical result, having compared its arguments according to the
relational operation specified by
ROPER
.
The data type code
T
may be any of those in
Table
and
ROPER
may be any of the relational
operation codes specified in Table
.
Thus, for example, the logical function NUM_GTUB returns a .TRUE. result if the unsigned byte number ARG1 is greater than the unsigned byte number ARG2, while NUM_LED returns .TRUE. if the double precision number ARG1 is less than or equal to the double precision number ARG2.
Note that equivalent inter-comparison functions are not available in the
VAL or VEC facilities.
PRIMDAT --- Processing of Primitive Numerical Data