fact: Fixpoint envSubst_lift (Q: EnvSubst) (n: nat) : EnvSubst := match n with | 0 => Q | S x => envSubst_lift1 (envSubst_lift Q x) end.
imports: CoLoR(RelExtras ListPermutation TermsPos ListUtil ListExtras LogicUtil) Coq(Compare_dec Setoid Morphisms Lia PeanoNat)