ADJUSTR(STRING)
will right adjust a string by removing trailing spaces. Spaces are inserted at the start of the string as needed.
Fortran 95 and later
Elemental function
RESULT = ADJUSTR(STRING)
STR | The type shall be CHARACTER . |
The return value is of type CHARACTER
and of the same kind as STRING where trailing spaces are removed and the same number of spaces are inserted at the start of STRING.
program test_adjustr character(len=20) :: str = 'gfortran' str = adjustr(str) print *, str end program test_adjustr
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-7.2.0/gfortran/ADJUSTR.html