X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fmatita%2Fmatita.ml;h=a23558aa85e0ff83ca12707b4c732a4ba6db829c;hb=9fe4caa4ba466250017b5ac1b36fc6e94d7e3860;hp=dc0aa579db5975ccbd4fab189c1f6de071b27929;hpb=3f676ab6acafa32514a44bc84d287f44dbc5389e;p=helm.git diff --git a/helm/software/matita/matita.ml b/helm/software/matita/matita.ml index dc0aa579d..a23558aa8 100644 --- a/helm/software/matita/matita.ml +++ b/helm/software/matita/matita.ml @@ -218,22 +218,26 @@ let _ = (fun _ -> CicMetaSubst.use_low_level_ppterm_in_context := true); addDebugItem "enable high level pretty printer" (fun _ -> CicMetaSubst.use_low_level_ppterm_in_context := false); +(* ZACK moved to the View menu addDebugItem "disable all (pretty printing) notations" (fun _ -> CicNotation.set_active_notations []); addDebugItem "enable all (pretty printing) notations" (fun _ -> CicNotation.set_active_notations (List.map fst (CicNotation.get_all_notations ()))); +*) addDebugSeparator (); addDebugItem "enable multiple disambiguation passes (default)" (fun _ -> GrafiteDisambiguator.only_one_pass := false); addDebugItem "enable only one disambiguation pass" (fun _ -> GrafiteDisambiguator.only_one_pass := true); addDebugSeparator (); +(* ZACK moved to the View menu addDebugItem "enable coercions hiding" (fun _ -> Acic2content.hide_coercions := true); addDebugItem "disable coercions hiding" (fun _ -> Acic2content.hide_coercions := false); +*) addDebugItem "show coercions graph" (fun _ -> let c = MatitaMathView.cicBrowser () in c#load (`About `Coercions));