better UI for TeX/Unicode and terms grammar

[helm.git] / helm / software / matita / applyTransformation.mli

diff --git a/helm/software/matita/applyTransformation.mli b/helm/software/matita/applyTransformation.mli
index 63c3beedf4a22225aea0f2680464b785901eabb1..4b0251743407291e890801475b023135f2fc9c21 100644 (file)
--- a/helm/software/matita/applyTransformation.mli
+++ b/helm/software/matita/applyTransformation.mli
@@ -56,23 +56,30 @@ val mml_of_cic_object:
        (Cic.id, Cic2acic.anntypes) Hashtbl.t))  (* ids_to_inner_types *)
 
 val txt_of_cic_term: 
-  ?map_unicode_to_tex:bool -> int -> Cic.metasenv -> Cic.context -> Cic.term ->
-    string 
+  map_unicode_to_tex:bool -> int -> Cic.metasenv -> Cic.context -> Cic.term ->
+   string 
 val txt_of_cic_sequent: 
-  ?map_unicode_to_tex:bool -> int -> Cic.metasenv -> Cic.conjecture ->
-    string
+  map_unicode_to_tex:bool -> int -> Cic.metasenv -> Cic.conjecture -> string
 val txt_of_cic_sequent_conclusion: 
-  ?map_unicode_to_tex:bool -> int -> Cic.metasenv -> Cic.conjecture ->
-    string
+  map_unicode_to_tex:bool -> output_type:[`Pattern | `Term] -> int ->
+   Cic.metasenv -> Cic.conjecture -> string
 
 (* columns, rendering style, name prefix, object *)
 val txt_of_cic_object: 
-  ?map_unicode_to_tex:bool -> 
-  ?skip_thm_and_qed:bool -> ?skip_initial_lambdas:bool ->  
+  map_unicode_to_tex:bool -> 
+  ?skip_thm_and_qed:bool -> 
+  ?skip_initial_lambdas:int -> 
     int -> GrafiteAst.presentation_style -> string ->
   Cic.obj ->
     string
 
 (* presentation_style, uri or baseuri, name prefix *)
 val txt_of_inline_macro:
+  map_unicode_to_tex:bool -> 
    GrafiteAst.presentation_style -> string -> string -> string
+
+(* columns, rendering depth, context, term *)
+val procedural_txt_of_cic_term: 
+  map_unicode_to_tex:bool -> int -> ?depth:int -> 
+  Cic.context -> Cic.term ->
+    string