Dos documentos:
function bitor(p1 number, p2 number) return number is
begin
return p1-bitand(p1,p2)+p2;
end;
function bitxor(p1 number, p2 number) return number is
begin
return bitor(p1,p2)-bitand(p1,p2);
end;
Para ver que eles funcionam, siga a lógica com apenas 0s e 1s para entrada, e não que não haja empréstimos ou cáries.
-- Markus Q