fact: Fixpoint context_to_bcontext (ctx : context) : list aname := match ctx with | [] => [] | mkdecl a b c :: L => a :: context_to_bcontext L end.
imports: Ascii String Undecidability.L(Util.L_facts) MetaCoq(Template.All Template.Checker) Undecidability.Shared.Libs.PSL.Base MetaCoq.Utils.bytestring