Fortran Wiki
trim (Rev #1, changes)

Showing changes from revision #0 to #1: (追記) Added (追記ここまで) | ~~(削除) Removed (削除ここまで)~~ | ~~(削除) Chan (削除ここまで)~~(追記) ged (追記ここまで)

Description

Removes trailing blank characters of a string.

Standard

Fortran 95 and later

Class

Transformational function

Syntax

result = trim(string)

Arguments

string - Shall be a scalar of type character.

Return value

A scalar of type character which length is that of string less the number of trailing blanks.

Example

program test_trim
 character(len=10), parameter :: s = "gfortran "
 write(*,*) len(s), len(trim(s)) ! "10 8", with/without trailing blanks
end program

Fortran Wiki trim (Rev #1, changes)