Hint Resolve size_exp_open_exp_wrt_exp_var : lngen.
Hint Rewrite size_exp_open_exp_wrt_exp_var using solve [auto] : lngen.
(* *********************************************************************** *)
(** * Theorems about [degree] *)
Ltac default_auto ::= auto with lngen; tauto.
Ltac default_autorewrite ::= fail.
(* begin hide *)

Lemma degree_exp_wrt_exp_S_mutual :
(forall n1 e1,
degree_exp_wrt_exp n1 e1 ->
degree_exp_wrt_exp (S n1) e1).