Definition BDDvar_le := Nleb.Definition BDDvar_max (x y : BDDvar) := if BDDvar_le x y then y else x.

Lemma BDDcompare_max_1_2 : forall x1 x2 y1 y2 : BDDvar, BDDcompare x1 x2 = Datatypes.Lt -> BDDcompare y1 y2 = Datatypes.Lt -> BDDcompare (BDDvar_max x1 y1) (BDDvar_max x2 y2) = Datatypes.Lt.