Clicky
Showing changes from revision #1 to #2:
(追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)
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.
(削除) Fortan 95 and later, with (削除ここまで)(追記) Fortran 95 (追記ここまで)(追記) and later, with (追記ここまで)kind
argument(削除) Fortran (削除ここまで)(削除) 2003 (削除ここまで)(削除) and (削除ここまで)(削除) later (削除ここまで)(追記) Fortran 2003 (追記ここまで)(追記) and later (追記ここまで)
(削除) Elemental function (削除ここまで)(追記) Elemental function (追記ここまで)
result = ichar(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_ichar
integer i
i = ichar(' ')
end program test_ichar
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