Hint Resolve fv_exp_subst_exp_fresh : lngen.
Hint Rewrite fv_exp_subst_exp_fresh using solve [auto] : lngen.
(* begin hide *)

(* Specifications: *)
Lemma fv_exp_subst_exp_lower_mutual :
(forall e1 e2 x1,
remove x1 (fv_exp e1) [<=] fv_exp (subst_exp e2 x1 e1)).
Lemma fv_exp_subst_exp_lower_mutual :
(forall e1 e2 x1,
remove x1 (fv_exp e1) [<=] fv_exp (subst_exp e2 x1 e1)).