operator (.fgt.) Interface

private interface operator (.fgt.)

Module Procedures

private elemental function greaterThan(a, b) result(res)

Relational operator to test if one operand is greater than another.

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in) :: a

Floating point value to be compared.
real(kind=rk), intent(in) :: b

Floating point value to be compared.

Return Value logical

The result is a logical value indicating whether the operand a is greater than b by more than the spacing between representable floating point numbers.