iachar(c) returns the code for the ASCII character in the first character position of c.
Fortran 95 and later, with kind argument Fortran 2003 and later
result = iachar(c [, kind])
c - Shall be a scalar character, with intent(in)kind - (Optional) An integer initialization expression indicating the kind parameter of the result.The return value is of type integer and of kind kind. If kind is absent, the return value is of default integer kind.
program test_iachar
integer i
i = iachar(' ')
end program test_iachar
See ichar for a discussion of converting between numerical values and formatted string representations.