X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2FmatitaTypes.ml;h=092c79c986e103e7c4b92fcb7bdc159e471a7b95;hb=632dfd0a57c9951d0efbd769d6f433c4ef68a314;hp=e5b80d0e883c483e3c6b41e3028205985462e475;hpb=513c7211bb07abd4c1da842a29c05301890aa73a;p=helm.git diff --git a/matita/matita/matitaTypes.ml b/matita/matita/matitaTypes.ml index e5b80d0e8..092c79c98 100644 --- a/matita/matita/matitaTypes.ml +++ b/matita/matita/matitaTypes.ml @@ -25,9 +25,6 @@ (* $Id$ *) -open Printf -open GrafiteTypes - (** user hit the cancel button *) exception Cancel @@ -75,14 +72,3 @@ let entry_of_string = function | "about:grammar" -> `About `Grammar | _ -> (* only about entries supported ATM *) raise (Invalid_argument "entry_of_string") - -class type mathViewer = - object - (** @param reuse if set reused last opened cic browser otherwise - * opens a new one. default is false - *) - method show_entry: ?reuse:bool -> mathViewer_entry -> unit - method screenshot: - GrafiteTypes.status -> NCic.metasenv -> NCic.metasenv -> - NCic.substitution -> string -> unit - end