ends_with_char_string Function

private elemental function ends_with_char_string(string, substring) result(match)

Check whether a string ends with substring or not

Arguments

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

Return Value logical


Calls

proc~~ends_with_char_string~~CallsGraph proc~ends_with_char_string ends_with_char_string interface~ends_with ends_with proc~ends_with_char_string->interface~ends_with interface~ends_with->proc~ends_with_char_string proc~ends_with_char_char ends_with_char_char interface~ends_with->proc~ends_with_char_char proc~ends_with_string_char ends_with_string_char interface~ends_with->proc~ends_with_string_char proc~ends_with_string_string ends_with_string_string interface~ends_with->proc~ends_with_string_string proc~ends_with_string_char->interface~ends_with proc~ends_with_string_string->interface~ends_with

Called by

proc~~ends_with_char_string~~CalledByGraph proc~ends_with_char_string ends_with_char_string interface~ends_with ends_with proc~ends_with_char_string->interface~ends_with interface~ends_with->proc~ends_with_char_string proc~ends_with_string_char ends_with_string_char interface~ends_with->proc~ends_with_string_char proc~ends_with_string_string ends_with_string_string interface~ends_with->proc~ends_with_string_string proc~ends_with_string_char->interface~ends_with proc~ends_with_string_string->interface~ends_with

Source Code

   elemental function ends_with_char_string(string, substring) result(match)
      character(len=*), intent(in) :: string
      type(string_type), intent(in) :: substring
      logical :: match

      match = ends_with(string, char(substring))

   end function ends_with_char_string