isGreaterOrEqual Function

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

This function provides a >= comparison of two nodes descriptions.

Arguments

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

projection to compare

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

projection to compare against

Return Value logical

is greater??