Admitted.

Lemma xor_word_to_int: forall a0 a1 a2 a3 b0 b1 b2 b3,
Int.xor (word_to_int (a0, a1, a2, a3)) (word_to_int (b0, b1, b2, b3))
= word_to_int ((Int.xor a0 b0), (Int.xor a1 b1), (Int.xor a2 b2), (Int.xor a3 b3)).