find_char_string Function

private elemental function find_char_string(string, pattern, occurrence, consider_overlapping) result(res)

Returns the starting index of the ‘occurrence’th occurrence of substring ‘pattern’ in input ‘string’ Returns an integer

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: string
type(string_type), intent(in) :: pattern
integer, intent(in), optional :: occurrence
logical, intent(in), optional :: consider_overlapping

Return Value integer


Calls

proc~~find_char_string~~CallsGraph proc~find_char_string find_char_string interface~find find proc~find_char_string->interface~find interface~find->proc~find_char_string proc~find_char_char find_char_char interface~find->proc~find_char_char proc~find_string_char find_string_char interface~find->proc~find_string_char proc~find_string_string find_string_string interface~find->proc~find_string_string interface~pic_optional pic_optional proc~find_char_char->interface~pic_optional proc~compute_lps compute_lps proc~find_char_char->proc~compute_lps proc~find_string_char->interface~find proc~find_string_string->interface~find proc~optional_char optional_char interface~pic_optional->proc~optional_char proc~optional_dp optional_dp interface~pic_optional->proc~optional_dp proc~optional_int32 optional_int32 interface~pic_optional->proc~optional_int32 proc~optional_int64 optional_int64 interface~pic_optional->proc~optional_int64 proc~optional_logical optional_logical interface~pic_optional->proc~optional_logical proc~optional_sp optional_sp interface~pic_optional->proc~optional_sp

Called by

proc~~find_char_string~~CalledByGraph proc~find_char_string find_char_string interface~find find proc~find_char_string->interface~find interface~find->proc~find_char_string proc~find_string_char find_string_char interface~find->proc~find_string_char proc~find_string_string find_string_string interface~find->proc~find_string_string proc~find_string_char->interface~find proc~find_string_string->interface~find

Source Code

   elemental function find_char_string(string, pattern, occurrence, consider_overlapping) result(res)
      character(len=*), intent(in) :: string
      type(string_type), intent(in) :: pattern
      integer, intent(in), optional :: occurrence
      logical, intent(in), optional :: consider_overlapping
      integer :: res

      res = find(string, char(pattern), occurrence, consider_overlapping)

   end function find_char_string