strip_string Function

private pure function strip_string(string) result(stripped_string)

Uses

  • proc~~strip_string~~UsesGraph proc~strip_string strip_string module~pic_string_type pic_string_type proc~strip_string->module~pic_string_type module~pic_ascii pic_ascii module~pic_string_type->module~pic_ascii module~pic_optional_value pic_optional_value module~pic_string_type->module~pic_optional_value module~pic_types pic_types module~pic_string_type->module~pic_types module~pic_ascii->module~pic_types module~pic_optional_value->module~pic_types iso_c_binding iso_c_binding module~pic_types->iso_c_binding iso_fortran_env iso_fortran_env module~pic_types->iso_fortran_env

Remove leading and trailing whitespace characters.

Arguments

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

Return Value type(string_type)


Calls

proc~~strip_string~~CallsGraph proc~strip_string strip_string interface~strip strip proc~strip_string->interface~strip interface~strip->proc~strip_string proc~strip_char strip_char interface~strip->proc~strip_char

Called by

proc~~strip_string~~CalledByGraph proc~strip_string strip_string interface~strip strip proc~strip_string->interface~strip interface~strip->proc~strip_string

Source Code

   pure function strip_string(string) result(stripped_string)
      ! Avoid polluting the module scope and use the assignment only in this scope
      use pic_string_type, only: assignment(=)
      type(string_type), intent(in) :: string
      type(string_type) :: stripped_string

      stripped_string = strip(char(string))
   end function strip_string