]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/applyTransformation.mli
This commit restores the ids_to_father_ids table.
[helm.git] / helm / software / matita / applyTransformation.mli
index 8e023aea626f366cbfdc7cdf6778fa01f5854903..9fe4130c35b74433157575280d813f6bf9b11494 100644 (file)
@@ -44,6 +44,12 @@ val mml_of_cic_sequent:
      (Cic.id, Cic.hypothesis) Hashtbl.t *       (* id -> hypothesis *)
      (Cic.id, Cic2acic.sort_kind) Hashtbl.t))   (* ids_to_inner_sorts *)
 
+val nmml_of_cic_sequent:
+ NCic.metasenv -> NCic.substitution ->          (* metasenv, substitution *)
+ int * NCic.conjecture ->                       (* sequent *)
+  Gdome.document *                              (* Math ML *)
+  (string, NTermCicContent.id option) Hashtbl.t (* id -> father id *)
+
 val mml_of_cic_object:
   Cic.obj ->                                  (* object *)
     Gdome.document *                            (* Math ML *)
@@ -55,3 +61,40 @@ val mml_of_cic_object:
        (Cic.id, Cic2acic.sort_kind) Hashtbl.t * (* ids_to_inner_sorts *)
        (Cic.id, Cic2acic.anntypes) Hashtbl.t))  (* ids_to_inner_types *)
 
+val nmml_of_cic_object:
+ NCic.obj -> Gdome.document *
+  (string, NTermCicContent.id option) Hashtbl.t (* id -> father id *)
+
+
+val txt_of_cic_term: 
+  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
+val txt_of_cic_sequent_conclusion: 
+  map_unicode_to_tex:bool -> output_type:[`Pattern | `Term] -> int ->
+   Cic.metasenv -> Cic.conjecture -> string
+
+(* columns, params, object *)
+val txt_of_cic_object: 
+  map_unicode_to_tex:bool -> 
+  ?skip_thm_and_qed:bool -> ?skip_initial_lambdas:int -> 
+  int -> GrafiteAst.inline_param list -> Cic.obj ->
+    string
+
+(* params, uri or baseuri *)
+val txt_of_inline_macro:
+  map_unicode_to_tex:bool -> GrafiteAst.inline_param list -> string ->
+    string
+
+val txt_of_macro:
+  map_unicode_to_tex:bool ->
+    Cic.metasenv ->
+    Cic.context ->
+    (Cic.term, Cic.lazy_term) GrafiteAst.macro -> string
+
+(* columns, rendering depth, context, term *)
+val procedural_txt_of_cic_term: 
+  map_unicode_to_tex:bool -> int -> GrafiteAst.inline_param list -> 
+  Cic.context -> Cic.term ->
+    string