isEqual Function

private pure function isEqual(left, right) result(equality)

This function provides the test for equality of two projections.

Two l2p header are considered to be equal, if their node_header, and the factor are equal.

Arguments

Type IntentOptional Attributes Name
type(ply_l2p_header_type), intent(in) :: left

projection to compare

type(ply_l2p_header_type), intent(in) :: right

projection to compare against

Return Value logical

is equal??


Called by

proc~~isequal~7~~CalledByGraph proc~isequal~7 isEqual interface~operator(==)~6 operator(==) interface~operator(==)~6->proc~isequal~7