8.10 ADJUSTR — Right adjust a string

Описание:

ADJUSTR(STRING) будет выравнивать строку по правому краю, удаляя trailing-пробелы. Пробелы вставляются в начале строки по мере необходимости.

Стандарт:

Fortran 90 и более поздние версии

Класс:

Элементарная функция

Синтаксис:

RESULT = ADJUSTR(STRING)

Аргументы:

STR	Тип должен быть CHARACTER.

Возвращаемое значение:

Возвращаемое значение имеет тип CHARACTER и того же вида, что и STRING, где trailing-пробелы удалены, а то же количество пробелов вставлено в начало STRING.

Пример:

program test_adjustr
  character(len=20) :: str = 'gfortran'
  str = adjustr(str)
  print *, str
end program test_adjustr

См. также:

ADJUSTL, TRIM