8.120 ICHAR — Функция преобразования символа в целое число

Описание:

ICHAR(C) возвращает код символа в первой позиции символьной строки C в нативном наборе символов системы. Соответствие между символами и их кодами необязательно одинаково в различных реализациях GNU Fortran.

Стандарт:

Fortran 95 и более поздние версии, с аргументом KIND Fortran 2003 и более поздние версии

Класс:

Элементарная функция

Синтаксис:

RESULT = ICHAR(C [, KIND])

Аргументы:

C	Должен быть скалярным CHARACTER, с INTENT(IN)
KIND	(Необязательно) Выражение инициализации, указывающее параметр вида результата.

Возвращаемое значение:

Возвращаемое значение имеет тип INTEGER и вид KIND. Если KIND отсутствует, возвращаемое значение имеет стандартный целочисленный вид.

Пример:

program test_ichar
  integer i
  i = ichar(' ')
end program test_ichar

Указанные имена:

Имя	Аргумент	Тип возвращаемого значения	Стандарт
ICHAR(C)	CHARACTER C	INTEGER(4)	Fortran 77 и более поздние версии

Примечание:

Нет встроенной функции для преобразования между числовым значением и форматированным строковым представлением — например, учитывая CHARACTER значение '154', получение INTEGER или REAL значения со значением 154, или наоборот. Вместо этого эта функциональность предоставляется операциями ввода-вывода с внутренними файлами, как в следующем примере:

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

См. также:

ACHAR, CHAR, IACHAR