let bits_xor  _ = F.e_app2 "int_xor"