stdlib_ascii

See also the specification page: stdlib_ascii.

stdlib_ascii (module)

The stdlib_ascii module provides procedures for handling and manipulating intrinsic character variables and constants.

The specification of this module is available here.

Variables

NULcharacter(len=1), parameter, Default = achar(int(z’00’))

Null

SOHcharacter(len=1), parameter, Default = achar(int(z’01’))

Start of heading

STXcharacter(len=1), parameter, Default = achar(int(z’02’))

Start of text

ETXcharacter(len=1), parameter, Default = achar(int(z’03’))

End of text

EOTcharacter(len=1), parameter, Default = achar(int(z’04’))

End of transmission

ENQcharacter(len=1), parameter, Default = achar(int(z’05’))

Enquiry

ACKcharacter(len=1), parameter, Default = achar(int(z’06’))

Acknowledge

BELcharacter(len=1), parameter, Default = achar(int(z’07’))

Bell

BScharacter(len=1), parameter, Default = achar(int(z’08’))

Backspace

TABcharacter(len=1), parameter, Default = achar(int(z’09’))

Horizontal tab

LFcharacter(len=1), parameter, Default = achar(int(z’0A’))

NL line feed, new line

VTcharacter(len=1), parameter, Default = achar(int(z’0B’))

Vertical tab

FFcharacter(len=1), parameter, Default = achar(int(z’0C’))

NP form feed, new page

CRcharacter(len=1), parameter, Default = achar(int(z’0D’))

Carriage return

SOcharacter(len=1), parameter, Default = achar(int(z’0E’))

Shift out

SIcharacter(len=1), parameter, Default = achar(int(z’0F’))

Shift in

DLEcharacter(len=1), parameter, Default = achar(int(z’10’))

Data link escape

DC1character(len=1), parameter, Default = achar(int(z’11’))

Device control 1

DC2character(len=1), parameter, Default = achar(int(z’12’))

Device control 2

DC3character(len=1), parameter, Default = achar(int(z’13’))

Device control 3

DC4character(len=1), parameter, Default = achar(int(z’14’))

Device control 4

NAKcharacter(len=1), parameter, Default = achar(int(z’15’))

Negative acknowledge

SYNcharacter(len=1), parameter, Default = achar(int(z’16’))

Synchronous idle

ETBcharacter(len=1), parameter, Default = achar(int(z’17’))

End of transmission block

CANcharacter(len=1), parameter, Default = achar(int(z’18’))

Cancel

EMcharacter(len=1), parameter, Default = achar(int(z’19’))

End of medium

SUBcharacter(len=1), parameter, Default = achar(int(z’1A’))

Substitute

ESCcharacter(len=1), parameter, Default = achar(int(z’1B’))

Escape

FScharacter(len=1), parameter, Default = achar(int(z’1C’))

File separator

GScharacter(len=1), parameter, Default = achar(int(z’1D’))

Group separator

RScharacter(len=1), parameter, Default = achar(int(z’1E’))

Record separator

UScharacter(len=1), parameter, Default = achar(int(z’1F’))

Unit separator

DELcharacter(len=1), parameter, Default = achar(int(z’7F’))

Delete

fullhex_digitscharacter(len=*), parameter, Default = “0123456789ABCDEFabcdef”

0 .. 9A .. Fa .. f

hex_digitscharacter(len=*), parameter, Default = fullhex_digits(1:16)

0 .. 9A .. F

lowerhex_digitscharacter(len=*), parameter, Default = “0123456789abcdef”

0 .. 9a .. f

digitscharacter(len=*), parameter, Default = hex_digits(1:10)

0 .. 9

octal_digitscharacter(len=*), parameter, Default = digits(1:8)

0 .. 7

letterscharacter(len=*), parameter, Default = “ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz”

A .. Za .. z

uppercasecharacter(len=*), parameter, Default = letters(1:26)

A .. Z

lowercasecharacter(len=*), parameter, Default = letters(27:)

a .. z

whitespacecharacter(len=*), parameter, Default = “ “//TAB//VT//CR//LF//FF

ASCII _whitespace

Procedures

is_alpha (function)

elemental function is_alpha(c) -> is_alpha

Checks whether c is an ASCII letter (A .. Z, a .. z).

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_alphalogical

is_alphanum (function)

elemental function is_alphanum(c) -> is_alphanum

Checks whether c is a letter or a number (0 .. 9, a .. z, A .. Z).

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_alphanumlogical

is_ascii (function)

elemental function is_ascii(c) -> is_ascii

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

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_asciilogical

is_control (function)

elemental function is_control(c) -> is_control

Checks whether c is a control character.

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_controllogical

is_digit (function)

elemental function is_digit(c) -> is_digit

Checks whether c is a digit (0 .. 9).

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_digitlogical

is_octal_digit (function)

elemental function is_octal_digit(c) -> is_octal_digit

Checks whether c is a digit in base 8 (0 .. 7).

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_octal_digitlogical

is_hex_digit (function)

elemental function is_hex_digit(c) -> is_hex_digit

Checks whether c is a digit in base 16 (0 .. 9, A .. F, a .. f).

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_hex_digitlogical

is_punctuation (function)

elemental function is_punctuation(c) -> is_punctuation

Checks whether or not c is a punctuation character. That includes all ASCII characters which are not control characters, letters, digits, or whitespace.

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_punctuationlogical

is_graphical (function)

elemental function is_graphical(c) -> is_graphical

Checks whether or not c is a printable character other than the space character.

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_graphicallogical

is_printable (function)

elemental function is_printable(c) -> is_printable

Checks whether or not c is a printable character - including the space character.

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_printablelogical

is_lower (function)

elemental function is_lower(c) -> is_lower

Checks whether c is a lowercase ASCII letter (a .. z).

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_lowerlogical

is_upper (function)

elemental function is_upper(c) -> is_upper

Checks whether c is an uppercase ASCII letter (A .. Z).

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_upperlogical

is_white (function)

elemental function is_white(c) -> is_white

Checks whether or not c is a whitespace character. That includes the space, tab, vertical tab, form feed, carriage return, and linefeed characters.

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_whitelogical

is_blank (function)

elemental function is_blank(c) -> is_blank

Checks whether or not c is a blank character. That includes the only the space and tab characters

Arguments:

ccharacter(len=1), intent(in)

The character to test.

Returns:

is_blanklogical

to_lower (function)

elemental function to_lower(string) -> lower_string

Convert character variable to lower case (Specification: stdlib_ascii)

Version: experimental

Arguments:

stringcharacter(len=*), intent(in)

Returns:

lower_stringcharacter(len=len)

to_upper (function)

elemental function to_upper(string) -> upper_string

Convert character variable to upper case (Specification: stdlib_ascii)

Version: experimental

Arguments:

stringcharacter(len=*), intent(in)

Returns:

upper_stringcharacter(len=len)

to_title (function)

elemental function to_title(string) -> title_string

Converts character sequence to title case (Specification: stdlib_ascii)

Version: experimental

Arguments:

stringcharacter(len=*), intent(in)

Returns:

title_stringcharacter(len=len)

to_sentence (function)

elemental function to_sentence(string) -> sentence_string

Converts character sequence to sentence case (Specification: stdlib_ascii)

Version: experimental

Arguments:

stringcharacter(len=*), intent(in)

Returns:

sentence_stringcharacter(len=len)

reverse (function)

elemental function reverse(string) -> reverse_string

Reverse the character order in the input character variable (Specification: stdlib_ascii)

Version: experimental

Arguments:

stringcharacter(len=*), intent(in)

Returns:

reverse_stringcharacter(len=len)