chomp_set_string_char Function

private pure function chomp_set_string_char(string, set) result(chomped_string)

Uses

  • proc~~chomp_set_string_char~~UsesGraph proc~chomp_set_string_char chomp_set_string_char module~pic_string_type pic_string_type proc~chomp_set_string_char->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 trailing characters in set from string.

Arguments

Type IntentOptional Attributes Name
type(string_type), intent(in) :: string
character(len=1), intent(in) :: set(:)

Return Value type(string_type)


Calls

proc~~chomp_set_string_char~~CallsGraph proc~chomp_set_string_char chomp_set_string_char interface~chomp chomp proc~chomp_set_string_char->interface~chomp interface~chomp->proc~chomp_set_string_char proc~chomp_char chomp_char interface~chomp->proc~chomp_char proc~chomp_set_char_char chomp_set_char_char interface~chomp->proc~chomp_set_char_char proc~chomp_string chomp_string interface~chomp->proc~chomp_string proc~chomp_substring_char_char chomp_substring_char_char interface~chomp->proc~chomp_substring_char_char proc~chomp_substring_char_string chomp_substring_char_string interface~chomp->proc~chomp_substring_char_string proc~chomp_substring_string_char chomp_substring_string_char interface~chomp->proc~chomp_substring_string_char proc~chomp_substring_string_string chomp_substring_string_string interface~chomp->proc~chomp_substring_string_string proc~set_to_string set_to_string proc~chomp_set_char_char->proc~set_to_string proc~chomp_substring_char_string->interface~chomp proc~chomp_substring_string_char->interface~chomp proc~chomp_substring_string_string->interface~chomp

Called by

proc~~chomp_set_string_char~~CalledByGraph proc~chomp_set_string_char chomp_set_string_char interface~chomp chomp proc~chomp_set_string_char->interface~chomp interface~chomp->proc~chomp_set_string_char proc~chomp_substring_char_string chomp_substring_char_string interface~chomp->proc~chomp_substring_char_string proc~chomp_substring_string_char chomp_substring_string_char interface~chomp->proc~chomp_substring_string_char proc~chomp_substring_string_string chomp_substring_string_string interface~chomp->proc~chomp_substring_string_string proc~chomp_substring_char_string->interface~chomp proc~chomp_substring_string_char->interface~chomp proc~chomp_substring_string_string->interface~chomp

Source Code

   pure function chomp_set_string_char(string, set) result(chomped_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
      character(len=1), intent(in) :: set(:)
      type(string_type) :: chomped_string

      chomped_string = chomp(char(string), set)
   end function chomp_set_string_char