blob: 037b7cb2ddd626cb9bc1379ecd387bfa4fc2949e (
plain)
1
2
3
4
5
6
7
8
9
|
Require Export Bool.
Lemma neg2xor : forall b, xorb true b = negb b.
Proof. auto. Qed.
Goal forall b1 b2, (negb b1 = b2) -> xorb true b1 = b2.
Proof.
intros b1 b2.
rewrite neg2xor.
|