selected_char_kind(3f) - [FORTRAN:INTRINSIC] Choose character kind
Syntax
Description
Arguments
Example
Standard
Class
result = selected_char_kind(name)
selected_char_kind(name) returns the kind value for the character set named NAME, if a character set with such a name is supported, or -1 otherwise. Currently, supported character sets include "ASCII"
and "DEFAULT", which are equivalent, and "ISO_10646" (Universal Character Set, UCS-4) which is commonly known as Unicode.
NAME - Shall be a scalar and of the default character type.
Sample program:
program demo_selected_char_kind use iso_fortran_env implicit none integer, parameter :: ascii = selected_char_kind ("ascii") integer, parameter :: ucs4 = selected_char_kind (ISO_10646)character(kind=ascii, len=26) :: alphabet character(kind=ucs4, len=30) :: hello_world
alphabet = ascii_"abcdefghijklmnopqrstuvwxyz" hello_world = ucs4_Hello World and Ni Hao -- & // char (int (z4F60), ucs4) & // char (int (z597D), ucs4)
write (*,*) alphabet
open (output_unit, encoding=UTF-8) write (*,*) trim (hello_world) end program demo_selected_char_kind
[[Fortran 2003]] and later
Transformational function
selected_char_kind (3) | March 19, 2019 |