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 [, KIND])
     | C | Shall be a scalar CHARACTER, withINTENT(IN) | 
| KIND | (Optional) An INTEGERinitialization
                      expression indicating the kind parameter of
		      the result. | 
INTEGER and of kind KIND. If
KIND is absent, the return value is of 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