9.273 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