fact: Definition lift env := (fun n => match n with 0 => 0 | S n => S (env n) end).
imports: Ascii String Undecidability.L(Util.L_facts) MetaCoq(Template.All Template.Checker) Undecidability.Shared.Libs.PSL.Base MetaCoq.Utils.bytestring