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 void abund_starburst(char*);
00028
00035 double AbundancesTable(double r0,
00036 double depth,
00037 long int iel);
00038
00040 EXTERN struct t_abund {
00041
00043 bool lgAGN[LIMELM];
00044
00045 realnum SolarSave[LIMELM],
00046 OldSolar84[LIMELM],
00047 anova[LIMELM],
00048 apn[LIMELM],
00049 ahii[LIMELM],
00050 camern[LIMELM],
00051 aprim[LIMELM],
00052 aism[LIMELM];
00053
00054 bool lgAbnSolar;
00055
00057 realnum solar[LIMELM];
00058
00062 bool lgAbunTabl[LIMELM],
00063
00065 lgAbTaDepth[LIMELM],
00066
00068 lgAbTaON;
00069
00070 # define LIMTABD 500
00071
00073 realnum AbTabFac[LIMTABD][LIMELM],
00074
00077 AbTabRad[LIMTABD][LIMELM];
00078
00079 long int nAbunTabl;
00080
00082 long int ipSolar[LIMELM],
00083 npSolar;
00084
00086 realnum ScaleElement[LIMELM];
00087
00089 realnum Depletion[LIMELM],
00090
00092 depset[LIMELM];
00093
00095 bool lgDepln;
00096
00098 realnum ScaleMetals;
00099
00100 } abund;
00101
00102
00103
00104 #endif