almost_equal Interface

public interface almost_equal

Calls

interface~~almost_equal~~CallsGraph interface~almost_equal almost_equal proc~almost_equal_real32 almost_equal_real32 interface~almost_equal->proc~almost_equal_real32 proc~almost_equal_real64 almost_equal_real64 interface~almost_equal->proc~almost_equal_real64

Called by

interface~~almost_equal~~CalledByGraph interface~almost_equal almost_equal proc~almost_divisible_real32 almost_divisible_real32 proc~almost_divisible_real32->interface~almost_equal proc~almost_divisible_real64 almost_divisible_real64 proc~almost_divisible_real64->interface~almost_equal proc~check_topography_data check_topography_data proc~check_topography_data->interface~almost_equal interface~almost_divisible almost_divisible interface~almost_divisible->proc~almost_divisible_real32 interface~almost_divisible->proc~almost_divisible_real64 proc~dyn_init dyn_init proc~dyn_init->proc~check_topography_data proc~dyn_mpas_init_phase4 mpas_dynamical_core_type%dyn_mpas_init_phase4 proc~dyn_init->proc~dyn_mpas_init_phase4 interface~dyn_init dyn_init interface~dyn_init->proc~dyn_init proc~dyn_mpas_init_phase4->interface~almost_divisible

Module Procedures

private pure elemental function almost_equal_real32(a, b, absolute_tolerance, relative_tolerance) result(almost_equal)

Test a and b for approximate equality, where a and b are both reals. (KCW, 2024-05-25)

Arguments

Type IntentOptional Attributes Name
real(kind=real32), intent(in) :: a
real(kind=real32), intent(in) :: b
real(kind=real32), intent(in), optional :: absolute_tolerance
real(kind=real32), intent(in), optional :: relative_tolerance

Return Value logical

private pure elemental function almost_equal_real64(a, b, absolute_tolerance, relative_tolerance) result(almost_equal)

Test a and b for approximate equality, where a and b are both reals. (KCW, 2024-05-25)

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: a
real(kind=real64), intent(in) :: b
real(kind=real64), intent(in), optional :: absolute_tolerance
real(kind=real64), intent(in), optional :: relative_tolerance

Return Value logical