fact: Definition BDDmake (cfg : BDDconfig) (x : BDDvar) (l r : ad) := if N.eqb l r then (cfg, l) else match cfg with | (bs, (share, counter)) => match BDDshare_lookup share x l r with | Some y => (cfg, y) | None => BDDalloc cfg x l r end end.
imports: Bool Sumbool Arith ZArith NArith Nnat Ndec Ndigits IntMap(Allmaps) Wf_nat BDDvar_ad_nat