8.153 IPARITY — Побитовое XOR элементов массива

Описание:

Выполняет побитовое XOR (исключающее ИЛИ) над элементами МАССИВ по размерности РАЗМЕР, если соответствующий элемент в МАСКА равен TRUE.

Стандарт:

Fortran 2008 и позже

Класс:

Функция преобразования

Синтаксис:

RESULT = IPARITY(ARRAY[, MASK])

RESULT = IPARITY(ARRAY, DIM[, MASK])

Аргументы:

`МАССИВ`	Должен быть массивом типа `INTEGER`
`РАЗМЕР`	(Необязательно) должен быть скаляром типа `INTEGER` со значением в диапазоне от 1 до n, где n равно рангу `МАССИВ`.
`МАСКА`	(Необязательно) должен быть типа `LOGICAL` и либо скаляром, либо массивом той же формы, что и `МАССИВ`.

Значение возврата:

Результат имеет тот же тип, что и МАССИВ.

Если РАЗМЕР отсутствует, возвращается скаляр с побитовым XOR всех элементов в МАССИВ. В противном случае возвращается массив ранга n-1, где n равно рангу МАССИВ, и форма, аналогичная форме МАССИВ с исключенной размерностью РАЗМЕР.

Пример:

PROGRAM test_iparity
  INTEGER(1) :: a(2)

  a(1) = int(b'00100100', 1)
  a(2) = int(b'01101010', 1)

  ! prints 01001110
  PRINT '(b8.8)', IPARITY(a)
END PROGRAM

См. также:

IANY — Побитовое ИЛИ элементов массива, IALL — Побитовое И элементов массива, IEOR — Побитовое логическое исключающее ИЛИ, PARITY — Редукция с исключающим ИЛИ

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-13.3.0/gfortran/IPARITY.html