1 (* Copyright (C) 2004, HELM Team.
3 * This file is part of HELM, an Hypertextual, Electronic
4 * Library of Mathematics, developed at the Computer Science
5 * Department, University of Bologna, Italy.
7 * HELM is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License
9 * as published by the Free Software Foundation; either version 2
10 * of the License, or (at your option) any later version.
12 * HELM is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with HELM; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
22 * For details, see the HELM World-Wide-Web page,
23 * http://helm.cs.unibo.it/
27 let version = "@MATITA_VERSION@";;
28 let undo_history_size = 10;;
29 let console_history_size = 100;;
30 let browser_history_size = 100;;
31 let base_uri = "cic:/matita";;
32 let phrase_sep = ".";;
33 let blank_uri = "about:blank";;
34 let current_proof_uri = "about:current_proof";;
35 let default_font_size = 10;;
36 let script_font = "Monospace";;
38 (** may be overridden with MATITA_RT_BASE_DIR environment variable, useful for
39 * binary distribution installed in user home directories *)
40 let runtime_base_dir =
42 Sys.getenv "MATITA_RT_BASE_DIR"
43 with Not_found -> "@RT_BASE_DIR@";;
45 let images_dir = runtime_base_dir ^ "/icons"
46 let gtkrc_file = runtime_base_dir ^ "/matita.gtkrc"
47 let lang_file = runtime_base_dir ^ "/matita.lang"
48 let script_template = runtime_base_dir ^ "/matita.ma.templ"
49 let core_notation_script = runtime_base_dir ^ "/core_notation.moo"
50 let matita_conf = runtime_base_dir ^ "/matita.conf.xml"
51 let closed_xml = runtime_base_dir ^ "/closed.xml"
52 let gtkmathview_conf = runtime_base_dir ^ "/gtkmathview.matita.conf.xml"
53 let new_stdlib_dir_devel = runtime_base_dir ^ "/lib"
54 (* CSC: no installed standard library
55 let new_stdlib_dir_installed = runtime_base_dir ^ "/ma/new-standard-library" *)
56 let help_dir = runtime_base_dir ^ "/help"