index_string_char Function

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

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

Arguments

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

Return Value integer


Calls

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

Source Code

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

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

end function index_string_char