X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Focaml%2Fcic_transformations%2FapplyTransformation.mli;h=fc5fd547a0e088c3494d08c84c307412c64ea122;hb=eac74259f5a0aaa8056791876284c897a6827c24;hp=f7d3d2da2c09cfa15b1e865e8ee44eba02d9bbde;hpb=10be6b9fb25a5bcd8721f707beba4b8a125591b5;p=helm.git diff --git a/helm/ocaml/cic_transformations/applyTransformation.mli b/helm/ocaml/cic_transformations/applyTransformation.mli index f7d3d2da2..fc5fd547a 100644 --- a/helm/ocaml/cic_transformations/applyTransformation.mli +++ b/helm/ocaml/cic_transformations/applyTransformation.mli @@ -33,7 +33,7 @@ (* *) (***************************************************************************) -val mml_of_cic_sequent : +val mml_of_cic_sequent: Cic.metasenv -> (* metasenv *) Cic.conjecture -> (* sequent *) Gdome.document * (* Math ML *) @@ -43,9 +43,8 @@ val mml_of_cic_sequent : (Cic.id, Cic.hypothesis) Hashtbl.t * (* id -> hypothesis *) (Cic.id, string) Hashtbl.t)) (* ids_to_inner_sorts *) -val mml_of_cic_object : - UriManager.uri -> (* object uri *) - Cic.obj -> (* uri *) +val mml_of_cic_object: + Cic.obj -> (* object *) Gdome.document * (* Math ML *) (Cic.annobj * (* annobj *) ((Cic.id, Cic.term) Hashtbl.t * (* id -> term *)