W3cubDocs

/GNU Fortran 10

9.143 ICHAR — Character-to-integer conversion function

Description:

ICHAR(C) returns the code for the character in the first character position of C in the system’s native character set. The correspondence between characters and their codes is not necessarily the same across different GNU Fortran implementations.

Standard:

Fortran 77 and later, with KIND argument Fortran 2003 and later

Class:

Elemental function

Syntax:

RESULT = ICHAR(C [, KIND])

Arguments:
C Shall be a scalar CHARACTER, with INTENT(IN)
KIND (Optional) An INTEGER initialization expression indicating the kind parameter of the result.
Return value:

The return value is of type INTEGER and of kind KIND. If KIND is absent, the return value is of default integer kind.

Example:
program test_ichar
  integer i
  i = ichar(' ')
end program test_ichar
Specific names:
Name Argument Return type Standard
ICHAR(C) CHARACTER C INTEGER(4) Fortran 77 and later
Note:

No intrinsic exists to convert between a numeric value and a formatted character string representation – for instance, given the CHARACTER value '154', obtaining an INTEGER or REAL value with the value 154, or vice versa. Instead, this functionality is provided by internal-file I/O, as in the following example:

program read_val
  integer value
  character(len=10) string, string2
  string = '154'
  
  ! Convert a string to a numeric value
  read (string,'(I10)') value
  print *, value
  
  ! Convert a value to a formatted string
  write (string2,'(I10)') value
  print *, string2
end program read_val
See also:

ACHAR, CHAR, IACHAR

Next: , Previous: , Up: Intrinsic Procedures [Contents][Index]

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-10.2.0/gfortran/ICHAR.html