00001
00002
00003
00004 #ifndef ABUND_H_
00005 #define ABUND_H_
00006
00007
00011 void AbundancesSet(void);
00012
00016 void AbundancesPrt( void );
00017
00021 void AbundancesZero(void);
00022
00027 class Parser;
00028 void abund_starburst(Parser &p);
00029
00036 double AbundancesTable(double r0,
00037 double depth,
00038 long int iel);
00039
00041 EXTERN struct t_abund {
00042
00044 bool lgAGN[LIMELM];
00045
00046 realnum SolarSave[LIMELM],
00047 OldSolar84[LIMELM],
00048 anova[LIMELM],
00049 apn[LIMELM],
00050 ahii[LIMELM],
00051 camern[LIMELM],
00052 aprim[LIMELM],
00053 aism[LIMELM],
00054 aCrab[LIMELM];
00055
00056 bool lgAbnSolar;
00057
00058 bool lgElmONapn[LIMELM],
00059 lgElmONahii[LIMELM],
00060 lgElmONaism[LIMELM],
00061 lgElmONaCrab[LIMELM];
00062
00064 realnum solar[LIMELM];
00065
00069 bool lgAbunTabl[LIMELM],
00070
00072 lgAbTaDepth[LIMELM],
00073
00075 lgAbTaON;
00076
00077 # define LIMTABD 500
00078
00080 realnum AbTabFac[LIMTABD][LIMELM],
00081
00084 AbTabRad[LIMTABD][LIMELM];
00085
00086 long int nAbunTabl;
00087
00089 long int ipSolar[LIMELM],
00090 npSolar;
00091
00093 realnum ScaleElement[LIMELM];
00094
00096 realnum Depletion[LIMELM],
00097
00099 depset[LIMELM];
00100
00102 bool lgDepln;
00103
00105 realnum ScaleMetals;
00106
00107 } abund;
00108
00109
00110
00111 #endif