Removes trailing blank characters of a string.
Fortran 95 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