Symbol Description Uses
tmpQ 18


File Line number Procedure Code
./pkg/aim_v23/phy_shtorh.F 44 SHTORH 
      _RL sigP, recT, tmpQ
./pkg/aim_v23/phy_shtorh.F 67 SHTORH 
          tmpQ   = E0*EXP(C1*(TA(J)-T0)/(TA(J)-T1))
./pkg/aim_v23/phy_shtorh.F 68 SHTORH 
          QSAT(J)= QS1*tmpQ/(sigP-QS2*tmpQ)
./pkg/aim_v23/phy_shtorh.F 70 SHTORH 
          RH(J)  = QSAT(J)*C1*(T0-T1)*recT*recT*sigP/(sigP-QS2*tmpQ)
./pkg/aim_v23/phy_shtorh.F 72 SHTORH 
          tmpQ   = E0*EXP(C2*(TA(J)-T0)/(TA(J)-T2))
./pkg/aim_v23/phy_shtorh.F 73 SHTORH 
          QSAT(J)= QS1*tmpQ/(sigP-QS2*tmpQ)
./pkg/aim_v23/phy_shtorh.F 75 SHTORH 
          RH(J)  = QSAT(J)*C2*(T0-T2)*recT*recT*sigP/(sigP-QS2*tmpQ)
./pkg/bulk_force/bulkf_sh2rh_aim.F 44 BULKF_SH2RH_AIM 
      _RL sigP, recT, tmpQ
./pkg/bulk_force/bulkf_sh2rh_aim.F 67 BULKF_SH2RH_AIM 
          tmpQ   = E0*EXP(C1*(TA(J)-T0)/(TA(J)-T1))
./pkg/bulk_force/bulkf_sh2rh_aim.F 68 BULKF_SH2RH_AIM 
          QSAT(J)= QS1*tmpQ/(sigP-QS2*tmpQ)
./pkg/bulk_force/bulkf_sh2rh_aim.F 70 BULKF_SH2RH_AIM 
          RH(J)  = QSAT(J)*C1*(T0-T1)*recT*recT*sigP/(sigP-QS2*tmpQ)
./pkg/bulk_force/bulkf_sh2rh_aim.F 72 BULKF_SH2RH_AIM 
          tmpQ   = E0*EXP(C2*(TA(J)-T0)/(TA(J)-T2))
./pkg/bulk_force/bulkf_sh2rh_aim.F 73 BULKF_SH2RH_AIM 
          QSAT(J)= QS1*tmpQ/(sigP-QS2*tmpQ)
./pkg/bulk_force/bulkf_sh2rh_aim.F 75 BULKF_SH2RH_AIM 
          RH(J)  = QSAT(J)*C2*(T0-T2)*recT*recT*sigP/(sigP-QS2*tmpQ)