TRIM Function

Description

The TRIM function omits trailing blanks from a character argument.

Syntax
 
TRIM (string)
 

Arguments

string is an INTENT(IN) scalar of type CHARACTER.

Result

The result is of the same type and kind as string. Its value and length are those of string with trailing blanks removed.

Example
       character(len=10) :: c="Howdy!    "
       write(*,*) len(c)        ! writes 10
       write(*,*) c,'end'       ! writes Howdy!    end
       write(*,*) len(trim(c))  ! writes 6
       write(*,*) trim(c),'end' ! writes Howdy!end