ADJUSTR

Elemental Intrinsic Function (Generic): Adjusts a character string to the right, removing trailing blanks and inserting leading blanks.

Syntax

result = ADJUSTR (string)

string
(Input) Must be of type character.

Results

The result type is character with the same length and kind parameter as string.

The value of the result is the same as string, except that any trailing blanks have been removed and inserted as leading blanks.

See Also: ADJUSTL

Example

  CHARACTER(16) STRING
  STRING= ADJUSTR('   Fortran 90   ') ! returns '     Fortran 90'

  ADJUSTR ('SUMMERTIME    ')     ! has the value '    SUMMERTIME'