isGreaterOrEqual Function

private pure function isGreaterOrEqual(left, right) result(great)

This function provides a >= comparison of two projections.

Sorting of l2p header is given by node_header, l2p_blocksize and last by factor.

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 greater??


Called by

proc~~isgreaterorequal~2~~CalledByGraph proc~isgreaterorequal~2 isGreaterOrEqual interface~operator(gt=)~2 operator(>=) interface~operator(gt=)~2->proc~isgreaterorequal~2