let
term_mk_bwnot n a =
Bitvector
.mk_bitwise n a (
Bitvector
.mk_zero n) (
Bitvector
.mk_one n)