isGreaterOrEqual Function

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

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

Arguments

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


Called by

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

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: left_log

help variables

integer, private :: right_log

help variables