Definition t := (nenv * nmem)%type.Definition eq (x y: t) :=
    NE.eq (fst x) (fst y) /\
    (forall ge sp b ofs, nlive ge sp (snd x) b ofs <-> nlive ge sp (snd y) b ofs).

Lemma eq_trans: forall x y z, eq x y -> eq y z -> eq x z.