00001
00002
00003
00004 #ifndef TAULINES_H_
00005 #define TAULINES_H_
00006
00007 #include "transition.h"
00008
00009 extern bool lgStatesAdded;
00010 extern bool lgLinesAdded;
00011 extern qList AnonStates;
00012
00013 extern char **chSpecies;
00014 extern species *dBaseSpecies;
00015 extern vector<qList > dBaseStates;
00016 extern vector< multi_arr<int,2> > ipdBaseTrans;
00017 extern vector<TransitionList> dBaseTrans;
00018 extern multi_arr<CollRateCoeffArray,2> AtmolCollRateCoeff;
00019 extern CollSplinesArray ****AtmolCollSplines;
00020 extern StoutColls ****StoutCollData;
00021 extern long int nSpecies;
00022
00023 void database_readin( void );
00024 void dBase_solve(void );
00025
00029 extern TransitionProxy::iterator TauDummy;
00030
00034 extern TransitionList TauLines;
00035
00038 extern multi_arr<int,3> ipExtraLymanLines;
00039 extern vector<vector<TransitionList> > ExtraLymanLines;
00040
00042 extern long int nUTA;
00043 extern TransitionList UTALines;
00044
00047 extern long int nLevel1;
00053
00054 extern TransitionList HFLines;
00056 extern long int nHFLines;
00057
00071
00072 extern vector<vector<TransitionList> > Transitions;
00073
00074 extern vector<TransitionList> AllTransitions;
00075 extern void checkTransitionListOfLists(vector<TransitionList>&);
00076
00077 extern multi_arr<int,2> ipFe2LevN;
00078 extern TransitionList Fe2LevN;
00079
00081 extern multi_arr<int,3> ipSatelliteLines;
00082 extern vector<vector<TransitionList> > SatelliteLines;
00083
00087 extern bool lgHydroMalloc;
00088
00089
00090 const int NI_NDP = 9;
00091
00098 extern long ipT1656 , ipT9830 , ipT8727 , ipT1335 ,
00099 ipT1909 ,ipT977 , ipT1550 , ipT1548 , ipT386 , ipT310 , ipc31175 , ipT291 , ipT280 ,
00100 ipT274 , ipT270 , ipT312 , ipT610 , ipT370 , ipT157 , ipT1085 ,
00101 ipT990 , ipT1486 , ipT765 , ipT1243 , ipT1239 , ipT374g , ipT374x , ipT1200 ,
00102 ipT2140 , ipT671 , ipT315 , ipT324 , ipT333 , ipT209 , ipT122 , ipT205 ,
00103 ipT57 , ipT6300 , ipT6363 , ipT5577 , ipT834 , ipT1661 , ipT1666 , ipT835 ,
00104 ipT789 , ipT630 , ipT1304 , ipSi10_606 , ipT1039 , ipT8446 , ipT4368 , ipTOI13 ,
00105 ipTOI11 , ipTOI29 , ipTOI46 , ipTO1025 , ipT304 , ipT1214 , ipT150 , ipT146 ,
00106 ipT63 , ipTO88 , ipT52 , ipT26 , ipT1032 , ipT1037 , ipT770 , ipT780 , ipxNe0676 , ipT895 , ipT88 , ipTNe13 ,
00107 ipTNe36 , ipTNe16 , ipTNe14 , ipTNe24 , ipT5895 , ipfsNa373 , ipfsNa490 , ipfsNa421 ,
00108 ipxNa6143 , ipxNa6862 , ipxNa0746 , ipMgI2853 , ipMgI2026 , ipT2796 , ipT2804 ,
00109 ipT705 , ipT4561 , ipxMg51325 , ipxMg52417 , ipxMg52855 , ipxMg71190 , ipxMg72261 ,
00110 ipxMg72569 , ipxMg08303 , ipTMg610 , ipTMg625 , ipT58 , ipTMg4 , ipTMg14 , ipTMg6 ,
00111 ipfsMg790 , ipfsMg755 , ipAlI3957 , ipAlI3090 , ipT1855 , ipT1863 , ipT2670 ,
00112 ipAl529 , ipAl6366 , ipAl6912 , ipAl8575 , ipAl8370 , ipAl09204 , ipT639 ,
00113 ipTAl550 , ipTAl568 , ipTAl48 , ipSii2518 , ipSii2215 , ipT1808 ,
00114 ipT1207 , ipT1895 , ipT1394 , ipT1403 , ipT1527 , ipT1305 , ipT1260 , ipSi619 ,
00115 ipSi10143 , ipTSi499 , ipTSi521 , ipTSi41 , ipTSi35 , ipTSi25 , ipTSi65 ,
00116 ipTSi3 , ipTSi4 , ipP0260 , ipP0233 , ipP0318 , ipP713 ,
00117 ipT1256 , ipT1194 , ipTS1720 , ipT1198 , ipT786 ,
00118 ipTS19 , ipTS34 , ipTS11 , ipfsCl214 , ipfsCl233 ,
00119 ipCl04203 , ipCl04117 , ipCl973 ,
00120 ipTAr7 , ipTAr9 , ipTAr22 , ipTAr13 , ipTAr8 , ipAr06453 ,
00121 ipKI7745 , ipxK03462 , ipxK04598 , ipxK04154 ,
00122 ipxK07319 , ipCaI4228 , ipT3934 , ipT3969 , ipT8498 , ipT8542 ,
00123 ipT8662 , ipT7291 , ipT7324 , ipTCa3 ,
00124 ipSc05231 , ipSc13264 , ipTi06172 , ipVa07130 , ipVa15172 ,
00125 ipFeI3884 , ipFeI3729 , ipFeI3457 , ipFeI3021 , ipFeI2966 , ipTuv3 ,
00126 ipTr48 , ipTFe16 , ipTFe26 , ipTFe34 , ipTFe35 , ipTFe46 , ipTFe56 , ipT1122 ,
00127 ipT191 , ipCo11527;
00130 extern long ipS4_1405,ipS4_1398,ipS4_1424,ipS4_1417,ipS4_1407,
00131 ipO4_1400,ipO4_1397,ipO4_1407,ipO4_1405,ipO4_1401,
00132 ipN3_1749,ipN3_1747,ipN3_1754,ipN3_1752,ipN3_1751,
00133 ipC2_2325,ipC2_2324,ipC2_2329,ipC2_2328,ipC2_2327,
00134 ipSi2_2334,ipSi2_2329,ipSi2_2350,ipSi2_2344,ipSi2_2336,
00135 ipS1_25m ,ipS1_56m, ipCl1_11m , ipFe1_24m, ipFe1_35m , ipFe1_54m , ipFe1_111m,
00136 ipNi1_7m , ipNi1_11m , ipSi1_130m , ipSi1_68m , ipNI_pumpDirect[NI_NDP],
00137 ipNI_pumpIndirect;
00138
00139
00140
00141
00142
00143
00145 const int NWINDDIM = 6744;
00146
00149 extern long nWindLine;
00150
00151
00153 extern TransitionList TauLine2;
00154
00155 extern realnum *cs1_flag_lev2;
00156
00157 #endif