within_double_precision_percentage Module Procedure

module procedure within_double_precision_percentage elemental module function within_double_precision_percentage(operands, percentage_tolerance) result(test_diagnosis)

Arguments

Type	Intent	Optional	Attributes		Name
type(operands_t(double_precision)),	intent(in)			::	operands
double precision,	intent(in)			::	percentage_tolerance

Return Value type(test_diagnosis_t)