8.249 TRIM — Удаление хвостовых пробелов строки

Описание:

Удаляет хвостовые пробелы из строки.

Стандарт:

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

Класс:

Функция преобразования

Синтаксис:

RESULT = TRIM(STRING)

Аргументы:

STRING

Должна быть скалярным значением типа CHARACTER.

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

Скалярный тип CHARACTER, длина которого меньше длины STRING на количество хвостовых пробелов.

Пример:

PROGRAM test_trim
  CHARACTER(len=10), PARAMETER :: s = "GFORTRAN  "
  WRITE(*,*) LEN(s), LEN(TRIM(s))  ! "10 8", with/without trailing blanks
END PROGRAM

См. также:

ADJUSTL, ADJUSTR