X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Facic_procedural%2Facic2Procedural.mli;h=cca20ba5f805e6837c52c960208b7a9fa71554d5;hb=70660e05baa914569c52555230901d5a8dd92f0b;hp=8cbcb1c7e3f9457a578053e7fdcf41ac762fbe8e;hpb=ff3bd23d19abd7c9e981fd754f54d536fc563ec3;p=helm.git diff --git a/helm/software/components/acic_procedural/acic2Procedural.mli b/helm/software/components/acic_procedural/acic2Procedural.mli index 8cbcb1c7e..cca20ba5f 100644 --- a/helm/software/components/acic_procedural/acic2Procedural.mli +++ b/helm/software/components/acic_procedural/acic2Procedural.mli @@ -26,7 +26,7 @@ val procedural_of_acic_object: ids_to_inner_sorts:(Cic.id, Cic2acic.sort_kind) Hashtbl.t -> ids_to_inner_types:(Cic.id, Cic2acic.anntypes) Hashtbl.t -> ?info:string -> - ?depth:int -> ?flavour:Cic.object_flavour -> string -> Cic.annobj -> + GrafiteAst.inline_param list -> Cic.annobj -> (Cic.annterm, Cic.annterm, Cic.annterm GrafiteAst.reduction, Cic.annterm CicNotationPt.obj, string) GrafiteAst.statement list @@ -34,11 +34,9 @@ val procedural_of_acic_object: val procedural_of_acic_term: ids_to_inner_sorts:(Cic.id, Cic2acic.sort_kind) Hashtbl.t -> ids_to_inner_types:(Cic.id, Cic2acic.anntypes) Hashtbl.t -> - ?depth:int -> string -> Cic.context -> Cic.annterm -> + GrafiteAst.inline_param list -> Cic.context -> Cic.annterm -> (Cic.annterm, Cic.annterm, Cic.annterm GrafiteAst.reduction, Cic.annterm CicNotationPt.obj, string) GrafiteAst.statement list val tex_formatter: Format.formatter option ref - -val debug: bool ref