Manual Reference Pages  - isalpha (3m_strings)

NAME

isalpha(3f) - [M_strings:COMPARE] returns .true. if character is a letter and .false. otherwise (LICENSE:PD)

CONTENTS

Synopsis
Description
Options
Returns
Examples
Author
License

SYNOPSIS

elemental function isalpha(onechar)

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

DESCRIPTION

isalpha(3f) returns .true. if character is a letter and [char46]false. otherwise

OPTIONS

onechar
  character to test

RETURNS

isalpha
  logical value returns .true. if character is a ASCII letter or false otherwise.

EXAMPLES

Sample program

    program demo_isalpha
    use M_strings, only : isalpha
    implicit none
    integer                    :: i
    character(len=1),parameter :: string(*)=[(char(i),i=0,127)]
       write(*,’(40(a))’)’ISGRAPH: ’,pack( string, isalpha(string) )
    end program demo_isalpha

Results:

   ISGRAPH: ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklm
   nopqrstuvwxyz

AUTHOR

John S. Urban

LICENSE

Public Domain


Nemo Release 3.1 isalpha (3m_strings) July 20, 2024
Generated by manServer 1.08 from e90d49d6-3621-4915-86b7-6b2d469cf119 using man macros.