is_zero_r32 Function

private elemental function is_zero_r32(scalar)

Arguments

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

Return Value logical


Contents

Source Code

is_zero_r32

Source Code

  logical elemental function is_zero_r32(scalar)
    real(real32), intent(in) :: scalar
    is_zero_r32 = exactly_equal(scalar, 0.0_real32)
  end function is_zero_r32