8.9 ADJUSTR — Выравнивание строки по правому краю

Описание:

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

Стандарт:

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

Класс:

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

Синтаксис:

RESULT = ADJUSTR(STRING)

Аргументы:

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

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

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

Пример:

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

См. также:

ADJUSTL, TRIM