![LI-COR li-6262 Скачать руководство пользователя страница 123](http://html.mh-extra.com/html/li-cor/li-6262/li-6262_instruction-manual_1906652123.webp)
Sample Program
H-5
water_flag = 0;
T_cal = Cal_temp;
K_cal = Cal_k;
A_cal = coeffs[0];
B_cal = coeffs[1];
C_cal = coeffs[2];
D_cal = coeffs[3];
E_cal = coeffs[4];
Water_A = water_corr_a;
if (vapor_correct_flag == 0) {
vap_ref = 0;
vap_samp = 0;
}
Cs = ppm(mv, ref, temp, vap_ref/1000.0*pressure,
vap_samp/1000.0*pressure, pressure);
/* The dilution correction is hypothetical. It says what the concentration
in the sample cell would be if the water vapor concentration there
were the same as in the reference cell.
*/
if (vapor_correct_flag == 2)
Cs *= (1.0 - vap_ref/1000.0) / (1.0 - vap_samp/1000.0);
return Cs;
}
/* ------------------------------------------------------------------------- */
double compute_h2o(double Cal_temp, double Cal_k, double coeffs[],
double mv, double temp, double ref, double pressure)
{
/*
Compute co2 concentration (umol/mol)
Cal_temp - calibration temp (C)
Cal_k - calibration K factor
coeffs[] - Calibration A, B, C
mv - raw H2O signal (mV)
temp - IRGA temp (C)
ref - H2O reference concentration (umol/mol)