Hint Resolve fv_exp_open_exp_wrt_exp_rec_upper : lngen.
(* end hide *)

(* Specifications: *)
Lemma fv_exp_open_exp_wrt_exp_upper :
forall e1 e2,
fv_exp (open_exp_wrt_exp e1 e2) [<=] fv_exp e2 `union` fv_exp e1.
Lemma fv_exp_open_exp_wrt_exp_upper :
forall e1 e2,
fv_exp (open_exp_wrt_exp e1 e2) [<=] fv_exp e2 `union` fv_exp e1.