eq_xy Function

private pure elemental function eq_xy(A, B) result(isequal)

tolerance equality for xy class [absolute tol hard-coded to 1d-12] -> probably to improve...

Type Bound

xy

Arguments

Type IntentOptional Attributes Name
class(xy), intent(in) :: A
class(xy), intent(in) :: B

Return Value logical


Called by

proc~~eq_xy~~CalledByGraph proc~eq_xy xy_coordinates::xy%eq_xy proc~eq_lattice xy_coordinates::xy_lattice%eq_lattice proc~eq_lattice->proc~eq_xy proc~neq_xy xy_coordinates::xy%neq_xy proc~neq_xy->proc~eq_xy proc~neq_lattice xy_coordinates::xy_lattice%neq_lattice proc~neq_lattice->proc~eq_lattice