almost_zero Interface

private interface almost_zero

Is the argument almost zero


Contents

Module Procedures


Module Procedures

private elemental function almost_zero_r32(scalar, rtol, atol)

Is a scalar almost zero

Arguments

Type IntentOptional Attributes Name
real(kind=real32), intent(in) :: scalar
real(kind=real32), intent(in), optional :: rtol
real(kind=real32), intent(in), optional :: atol

Return Value logical

private elemental function almost_zero_r64(scalar, rtol, atol)

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: scalar
real(kind=real64), intent(in), optional :: rtol
real(kind=real64), intent(in), optional :: atol

Return Value logical

private elemental function almost_zero_r128(scalar, rtol, atol)

Arguments

Type IntentOptional Attributes Name
real(kind=real128), intent(in) :: scalar
real(kind=real128), intent(in), optional :: rtol
real(kind=real128), intent(in), optional :: atol

Return Value logical