isUnequal Function

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

This function provides the test for unequality of two projections.

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

Arguments

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

projection to compare

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

projection to compare against

Return Value logical

is unequal??


Called by

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

Contents

None