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 is of type 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.

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

See Also: ADJUSTL

Example

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

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