len_string Function

private elemental function len_string(string) result(length)

Returns the length of the character sequence represented by the string.

Arguments

Type IntentOptional Attributes Name
type(string_type), intent(in) :: string

Return Value integer


Called by

proc~~len_string~~CalledByGraph proc~len_string len_string interface~slen slen interface~slen->proc~len_string proc~iachar_string iachar_string proc~iachar_string->interface~slen proc~ichar_string ichar_string proc~ichar_string->interface~slen proc~to_c_char_from_string to_c_char_from_string proc~to_c_char_from_string->interface~slen proc~write_unformatted write_unformatted proc~write_unformatted->interface~slen interface~iachar iachar interface~iachar->proc~iachar_string interface~ichar ichar interface~ichar->proc~ichar_string interface~to_c_char to_c_char interface~to_c_char->proc~to_c_char_from_string interface~write (unformatted) write (unformatted) interface~write (unformatted)->proc~write_unformatted

Source Code

elemental function len_string(string) result(length)
   type(string_type), intent(in) :: string
   integer :: length

   if (allocated(string%raw)) then
      length = len(string%raw)
   else
      length = 0
   end if

end function len_string