upper Function

  1. Strings_M.F90
  2. FU_Strings
  3. upper

public pure function upper(str) result(res)

Converts a string to uppercase characters. It works with this dataset: 'aáäàâbcdeéëèêfghiíïìîjklmnñoóöòôpqrstuúüùûvwxyz'

Syntax

 t = upper(str)

Where:

  • str: String to convert to uppercase characters.

It returns the string converted to uppercase characters.

Example

The following program converts a string to uppercase:

 PROGRAM upperExample
    USE FU_Strings, ONLY: upper
    IMPLICIT NONE
    CHARACTER(LEN=:), ALLOCATABLE :: text
    CHARACTER(LEN=:), ALLOCATABLE :: modified_text
    text = "Lorem ipsum dolor sit amet, consectetur adipiscing elit, &
       &sed do eiusmod tempor incididunt ut labore et dolore magna al&
       &iqua. Ut enim ad minim veniam, quis nostrud exercitation ulla&
       &mco laboris nisi ut aliquip ex ea commodo consequat. Duis aut&
       &e irure dolor in reprehenderit in voluptate velit esse cillum&
       & dolore eu fugiat nulla pariatur. Excepteur sint occaecat cup&
       &idatat non proident, sunt in culpa qui officia deserunt molli&
       &t anim id est laborum."
    modified_text = upper(text)
    WRITE(*,*) modified_text
 END PROGRAM upperExample

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: str

String to convert to uppercase characters.

Return Value character(len=:), ALLOCATABLE

String converted to uppercase characters.


Contents