X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2FapplyTransformation.mli;h=d5886abd8a7e8b82aff0fae35b121264238560d4;hb=d9a1ff8259a7882caa0ffd27282838c00a34cab5;hp=5816455c2e6c017379b1c6f88f7d9502bacf7aa0;hpb=bfcde2b08d72f1392ed61164c67d199360f0397f;p=helm.git

diff --git a/matita/matita/applyTransformation.mli b/matita/matita/applyTransformation.mli
index 5816455c2..d5886abd8 100644
--- a/matita/matita/applyTransformation.mli
+++ b/matita/matita/applyTransformation.mli
@@ -33,20 +33,21 @@
 (*                                                                         *)
 (***************************************************************************)
 
-val nmml_of_cic_sequent:
- #NCicCoercion.status ->
- NCic.metasenv -> NCic.substitution ->          (* metasenv, substitution *)
- int * NCic.conjecture ->                       (* sequent *)
-  Gdome.document                                (* Math ML *)
+val use_high_level_pretty_printer: bool ref
+
+class status :
+ object
+  inherit NCic.cstatus
+  inherit Interpretations.status
+  inherit TermContentPres.status
+ end
 
 val ntxt_of_cic_sequent:
- map_unicode_to_tex:bool -> int ->
- #NCicCoercion.status ->
- NCic.metasenv -> NCic.substitution ->          (* metasenv, substitution *)
+ metasenv:NCic.metasenv -> subst:NCic.substitution -> (* metasenv,substitution*)
+ map_unicode_to_tex:bool -> int -> #status ->
  int * NCic.conjecture ->                       (* sequent *)
-  string                                        (* text *)
-
-val nmml_of_cic_object: #NCicCoercion.status -> NCic.obj -> Gdome.document
+  (int * int * string) list * string            (* hyperlinks, text *)
 
 val ntxt_of_cic_object:
- map_unicode_to_tex:bool -> int -> #NCicCoercion.status -> NCic.obj -> string
+ map_unicode_to_tex:bool -> int -> #status -> NCic.obj ->
+  (int * int * string) list * string            (* hyperlinks, text *)