X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2FapplyTransformation.mli;h=95712f78eb269b6ed85aa4fe308c0745d8901b1d;hb=89519c7b52e06304a94019dd528925300380cdc0;hp=8e0b19361779f3e52401fe329eac38bcb87d2129;hpb=4db221ee87ba30f63db0ea32c98858041e8e6213;p=helm.git diff --git a/helm/software/matita/applyTransformation.mli b/helm/software/matita/applyTransformation.mli index 8e0b19361..95712f78e 100644 --- a/helm/software/matita/applyTransformation.mli +++ b/helm/software/matita/applyTransformation.mli @@ -56,16 +56,36 @@ val mml_of_cic_object: (Cic.id, Cic2acic.anntypes) Hashtbl.t)) (* ids_to_inner_types *) val txt_of_cic_term: - 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: - int -> Cic.metasenv -> Cic.conjecture -> string + map_unicode_to_tex:bool -> int -> Cic.metasenv -> Cic.conjecture -> string val txt_of_cic_sequent_conclusion: - 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 *) +(* columns, rendering style, flavour, name prefix, object *) val txt_of_cic_object: - int -> GrafiteAst.presentation_style -> string -> Cic.obj -> string + map_unicode_to_tex:bool -> + ?skip_thm_and_qed:bool -> ?skip_initial_lambdas:int -> + int -> GrafiteAst.presentation_style -> ?flavour:Cic.object_flavour -> + string -> Cic.obj -> + string -(* presentation_style, uri or baseuri, name prefix *) +(* presentation_style, flavour, name prefix, uri or baseuri *) val txt_of_inline_macro: - GrafiteAst.presentation_style -> string -> string -> string + map_unicode_to_tex:bool -> GrafiteAst.presentation_style -> + ?flavour:Cic.object_flavour -> string -> 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 -> ?depth:int -> + Cic.context -> Cic.term -> + string