isxdigit(3f) - [M_strings:COMPARE] returns .true. if character is a hexadecimal digit (0-9, a-f, or A-F). (LICENSE:PD)
Synopsis
Description
Options
Returns
Examples
Author
License
elemental function isxdigit(onechar)
character,intent(in) :: onechar logical :: isxdigit
isxdigit(3f) returns .true. if character is a hexadecimal digit (0-9, a-f, or A-F).
onechar character to test
isxdigit logical value returns true if character is a hexadecimal digit
Sample program
program demo_isxdigit use M_strings, only : isxdigit implicit none integer :: i character(len=1),parameter :: string(*)=[(char(i),i=0,127)] write(*,(40(a)))ISXDIGIT: ,pack( string, isxdigit(string) ) end program demo_isxdigitResults:
ISXDIGIT: 0123456789ABCDEFabcdef
John S. Urban
Public Domain
Nemo Release 3.1 | isxdigit (3m_strings) | January 10, 2025 |