1 | #ifndef MAD_GCST_H |
---|
2 | #define MAD_GCST_H |
---|
3 | |
---|
4 | /* Temporary file: global constants |
---|
5 | these constants will be split over their respective modules... |
---|
6 | and should be const pointers to constant values... |
---|
7 | */ |
---|
8 | |
---|
9 | extern const char *version_name; |
---|
10 | extern const char *version_arch; |
---|
11 | extern const char *version_ostype; |
---|
12 | extern const char *version_date_mod; |
---|
13 | extern const char *version_type_dev; |
---|
14 | extern const char *version_type_pro; |
---|
15 | |
---|
16 | extern char* const functs[]; |
---|
17 | extern const char op_string[]; |
---|
18 | extern char file_string[]; /* to avoid local in routine alias */ |
---|
19 | extern char vrai[]; /* to avoid local in routine alias */ |
---|
20 | extern char faux[]; /* to avoid local in routine alias */ |
---|
21 | extern const int n_match; /* # of match token lists in cmd_match_base */ |
---|
22 | extern const int s_match[]; /* position of first token of command below */ |
---|
23 | extern const int t_match[]; /* order in which the commands are matched */ |
---|
24 | extern const char* cmd_match_base[]; |
---|
25 | |
---|
26 | /* aperture types and # of parameters, needed for twiss table */ |
---|
27 | |
---|
28 | extern char* aperture_types[]; |
---|
29 | |
---|
30 | /*added 4, 3 and "racetrack" here */ |
---|
31 | |
---|
32 | extern int aperture_npar[]; |
---|
33 | |
---|
34 | /* table descriptors: type 1 = int, type 2 = double, type 3 = string; |
---|
35 | internally, however, int are stored as double */ |
---|
36 | |
---|
37 | extern int ap_table_types[]; |
---|
38 | extern char* ap_table_cols[]; |
---|
39 | extern int survey_table_types[]; |
---|
40 | extern char* survey_table_cols[]; |
---|
41 | extern int efield_table_types[]; |
---|
42 | extern char* efield_table_cols[]; |
---|
43 | extern char* sxf_table_names[]; |
---|
44 | |
---|
45 | extern int twiss_opt_end; /* last column filled by twiss module */ |
---|
46 | extern int twiss_mult_end; /* last multipole column filled by complete_twiss_table */ |
---|
47 | extern int twiss_fill_end; /* last standard column filled by complete_twiss_table */ |
---|
48 | /*== jln 11.11.2010 increased twiss_fill_end from 96 to 97 to accomodate for v_pos */ |
---|
49 | |
---|
50 | /* warning: modify routine complete_twiss_table in case of changes */ |
---|
51 | extern int twiss_table_types[]; |
---|
52 | extern char* twiss_table_cols[]; |
---|
53 | extern int twiss_sector_table_types[]; |
---|
54 | extern char* twiss_sector_table_cols[]; |
---|
55 | extern int ptc_twiss_summary_table_types[]; |
---|
56 | extern char* ptc_twiss_summary_table_cols[]; |
---|
57 | |
---|
58 | extern int ibs_table_types[]; |
---|
59 | extern char* ibs_table_cols[]; |
---|
60 | extern int map_tab_types[]; |
---|
61 | extern char* map_tab_cols[]; |
---|
62 | extern int normal_res_types[]; |
---|
63 | extern char* normal_res_cols[]; |
---|
64 | |
---|
65 | extern int sodd_detune_5_types[]; |
---|
66 | extern char* sodd_detune_5_cols[]; |
---|
67 | extern int sodd_distort1_8_types[]; |
---|
68 | extern char* sodd_distort1_8_cols[]; |
---|
69 | extern int sodd_distort1_11_types[]; |
---|
70 | extern char* sodd_distort1_11_cols[]; |
---|
71 | extern int sodd_distort2_9_types[]; |
---|
72 | extern char* sodd_distort2_9_cols[]; |
---|
73 | |
---|
74 | extern int touschek_table_types[]; |
---|
75 | extern char* touschek_table_cols[]; |
---|
76 | extern int mon_table_types[]; |
---|
77 | extern char* mon_table_cols[]; |
---|
78 | extern int corr_table_types[]; |
---|
79 | extern char* corr_table_cols[]; |
---|
80 | |
---|
81 | extern int orbit_table_types[]; |
---|
82 | extern char* orbit_table_cols[]; |
---|
83 | extern int special_comm_cnt[]; |
---|
84 | extern char* special_comm_desc[]; |
---|
85 | extern int summ_table_types[]; |
---|
86 | |
---|
87 | extern char* summ_table_cols[]; |
---|
88 | |
---|
89 | extern int trackone_table_types[]; |
---|
90 | extern char* trackone_table_cols[]; |
---|
91 | extern int track_table_types[]; |
---|
92 | extern char* track_table_cols[]; |
---|
93 | extern int track_table_cols_len; |
---|
94 | extern int tracksumm_table_types[]; |
---|
95 | extern char* tracksumm_table_cols[]; |
---|
96 | extern int ptcnodetrack_table_types[]; |
---|
97 | extern char* ptcnodetrack_table_cols[]; |
---|
98 | |
---|
99 | |
---|
100 | extern int trackloss_table_types[]; |
---|
101 | extern char* trackloss_table_cols[]; |
---|
102 | |
---|
103 | extern int dynap_table_types[]; |
---|
104 | extern char* dynap_table_cols[]; |
---|
105 | extern int dynaptune_table_types[]; |
---|
106 | extern char* dynaptune_table_cols[]; |
---|
107 | |
---|
108 | /* Definition of "select_ptc_normal" parameters for "ptc_normal"*/ |
---|
109 | extern char names[PTC_NAMES_L][5]; |
---|
110 | extern char atm[3][4]; |
---|
111 | extern char atc[3][4]; |
---|
112 | |
---|
113 | extern char* atc_type; |
---|
114 | extern int atc_flag; |
---|
115 | |
---|
116 | extern char* atm_type; |
---|
117 | extern int atm_flag; |
---|
118 | |
---|
119 | #endif // MAD_GCST_H |
---|