veristar.list_denote veristar.heapresolve
veristar.model_type veristar.model.
Module Type SUBST_SOUND.
Declare Module VSD: VERISTAR_DEFS.

Axiom subst_expr_sound : forall i e e' s,
(subst_expr i e e' ==
match e' with Nil => Nil | Var x  => if Var.eq_dec i x then e else e'
end) s.