UPCASE()

Fortran version:

    SUBROUTINE UPCASE( ASTRING )
    SUBROUTINE DOWNCASE( ASTRING )
        CHARACTER*(*), INTENT(INOUT) :: ASTRING    ! string to make into all caps

NO C version:

Summary:

Upcases (turns into ALL CAPS) or downcases (turns into lower-case) the contents of the Fortran character string ASTRING.

See also LUSTR() which does the composite adjust-left (i.e., remove leading blanks) and upcase operation and FIXNULLS() that removes trailing ASCII-nulls, replacing them with blanks.

Preconditions:

For Fortran-90 declarations and interface checking:

    USE M3UTILIO

Fortran Usage:

    ...
    CHARACTER*256  ASTRING
    ...
    ASTRING = 'sOmeThiNg WiERd'
    ...
    CALL UPCASE( ASTRING )   !  now ASTRING is all-caps: 'SOMETHING WIERD'
    ...

C Usage:

Don't. Instead, use standard library routines, e.g. toupper().

Previous: UNGRIDB

Up: Utility Routines

To: Models-3/EDSS I/O API: The Help Pages