fact: Fixpoint df_ren ρ f := match f with | df_cst x n => df_cst (ρ x) n | df_eq x y => df_eq (ρ x) (ρ y) | df_op o x y z => df_op o (ρ x) (ρ y) (ρ z) | df_bin o f g => df_bin o f⦃ρ⦄ g⦃ρ⦄ | df_exst f => df_exst f⦃der_lift ρ⦄ end where "f ⦃ ρ ⦄" := (df_ren ρ f).
imports: Arith Nat ZArith Lia Undecidability.Shared.Libs.DLW.Utils(utils_tac gcd sums bounded_quantification)