X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2FmatitaTypes.mli;h=75fca5049a650621a0f98a9ba8b515275e4172fa;hb=cfccf434a57e10848d74d06674af4ec9cef0f0ca;hp=6d672a1238a01217b45142b4dc18cbc567308b94;hpb=2c01ff6094173915e7023076ea48b5804dca7778;p=helm.git

diff --git a/matita/matita/matitaTypes.mli b/matita/matita/matitaTypes.mli
index 6d672a123..75fca5049 100644
--- a/matita/matita/matitaTypes.mli
+++ b/matita/matita/matitaTypes.mli
@@ -31,26 +31,10 @@ type abouts = [ `Blank | `Current_proof | `Us | `Coercions
 type mathViewer_entry =
   [ `About of abouts
   | `Check of string
-  | `Cic of Cic.term * Cic.metasenv
   | `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
   | `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
-
-class type mathViewer =
-  object
-    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