is_ascii Function

public elemental function is_ascii(c)

Checks whether or not c is in the ASCII character set - i.e. in the range 0 .. 0x7F.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: c

The character to test.

Return Value logical


Source Code

   elemental logical function is_ascii(c)
      character(len=1), intent(in) :: c
          !! The character to test.
      is_ascii = iachar(c) <= int(z'7F')
   end function is_ascii