index_char_string Function

private elemental function index_char_string(string, substring, back) result(pos)

Position of a sequence of character within a character sequence. In this version the sub character sequence is represented by a string.

Arguments

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

Return Value integer


Calls

proc~~index_char_string~~CallsGraph proc~index_char_string index_char_string interface~pic_optional pic_optional proc~index_char_string->interface~pic_optional proc~maybe maybe proc~index_char_string->proc~maybe 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~~index_char_string~~CalledByGraph proc~index_char_string index_char_string interface~index index interface~index->proc~index_char_string

Source Code

elemental function index_char_string(string, substring, back) result(pos)
   character(len=*), intent(in) :: string
   type(string_type), intent(in) :: substring
   logical, intent(in), optional :: back
   integer :: pos

   pos = index(string, maybe(substring), pic_optional(back, .false.))

end function index_char_string