isUnequal Function

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

This function provides the test for unequality of two projections.

Two projections are considered to be unequal, if their kind, nodes_kind, maxpolydegree or factor are not equal.

Arguments

TypeIntentOptionalAttributesName
type(ply_prj_init_type), intent(in) :: left

projection to compare

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

projection to compare against

Return Value logical

is unequal??


Called by

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

Contents

None