Symbol Description Uses
QPR2 9



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)