equal_array Function

private pure function equal_array(a, b) result(res)

Relational operator to test the equality of two arrays of floating point numbers.

Arguments

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

Floating point array to be compared.

real(kind=rk), intent(in) :: b(:)

Floating point array to be compared.

Return Value logical

The result is a logical value indicating whether the operands are equal to within numerical precision.