achar(x, kind): To Character in ASCII set.¶

Character represented by in the ASCII character set.

Declaration¶

retval = achar(x, kind)
character(len=1) elemental function achar(x, kind)

x: the input value of integer type. kind: an optional input value of type integer constant expression for initialization.

The return value is of type character of length 1.

The return value is of kind kind if optional input value is passed, otherwise the kind is default kind.

achar(x, kind) returns the character represented by the ASCII character set at x position.

If x is outside the ASCII character set integer value, i.e., if x is not represented in the ASCII character set, the return value is undefined.

It is a runtime builtin function.

Supported argument type is integer.

interface

character(len=1) function achar(x, kind)
    integer, intent(in) :: x
	integer, optional :: kind
end function

end interface

program intrinsics_achar
    implicit none
    character :: exclamation = achar(33)
    print *, exclamation
end program

Resultado: