00001
00002
00003
00004 #ifndef COOLING_H_
00005 #define COOLING_H_
00006
00007
00009 void CoolZero(void);
00010
00016 void CoolAdd(
00017 const char *chLabel,
00018 realnum xlambda,
00019 double cool);
00020
00022 void CoolSum(double *total);
00023
00026 void CoolEvaluate(double *tot);
00027
00035 void coolpr(
00036 FILE *io,
00037 const char *chLabel ,
00038 realnum lambda,
00039 double ratio,
00040 const char *chJOB );
00041
00044 void HeatSum(void);
00045
00047 void HeatZero(void);
00048
00049
00050 void CoolAlum(void);
00051
00052 void CoolArgo(void);
00053
00054 void CoolCalc(void);
00055
00056 void CoolCarb(void);
00057
00058 void CoolChlo(void);
00059
00060 void CoolChro(void);
00061
00062 void CoolCoba(void);
00063
00064 void CoolDima(void);
00065
00066 void CoolIron(void);
00067
00068 void CoolMagn(void);
00069
00070 void CoolNeon(void);
00071
00072 void CoolNick(void);
00073
00074 void CoolNitr(void);
00075
00076 void CoolOxyg(void);
00077
00078 void CoolPhos(void);
00079
00080 void CoolPota(void);
00081
00082 void CoolScan(void);
00083
00084 void CoolSili(void);
00085
00086 void CoolSodi(void);
00087
00088 void CoolSulf(void);
00089
00090 void oi_cs(double& cs3P23P1,
00091 double& cs3P23P0,
00092 double& cs3P13P0,
00093 double& cs3P1D2,
00094 double& cs1D21S0,
00095 double& cs3P1S0);
00096
00097 void oi_othercs(double& csh01,
00098 double& cshe01,
00099 double& csh201,
00100 double& csh12,
00101 double& cshe12,
00102 double& csh212,
00103 double& csh02,
00104 double& cshe02,
00105 double& csh202,
00106 double& csh2o01,
00107 double& csh2o02,
00108 double& csh2o12,
00109 double& csh2p01,
00110 double& csh2p02,
00111 double& csh2p12,
00112 double& csp01,
00113 double& csp02,
00114 double& csp12);
00115
00116 void oii_cs(double& oii_cs4S32D5,
00117 double& oii_cs4S32D3,
00118 double& oii_cs2D52D3,
00119 double& oii_cs4S32P3,
00120 double& oii_cs2D52P3,
00121 double& oii_cs2D32P3,
00122 double& oii_cs4S32P1,
00123 double& oii_cs2D52P1,
00124 double& oii_cs2D32P1,
00125 double& oii_cs2P32P1,
00126 double& oii_cs4S34P);
00127
00128 void oiii_cs(double& oiii_cs3P25S2,
00129 double& oiii_cs3P15S2,
00130 double& oiii_cs3P05S2,
00131 double& oiii_cs3P1D2,
00132 double& oiii_cs1D21S0,
00133 double& oiii_cs3P1S0,
00134 double& oiii_cs3P03P1,
00135 double& oiii_cs3P13P2,
00136 double& oiii_cs3P03P2,
00137 double& oiii_cs3P3D);
00138
00139 void oiv_cs(double& oiv_cs2P2D,double& oiv_cs2P12P3);
00140
00141 void ov_cs(double& ov_cs1S01P1,double& ov_cs1S03P);
00142
00143 void sii_cs(double& sii_cs4S32D3,
00144 double& sii_cs4S32D5,
00145 double& sii_cs4S32P1,
00146 double& sii_cs4S32P3,
00147 double& sii_cs2D32D5,
00148 double& sii_cs2D32P1,
00149 double& sii_cs2D52P1,
00150 double& sii_cs2D32P3,
00151 double& sii_cs2D52P3,
00152 double& sii_cs2P12P3,
00153 double& sii_cs4S34P);
00154
00155 void siii_cs(double& siii_cs3P03P1,
00156 double& siii_cs3P03P2,
00157 double& siii_cs3P01D2,
00158 double& siii_cs3P01S0,
00159 double& siii_cs3P13P2,
00160 double& siii_cs3P11D2,
00161 double& siii_cs3P11S0,
00162 double& siii_cs3P21D2,
00163 double& siii_cs3P21S0,
00164 double& siii_cs1D21S0,
00165 double& siii_cs3P3D,
00166 double& siii_cs3P5S2);
00167
00168 void siv_cs(double& siv_cs2P12P3);
00169
00170 void sviii_cs(double& sviii_cs2P32P1);
00171
00172 void neiii_cs(double& neiii_cs3P13P0,
00173 double& neiii_cs3P23P1,
00174 double& neiii_cs3P23P0,
00175 double& neiii_cs3P1D2,
00176 double& neiii_cs3P1S0);
00177
00178 double Fe3_cs(long ipLo,long ipHi);
00179
00180 double Fe4_cs(long ipLo,long ipHi);
00181
00182 double Fe5_cs(long ipLo,long ipHi);
00183
00184 #endif