File |
Line number |
Procedure |
Code |
./pkg/fizhi/update_chemistry_exports.F |
213 |
INTERP_QZ |
QPR2(i) = stratq(jlatp,k) |
./pkg/fizhi/update_chemistry_exports.F |
247 |
INTERP_QZ |
QPR2(i) = h2o_time_lat(i,LP) |
./pkg/fizhi/update_chemistry_exports.F |
251 |
INTERP_QZ |
slope(i) =(QPR1(i)-QPR2(i)) / (PR1(i)-PR2(i)) |
./pkg/fizhi/update_chemistry_exports.F |
252 |
INTERP_QZ |
qz_clim(i,L2) = QPR2(i) + (pres(i,L2)-PR2(i))*SLOPE(i) |
./pkg/fizhi/update_chemistry_exports.F |
314 |
INTERP_OZ |
_RL QPR1(IRUN), QPR2(IRUN), SLOPE(IRUN) |
./pkg/fizhi/update_chemistry_exports.F |
344 |
INTERP_OZ |
QPR2(I) = ozone(jlatp,k) |
./pkg/fizhi/update_chemistry_exports.F |
378 |
INTERP_OZ |
QPR2(I) = O3INT1(I,LP) |
./pkg/fizhi/update_chemistry_exports.F |
382 |
INTERP_OZ |
SLOPE(I) = ( QPR1(I)-QPR2(I) ) |
./pkg/fizhi/update_chemistry_exports.F |
384 |
INTERP_OZ |
ozrad(I,L2) = QPR2(I) + ( PLEVS(I,L2)-PR2(I) )*SLOPE(I) |