dm_equals Interface

public interface dm_equals

Returns .true. if two real numbers are approximately the same.

Called by

interface~~dm_equals~~CalledByGraph interface~dm_equals dm_equals proc~dm_dp_scale dm_dp_scale proc~dm_dp_scale->interface~dm_equals proc~dm_node_equals dm_node_equals proc~dm_node_equals->interface~dm_equals proc~dm_observ_view_equals dm_observ_view_equals proc~dm_observ_view_equals->interface~dm_equals proc~dm_real64_to_logical dm_real64_to_logical proc~dm_real64_to_logical->interface~dm_equals proc~dm_response_equals dm_response_equals proc~dm_response_equals->interface~dm_equals proc~dm_sensor_equals dm_sensor_equals proc~dm_sensor_equals->interface~dm_equals proc~dm_target_equals dm_target_equals proc~dm_target_equals->interface~dm_equals proc~dm_transform_polar_3d dm_transform_polar_3d proc~dm_transform_polar_3d->interface~dm_equals interface~dm_from_real64 dm_from_real64 interface~dm_from_real64->proc~dm_real64_to_logical interface~operator (==)~10 operator (==) interface~operator (==)~10->proc~dm_node_equals interface~operator (==)~12 operator (==) interface~operator (==)~12->proc~dm_response_equals interface~operator (==)~2 operator (==) interface~operator (==)~2->proc~dm_sensor_equals interface~operator (==)~3 operator (==) interface~operator (==)~3->proc~dm_observ_view_equals proc~dm_observ_equals dm_observ_equals interface~operator (==)~3->proc~dm_observ_equals interface~operator (==)~4 operator (==) interface~operator (==)~4->proc~dm_target_equals proc~dm_request_equals dm_request_equals proc~dm_request_equals->proc~dm_response_equals interface~operator (==)~8 operator (==) interface~operator (==)~8->proc~dm_request_equals proc~dm_observ_equals->proc~dm_request_equals

Module Procedures

private pure elemental function equals_real32(a, b) result(equals)

Returns .true. if the 4-byte real numbers a and b are approximately the same, else .false..

Arguments

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

Return Value logical

private pure elemental function equals_real64(a, b) result(equals)

Returns .true. if the 8-byte real numbers a and b are approximately the same, else .false..

Arguments

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

Return Value logical