End LOCATIONS.
(** * The lattice for dataflow analysis *)
Module NA <: SEMILATTICE.
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 beq_correct: forall x y, beq x y = true -> eq x y.
Definition ge (x y: t) : Prop :=
NE.ge (fst x) (fst y) /\
(forall ge sp b ofs, nlive ge sp (snd y) b ofs -> nlive ge sp (snd x) b ofs).