X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2FmatitaTypes.mli;h=a558d10e33544cb165091d98ab5a91e1403557ad;hb=7c123bfb1568f90f37cd667332fbf60d4423b983;hp=f27f2a11ba69fbc7bc74eeebced9db4fe5a528c6;hpb=6fa89cef6aa8fc1774db065a9fcfc47867579054;p=helm.git

diff --git a/helm/matita/matitaTypes.mli b/helm/matita/matitaTypes.mli
index f27f2a11b..a558d10e3 100644
--- a/helm/matita/matitaTypes.mli
+++ b/helm/matita/matitaTypes.mli
@@ -52,7 +52,7 @@ type option_value =
 type options = option_value StringMap.t
 val no_options : 'a StringMap.t
 
-type ast_command = (CicNotationPt.term, GrafiteAst.obj) GrafiteAst.command
+type ast_command = (CicNotationPt.term, CicNotationPt.obj) GrafiteAst.command
 type moo = ast_command list * GrafiteAst.metadata list  (** <moo, metadata> *)
 
 type status = {
@@ -62,6 +62,7 @@ type status = {
   proof_status: proof_status;                             (** logical status *)
   options: options;
   objects: (UriManager.uri * string) list;  (** in-scope objects, with paths *)
+  coercions: UriManager.uri list;                      (** defined coercions *)
   notation_ids: CicNotation.notation_id list;      (** in-scope notation ids *)
 }