Manual Reference Pages - islower (3)

NAME

islower(3f) - [M_strings:COMPARE] returns .true. if character is a miniscule letter (a-z) (LICENSE:PD)

Synopsis
Description
Options
Returns
Example
Author
License

SYNOPSIS

elemental function islower(onechar)

    character,intent(in) :: onechar
    logical              :: islower

DESCRIPTION

islower(3f) returns .true. if character is a miniscule letter (a-z)

OPTIONS

onechar
character to test

RETURNS

islowe logical value returns true if character is a lowercase ASCII character else false.

EXAMPLE

Sample program

    program demo_islower
    use M_strings, only : islower
    implicit none
    integer                    :: i
    character(len=1),parameter :: string(*)=[(char(i),i=0,127)]
       write(*,’(15(g0,1x))’)’ISLOWER: ’, &
       & ichar(pack( string, islower(string) ))
       write(*,’(15(g0,1x))’)’ISLOWER: ’, &
       & pack( string, islower(string) )
    end program demo_islower

Results:

ISLOWER: 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 ISLOWER: a b c d e f g h i j k l m n o p q r s t u v w x y z

AUTHOR

John S. Urban

LICENSE

Public Domain

islower (3)

March 11, 2021

Generated by manServer 1.08 from ede1ab88-a15a-4861-b0fc-6b2003a1b6d2 using man macros.

[UP]