(* croissance des fonctions and et or *)

(* Specifications: *)
Lemma andb_inc_r :
forall b b0 b1 : bool, leb b0 b1 -> leb (b && b0) (b && b1).
Lemma andb_inc_l :
forall b b0 b1 : bool, leb b0 b1 -> leb (b0 && b) (b1 && b).
Lemma orb_inc_r : forall b b0 b1 : bool, leb b0 b1 -> leb (b || b0) (b || b1).
Lemma orb_inc_l : forall b b0 b1 : bool, leb b0 b1 -> leb (b0 || b) (b1 || b).
Lemma andb_incr :
forall b0 b1 b2 b3 : bool,
leb b0 b1 -> leb b2 b3 -> leb (b0 && b2) (b1 && b3).
Lemma orb_incr :
forall b0 b1 b2 b3 : bool,
leb b0 b1 -> leb b2 b3 -> leb (b0 || b2) (b1 || b3).