X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2FmatitaTypes.mli;h=6d672a1238a01217b45142b4dc18cbc567308b94;hb=65e8f1ba961ef81c5604168e7f1c891063c1ec76;hp=dd89ed79b82ed1783038e8af830c012e67ad51fc;hpb=ef08e2dc4458a7db58575e1694e580c1a8e39a9b;p=helm.git

diff --git a/helm/software/matita/matitaTypes.mli b/helm/software/matita/matitaTypes.mli
index dd89ed79b..6d672a123 100644
--- a/helm/software/matita/matitaTypes.mli
+++ b/helm/software/matita/matitaTypes.mli
@@ -25,17 +25,22 @@
 
 exception Cancel
 
-type abouts = [ `Blank | `Current_proof | `Us | `Coercions]
+type abouts = [ `Blank | `Current_proof | `Us | `Coercions 
+ | `CoercionsFull | `TeX | `Grammar | `Hints]
 
 type mathViewer_entry =
   [ `About of abouts
   | `Check of string
   | `Cic of Cic.term * Cic.metasenv
-  | `Development of string
+  | `NCic of NCic.term * NCic.context * NCic.metasenv * NCic.substitution
   | `Dir of string
+  | `HBugs of [ `Tutors ]
   | `Metadata of [ `Deps of [`Fwd | `Back] * UriManager.uri ]
   | `Uri of UriManager.uri
-  | `Whelp of string * UriManager.uri list ]
+  | `NRef of NReference.reference
+  | `Whelp of string * UriManager.uri list 
+  | `Univs of UriManager.uri
+  ]
 
 val string_of_entry : mathViewer_entry -> string
 val entry_of_string : string -> mathViewer_entry
@@ -45,4 +50,7 @@ class type mathViewer =
     method show_entry : ?reuse:bool -> mathViewer_entry -> unit
     method show_uri_list :
       ?reuse:bool -> entry:mathViewer_entry -> UriManager.uri list -> unit
+    method screenshot: 
+      GrafiteTypes.status -> NCic.metasenv -> NCic.metasenv ->
+        NCic.substitution -> string -> unit
   end