fact: Definition BDDsharing_OK (bs : BDDstate) (share : BDDsharing_map) := forall (x : BDDvar) (l r a : ad), BDDshare_lookup share x l r = Some a <-> MapGet _ bs a = Some (x, (l, r)).
imports: Bool Sumbool Arith ZArith NArith Nnat Ndec Ndigits IntMap(Allmaps) Wf_nat BDDvar_ad_nat