8.283 XOR — Поразрядное логическое исключающее ИЛИ

Описание:

Поразрядное логическое исключающее ИЛИ.

Эта встроенная функция предоставляется для обратной совместимости с GNU Fortran 77. Для целочисленных аргументов программисты должны рассмотреть использование функции IEOR — Поразрядное логическое исключающее ИЛИ и для логических аргументов оператор .NEQV., которые оба определены стандартом Fortran.

Стандарт:

Расширение GNU

Класс:

Функция

Синтаксис:

RESULT = XOR(I, J)

Аргументы:

I Тип должен быть либо скалярным типом INTEGER или скалярным типом LOGICAL или боз-литеральной константой.

J Тип должен быть таким же, как тип I, или боз-литеральной константой. I и J не должны быть одновременно боз-литеральными константами. Если хотя бы один из I и J является боз-литеральной константой, то другой аргумент должен быть скалярным типом INTEGER.

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

Возвращаемый тип — либо скалярный тип INTEGER или скалярный тип LOGICAL. Если параметры типа kind отличаются, то тип с меньшим kind неявно преобразуется к типу с большим kind, и возвращаемое значение имеет больший kind. Боз-литеральная константа преобразуется в тип INTEGER с параметром kind другого аргумента, как если бы был выполнен вызов INT — Преобразование к целочисленному типу.

Пример:

PROGRAM test_xor
  LOGICAL :: T = .TRUE., F = .FALSE.
  INTEGER :: a, b
  DATA a / Z'F' /, b / Z'3' /

  WRITE (*,*) XOR(T, T), XOR(T, F), XOR(F, T), XOR(F, F)
  WRITE (*,*) XOR(a, b)
END PROGRAM

См. также:

Элементарная функция Fortran 95: IEOR — Поразрядное логическое исключающее ИЛИ

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