(** Check that we avoid an extraction error that came up in PR #14174 in metacoq *) RequireImport Corelib.extraction.ExtrOcamlBasic. Module A.
Include Corelib.Init.Specif. End A.
Recursive Extraction A. (* Avoding Error: Theinformativeinductivetypesig2hasaPropinstance inA.eq_sig2_rec_uncurried(orinitsmutualblock). Thishappenswhenasort-polymorphicsingletoninductivetype haslogicalparameters,suchas(I,I):(True*True):Prop. TheOcamlextractioncannothandlethissituationyet. Instead,useasort-monomorphictypesuchas(True/\True) orextracttoHaskell.
*)
Messung V0.5 in Prozent
¤ Dauer der Verarbeitung: 0.12 Sekunden
(vorverarbeitet am 2026-09-29)
¤