isUnequal Function

private pure function isUnequal(left, right) result(unequality)

This function provides the test for unequality of two projections.

Two fxt header are considered to be unequal, if their node_header, or the factor are not equal.

Arguments

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

projection to compare
type(ply_fxt_header_type), intent(in) :: right

projection to compare against

Return Value logical

is unequal??


Called by

proc~~isunequal~4~~CalledByGraph proc~isunequal~4 isUnequal interface~operator(SLASH=)~4 operator(/=) interface~operator(SLASH=)~4->proc~isunequal~4