Definition BDDvar_make := BDDmake gc cfg x BDDzero BDDone ul.

(* Specifications: *)
Lemma BDDvar_make_config_OK : BDDconfig_OK (fst BDDvar_make).
Lemma BDDvar_make_node_OK : config_node_OK (fst BDDvar_make) (snd BDDvar_make).
Lemma BDDvar_make_used_nodes_preserved : used_nodes_preserved cfg (fst BDDvar_make) ul.
Lemma BDDvar_make_list_OK : used_list_OK (fst BDDvar_make) ul.
Lemma BDDvar_make_list_OK_cons : used_list_OK (fst BDDvar_make) (snd BDDvar_make :: ul).
Lemma BDDvar_make_is_var : bool_fun_eq (bool_fun_of_BDD (fst BDDvar_make) (snd BDDvar_make)) (bool_fun_var x).