Gz:logxor
- 構文
- (gz:logxor int1 int2)
- 機能
- 整数1,2 のビット方式の XOR(排他的論理和)の結果を返す。
- 引数
-
- int1 : 整数。
- int1 : 整数。
- 戻り値
- 整数。
- サンプル
(gz:logxor 0 0) 0 (gz:logxor 1 1) 0 (gz:logxor 1 0) 1 (gz:logxor 0 1) 1 ; int1, int2を足して2で割った値の余りと同じなので偶数奇数判定できたり (setq i1 128 i2 128) (if (zerop (gz:logxor i1 i2)) (princ "\n偶数") (princ "\n奇数") ) (if (zerop (rem (+ i1 i2) 2)) (princ "\n偶数") (princ "\n奇数") )
関連事項