isGreater Function

private function isGreater(left, right) result(great)

This function provides a comparison of two attributes.

Check if left attribute is greater than right attribute by checking greater for attribute kind, label, color and level

Arguments

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

attribute to compare

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

attribute to compare against

Return Value logical

is greater??


Called by

proc~~isgreater~~CalledByGraph proc~isgreater isGreater interface~operator(gt) operator(>) interface~operator(gt)->proc~isgreater

Contents

None