Section BDDreplacel_results.
Variable cfg : BDDconfig.
Variable ul : list ad.
Variable node : ad.
Variable lx ly : list BDDvar.
Hypothesis cfg_OK : BDDconfig_OK cfg.
Hypothesis ul_OK : used_list_OK cfg ul.
Hypothesis used : used_node' cfg ul node.
Hypothesis lxy_neq : ad_list_neq lx ly = true.

(* Specifications: *)
Lemma BDDreplacel_config_OK :
BDDconfig_OK (fst (BDDreplacel cfg ul node lx ly)).
Lemma BDDreplacel_node_OK :
config_node_OK (fst (BDDreplacel cfg ul node lx ly))
(snd (BDDreplacel cfg ul node lx ly)).
Lemma BDDreplacel_used_nodes_preserved :
used_nodes_preserved cfg (fst (BDDreplacel cfg ul node lx ly)) ul.
Lemma BDDreplacel_list_OK :
used_list_OK (fst (BDDreplacel cfg ul node lx ly)) ul.
Lemma BDDreplacel_list_OK_cons :
used_list_OK (fst (BDDreplacel cfg ul node lx ly))
(snd (BDDreplacel cfg ul node lx ly) :: ul).
Lemma BDDreplacel_is_replacel :
bool_fun_eq
(bool_fun_of_BDD (fst (BDDreplacel cfg ul node lx ly))
(snd (BDDreplacel cfg ul node lx ly)))
(bool_fun_replacel (bool_fun_of_BDD cfg node) lx ly).