is_zero_r64 Function

private elemental function is_zero_r64(scalar)

Arguments

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

Return Value logical


Contents

Source Code


Source Code

  logical elemental function is_zero_r64(scalar)
    real(real64), intent(in) :: scalar
    is_zero_r64 = exactly_equal(scalar, 0.0_real64)
  end function is_zero_r64