ADJUSTR
— Right adjust a stringADJUSTR(STRING)
will right adjust a string by removing trailing spaces.
Spaces are inserted at the start of the string as needed.
RESULT = ADJUSTR(STRING)
STR | The type shall be CHARACTER .
|
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