X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2FmatitaTypes.mli;h=6d672a1238a01217b45142b4dc18cbc567308b94;hb=63b1b044e54bac3ffecc02ee2941b60f58b0c837;hp=20d04259678f84937d097f731ea07c75bea9d238;hpb=c2957e84a0fa8fe60bbbe89f4923a50bd626444d;p=helm.git diff --git a/helm/software/matita/matitaTypes.mli b/helm/software/matita/matitaTypes.mli index 20d042596..6d672a123 100644 --- a/helm/software/matita/matitaTypes.mli +++ b/helm/software/matita/matitaTypes.mli @@ -25,16 +25,19 @@ exception Cancel -type abouts = [ `Blank | `Current_proof | `Us | `Coercions | `CoercionsFull] +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 + | `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 ] @@ -47,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