isEqual Function

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

This function provides the test for equality of the header for two projections.

The headers are considered to be equal, if their kind and the corresponding headers are equal. For unknown kinds, the headers are not taken into consideration.

Arguments

Type	Intent	Optional	Attributes		Name
type(ply_prj_header_type),	intent(in)			::	left	projection to compare
type(ply_prj_header_type),	intent(in)			::	right	projection to compare against

Return Value logical

is equal??