let or_op = (n: nat): nat => Bitwise.or(n 4n);

let and_op = (n: nat): nat => Bitwise.and(n 7n);

let xor_op = (n: nat): nat => Bitwise.xor(n 7n);

let lsl_op = (n: nat): nat => Bitwise.shift_left(n 7n);

let lsr_op = (n: nat): nat => Bitwise.shift_right(n 7n);