X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fgrafite_engine%2FnCicCoercDeclaration.mli;h=66e3a561b33ca5c65dc1f69b0ef6f26f5b7b80aa;hb=46990564407e2402686022884767fc749a97d734;hp=aee0e9fc390a4463e9681eb46a7d90e76043154a;hpb=2c01ff6094173915e7023076ea48b5804dca7778;p=helm.git

diff --git a/matita/components/grafite_engine/nCicCoercDeclaration.mli b/matita/components/grafite_engine/nCicCoercDeclaration.mli
index aee0e9fc3..66e3a561b 100644
--- a/matita/components/grafite_engine/nCicCoercDeclaration.mli
+++ b/matita/components/grafite_engine/nCicCoercDeclaration.mli
@@ -10,19 +10,20 @@
       V_______________________________________________________________ *)
 
 
-(* evals a coercion declaration statement: name t ty (id,src) tgt *)
+(* evals a coercion declaration statement: name compose t ty (id,src) tgt *)
 val eval_ncoercion: 
    #GrafiteTypes.status as 'status ->
      string ->
-     CicNotationPt.term ->
-     CicNotationPt.term ->
-     string * CicNotationPt.term ->
-     CicNotationPt.term -> 'status * [> `New of NUri.uri list ]
+     bool ->
+     NotationPt.term ->
+     NotationPt.term ->
+     string * NotationPt.term ->
+     NotationPt.term -> 'status * NUri.uri list
 
 (* for records, the term is the projection, already refined, while the
  * first integer is the number of left params and the second integer is 
  * the arity in the `:arity>` syntax *)
 val basic_eval_and_record_ncoercion_from_t_cpos_arity: 
    #GrafiteTypes.status as 'status ->
-     string * NCic.term * int * int -> 'status * [> `New of NUri.uri list ]
+     string * bool * NCic.term * int * int -> 'status * NUri.uri list