Next: IDATE, Previous: IBSET, Up: Intrinsic Procedures
ICHAR
— Character-to-integer conversion functionICHAR(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.
RESULT = ICHAR(C)
C | Shall be a scalar CHARACTER , with INTENT(IN)
|
INTEGER
and of the default integer
kind.
program test_ichar integer i i = ichar(' ') end program test_ichar
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