char_string_pos Function

private elemental function char_string_pos(string, pos) result(character_string)

Return the character sequence represented by the string.

Arguments

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

Return Value character(len=1)


Called by

proc~~char_string_pos~~CalledByGraph proc~char_string_pos char_string_pos interface~char char interface~char->proc~char_string_pos

Source Code

elemental function char_string_pos(string, pos) result(character_string)
   type(string_type), intent(in) :: string
   integer, intent(in) :: pos
   character(len=1) :: character_string

   character_string = merge(string%raw(pos:pos), ' ', allocated(string%raw))

end function char_string_pos