4 lines
106 B
Haskell
4 lines
106 B
Haskell
|
nand, xor :: Int -> Int -> Int
|
||
|
|
nand = (bnot.).band
|
||
|
|
xor a b = uncurry nand. (nand a &&& nand b) $ nand a b
|