Hint Immediate degree_exp_wrt_exp_open_exp_wrt_exp_rec_inv : lngen.
(* end hide *)

(* Specifications: *)
Lemma degree_exp_wrt_exp_open_exp_wrt_exp_inv :
forall e1 e2,
degree_exp_wrt_exp 0 (open_exp_wrt_exp e1 e2) ->
degree_exp_wrt_exp 1 e1.
Lemma degree_exp_wrt_exp_open_exp_wrt_exp_inv :
forall e1 e2,
degree_exp_wrt_exp 0 (open_exp_wrt_exp e1 e2) ->
degree_exp_wrt_exp 1 e1.