doc-src/Tutorial/Misc/Exor.thy

export primitive netpairs;
activate attributes;

Exor = Main +
constdefs
 exor :: bool => bool => bool
"exor A B == (A & ~B) | (~A & B)"
end