Coercion hiding implemented. Notes:

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

diff --git a/helm/software/matita/applyTransformation.mli b/helm/software/matita/applyTransformation.mli
index f41f0a7a1e27ad38e1fcf5240c954c0823e1f77d..dbd0343ff600d4bdd3e09e62963c340e5adcacdb 100644 (file)
--- a/helm/software/matita/applyTransformation.mli
+++ b/helm/software/matita/applyTransformation.mli
@@ -45,6 +45,7 @@ val mml_of_cic_sequent:
      (Cic.id, Cic2acic.sort_kind) Hashtbl.t))   (* ids_to_inner_sorts *)
 
 val nmml_of_cic_sequent:
+ #NCicCoercion.status ->
  NCic.metasenv -> NCic.substitution ->          (* metasenv, substitution *)
  int * NCic.conjecture ->                       (* sequent *)
   Gdome.document                                (* Math ML *)
@@ -60,7 +61,7 @@ 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
+val nmml_of_cic_object: #NCicCoercion.status -> NCic.obj -> Gdome.document
 
 val txt_of_cic_term: 
   map_unicode_to_tex:bool -> int -> Cic.metasenv -> Cic.context -> Cic.term ->