Definition BDDuniv :=
  BDDuniv_1 gc cfg ul node y (S (nat_of_N (node_height cfg node))).

Lemma BDDuniv_is_univ : bool_fun_eq (bool_fun_of_BDD (fst BDDuniv) (snd BDDuniv)) (bool_fun_forall y (bool_fun_of_BDD cfg node)).