X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fcomponents%2Fng_extraction%2Fcommon.mli;h=96550bd4d5a87d5fb0bc5be47a0da1b65832fb71;hb=647504aa72b84eb49be8177b88a9254174e84d4b;hp=4bde847ac77e76fdf2b75778d594b253483b7d7d;hpb=95e3387af669e9a9e30dafd4d096c2741fc9041c;p=helm.git

diff --git a/matita/components/ng_extraction/common.mli b/matita/components/ng_extraction/common.mli
index 4bde847ac..96550bd4d 100644
--- a/matita/components/ng_extraction/common.mli
+++ b/matita/components/ng_extraction/common.mli
@@ -9,8 +9,8 @@
 (*i $Id: common.mli 14641 2011-11-06 11:59:10Z herbelin $ i*)
 
 open Coq
-open Miniml
-open Mlutil
+(**open Miniml
+open Mlutil*)
 open OcamlExtractionTable
 
 (** By default, in module Format, you can do horizontal placing of blocks
@@ -19,7 +19,6 @@ open OcamlExtractionTable
     we attach a big virtual size to [fnl] newlines. *)
 
 val fnl : unit -> std_ppcmds
-val fnl2 : unit -> std_ppcmds
 val space_if : bool -> std_ppcmds
 
 val pp_par : bool -> std_ppcmds -> std_ppcmds