(* begin hide *)
(* Compatibility *)
Notation absoption_andb := absorption_andb (only parsing).Notation absoption_orb := absorption_orb (only parsing).

Lemma implb_andb_distrib_r : forall b1 b2 b3:bool, implb b1 (b2 && b3) = implb b1 b2 && implb b1 b3.