X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2FmatitaMathView.mli;h=f5acf63497a2c3af8099f44d9e9c4bd36a45e665;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=0aef1cc18900a411f5a3458851343babca04886d;hpb=06c2b37f3d7d4e14cabeef3b18211e5d12b9b4eb;p=helm.git diff --git a/helm/matita/matitaMathView.mli b/helm/matita/matitaMathView.mli index 0aef1cc18..f5acf6349 100644 --- a/helm/matita/matitaMathView.mli +++ b/helm/matita/matitaMathView.mli @@ -1,4 +1,4 @@ -(* Copyright (C) 2004, HELM Team. +(* Copyright (C) 2004-2005, HELM Team. * * This file is part of HELM, an Hypertextual, Electronic * Library of Mathematics, developed at the Computer Science @@ -23,7 +23,10 @@ * http://helm.cs.unibo.it/ *) -val proof_viewer : +(** {2 Constructors} *) + + (** meta constructor *) +type 'widget constructor = ?hadjustment:GData.adjustment -> ?vadjustment:GData.adjustment -> ?font_size:int -> @@ -33,19 +36,47 @@ val proof_viewer : ?packing:(GObj.widget -> unit) -> ?show:bool -> unit -> - MatitaTypes.proof_viewer + 'widget -(* -val sequent_viewer : - ?hadjustment:GData.adjustment -> - ?vadjustment:GData.adjustment -> - ?font_size:int -> - ?log_verbosity:int -> - ?width:int -> - ?height:int -> - ?packing:(GObj.widget -> unit) -> - ?show:bool -> +val clickableMathView: MatitaGuiTypes.clickableMathView constructor + +val cicMathView: MatitaGuiTypes.cicMathView constructor + +val sequentsViewer: + notebook:GPack.notebook -> + cicMathView:MatitaGuiTypes.cicMathView -> unit -> - MatitaTypes.sequent_viewer -*) + MatitaGuiTypes.sequentsViewer + +val cicBrowser: unit -> MatitaGuiTypes.cicBrowser + +(** {2 MathView wide functions} *) +(* TODO ZACK consider exporting here a single function which return a list of + * MatitaGuiTypes.clickableMathView and act on them externally ... *) + +val increase_font_size: unit -> unit +val decrease_font_size: unit -> unit +val reset_font_size: unit -> unit + +val refresh_all_browsers: unit -> unit (** act on all cicBrowsers *) +val update_font_sizes: unit -> unit + + (** {3 selection handling} *) + + (* @return the selections of a (unspecified) math viewer *) +val get_selections: unit -> string list option + + (* remove the selections of all math viewers *) +val reset_selections: unit -> unit + +(** {2 Singleton instances} *) + +val cicMathView_instance: unit -> MatitaGuiTypes.cicMathView +val sequentsViewer_instance: unit -> MatitaGuiTypes.sequentsViewer + +val mathViewer: unit -> MatitaTypes.mathViewer + +(** {2 Initialization} *) + +val set_gui: MatitaGuiTypes.gui -> unit