Formal Verification of Hardware Components in Critical Systems

Listing 13

Proof of absorption law (sum).

(1)	Lemma absorption_sum: x y, x xy x.
(2)	Proof.
(3)	intros.
(4)	pattern x at 1.
(5)	rewrite pos_identity_prod.
(6)	rewrite pos_dist_over_sum.
(7)	rewrite pos_comm_sum.
(8)	rewrite identity_sum_1.
(9)	rewrite pos_identity_prod.
(10)	auto.
(11)	Qed.