evaluate_string

Definition

String module

Methods

is_letter()

pure logical function, public is_letter

(

character(1), intent(in)

ch

)

Check if the character is a letter.

Parameters

[in]

ch

input character

Returns

logical. .true. if the character is a letter, .false. otherwise.

Examples

character(*), parameter :: input = 'abcd'
integer :: i 
do i = 1, 4
    if (is_letter(input(i:i))) then
        print*, input(i:i)
    end if
end do

Remarks

Definition at line 30 of file String.f90.

uppercase()

pure character(len_trim(str)) function, public uppercase

(

character(*), intent(in)

str

)

Convert string to upper caseparam[in] str input string.

Returns

character(*). A string with uppercase characters.

Examples

character(*), parameter :: input = 'test'
character(:), allocatable :: output
output = uppercase(input)
if (output == 'TEST') print*, 'OK'

Remarks

Definition at line 59 of file String.f90.