source: trunk/src/project_init.pro @ 169

Last change on this file since 169 was 163, checked in by pinsard, 12 years ago

implement overwrite mechanism
  • Property svn:keywords set to Id URL
File size: 3.1 KB
Line 
1;+
2;
3; .. _project_init.pro:
4;
5; ================
6; project_init.pro
7; ================
8;
9; DESCRIPTION
10; ===========
11;
12; This is the IDL/:ref:<saxo:saxo> initialisation file.
13;
14; .. note::
15;
16;    **project_overwrite** is here set to ``0`` : Existing files won't be
17;    overwritten. It might be set
18;    to ``1`` when you want to overwrite existing files in IDL process.
19;
20; It ++::
21;
22;   $ idl -startupfile project_init.pro
23;
24; or::
25;
26;   $ idl -IDL_STARTUP project_init.pro
27;
28; or::
29;
30;  $ IDL
31;  IDL> @project_init
32;
33; SEE ALSO
34; ========
35;
36; :ref:`project_profile.sh`
37;
38; TODO
39; ====
40;
41; learn to write IF .. ELSE in a @file
42;
43; check idl -IDL_STARTUP project_init.pro not ok now on cratos
44;
45; EVOLUTIONS
46; ==========
47;
48; $Id$
49;
50; $URL$
51;
52; - fplod 20120319
53;
54;   * define a overwrite status
55;
56; - fplod 20110429T081938Z aedon.locean-ipsl.upmc.fr (Darwin)
57;
58;   * rename to project_init.pro (more generic)
59;
60; - fplod 20110413T151541Z cratos.locean-ipsl.upmc.fr (Linux)
61;
62;   * fix uncompleted replacement SAXO_SRC by SAXO_DIR
63;
64; - fplod 20110413T070801Z aedon.locean-ipsl.upmc.fr (Darwin)
65;
66;   * replace SAXO_SRC by SAXO_DIR
67;
68; - fplod 20110411T074056Z aedon.locean-ipsl.upmc.fr (Darwin)
69;
70;   * remove fplod/cratos dependencies use $TROPFLUX*; use SAXO_SRC;
71;     add cm_project
72;
73; - fplod 20110408T131625Z cratos.locean-ipsl.upmc.fr (Linux)
74;
75;   * creation using buildinit on cratos
76;
77;-
78;
79; SAXO environment
80saxo_dir_env=GETENV('SAXO_DIR')
81;
82; project environment #1
83project_env_temp=GETENV('PROJECT')
84project_id_env_temp=GETENV('PROJECT_ID')
85project_od_env_temp=GETENV('PROJECT_OD')
86;
87; path definition
88!path = expand_path('+' + project_env_temp + '/src') $
89      + path_sep(/search_path) + expand_path('+' + saxo_dir_env) $
90      + path_sep(/search_path) + expand_path('+' + !dir)
91;
92; project environment #2
93@cm_project
94project_env=project_env_temp
95project_id_env=project_id_env_temp
96project_od_env=project_od_env_temp
97;
98; define overwrite status
99project_overwrite = 0
100;
101; compatibility with the old version of SAXO
102;
103keep_compatibility, 0
104;
105; define all the commons
106;
107@cm_4cal
108@cm_4data
109@cm_4mesh
110@cm_4data
111@cm_4ps
112@cm_general
113;
114; define default directories
115;
116homedir = isadirectory(project_env + '/src/', title = 'Select the default HOME directory')
117iodir = isadirectory(project_id_env, title = 'Select the default IO directory')
118psdir = isadirectory(project_od_env, title = 'Select the default postscripts directory')
119imagedir = isadirectory(project_od_env, title = 'Select the default images directory')
120animdir = isadirectory(project_od_env, title = 'Select the default animations directory')
121;
122; define printer parameters
123;
124printer_human_names = ''
125printer_machine_names = ''
126print_command = ''
127;
128; colors ...
129;
130device, decomposed = 0
131device, retain = 2
132lct, 39
133;
134; postscript parameters ...
135;
136key_portrait = 0
137page_size = [20.9903, 29.7039]
138windowsize_scale = 1.00000
139archive_ps = 0
140;
141;========================================================
142; end of the part that should be modified by the users...
143;========================================================
144;
145; if needed, keep compatibility with the old version
146;
147@updateold
148;
Note: See TracBrowser for help on using the repository browser.