Очевидно, что нет логической версии побитового оператора исключающего или (^^^) ... что делать?
(^^^)
Это обеспечивается оператором неравенства <>.
<>
let inline xor a b = (a || b) && not (a && b)