Next: TTYNAM, Previous: TRANSPOSE, Up: Intrinsic Procedures [Contents][Index]
TRIM
— Remove trailing blank characters of a stringRemoves trailing blank characters of a string.
Fortran 90 and later
Transformational function
RESULT = TRIM(STRING)
STRING | Shall be a scalar of type CHARACTER . |
A scalar of type CHARACTER
which length is that of STRING
less the number of trailing blanks.
PROGRAM test_trim CHARACTER(len=10), PARAMETER :: s = "GFORTRAN " WRITE(*,*) LEN(s), LEN(TRIM(s)) ! "10 8", with/without trailing blanks END PROGRAM