gt_char_string Function

private elemental function gt_char_string(lhs, rhs) result(is_gt)

Compare two character sequences for being greater. In this version the right-hand side character sequences is by a string.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: lhs
type(string_type), intent(in) :: rhs

Return Value logical


Calls

proc~~gt_char_string~~CallsGraph proc~gt_char_string gt_char_string proc~maybe maybe proc~gt_char_string->proc~maybe

Called by

proc~~gt_char_string~~CalledByGraph proc~gt_char_string gt_char_string interface~operator(gt) operator(>) interface~operator(gt)->proc~gt_char_string

Source Code

elemental function gt_char_string(lhs, rhs) result(is_gt)
   character(len=*), intent(in) :: lhs
   type(string_type), intent(in) :: rhs
   logical :: is_gt

   is_gt = lhs > maybe(rhs)

end function gt_char_string