X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_extraction%2Fextraction.mli;h=68af61187f21d235e92393da331142dcc3509e9f;hb=ab2c76206276daec9863e1c385e8f27a7f899242;hp=a5ab1b05545d4464171e1f455e99b98eb2bf7292;hpb=18c1584b94ad85301a95b69fe0a8fa8e02b61648;p=helm.git

diff --git a/matita/components/ng_extraction/extraction.mli b/matita/components/ng_extraction/extraction.mli
index a5ab1b055..68af61187 100644
--- a/matita/components/ng_extraction/extraction.mli
+++ b/matita/components/ng_extraction/extraction.mli
@@ -10,10 +10,8 @@
 
 (*s Extraction from Coq terms to Miniml. *)
 
-open Coq
 open Miniml
-open OcamlExtractionTable
 
 val extract:
- #OcamlExtractionTable.status as 'status -> NCic.obj ->
+ (#OcamlExtractionTable.status as 'status) -> NCic.obj ->
   'status * ml_decl list * ml_spec list