fact: Definition tmExtractConstr (def : ident) {A : Type} (a : A) := tmExtractConstr' (Some def) a.
imports: Ascii String Undecidability.L(Util.L_facts) MetaCoq(Template.All Template.Checker) Undecidability.Shared.Libs.PSL.Base MetaCoq.Utils.bytestring