Hint Rewrite @subst_andp subst_prop : subst.

(* Specifications: *)
Lemma eval_expr_Econst_int: forall {cs: compspecs}  i t, eval_expr (Econst_int i t) = `(Vint i).
Hint Rewrite subst_eval_var : subst.
Lemma subst_local: forall id v P,
subst id v (local P) = local (subst id v P).