Symbol Description Uses
QS2 16



File Line number Procedure Code
./pkg/aim_v23/phy_shtorh.F 43 SHTORH
      _RL E0, C1, C2, T0, T1, T2, QS1, QS2
./pkg/aim_v23/phy_shtorh.F 57 SHTORH
      QS2= .378 _d 0
./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 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/aim_v23/phy_shtorh.F 92 SHTORH
          QSAT(J)= QS1*QSAT(J)/( PS(1)   - QS2*QSAT(J))
./pkg/aim_v23/phy_shtorh.F 96 SHTORH
          QSAT(J)= QS1*QSAT(J)/(SIG*PS(J)- QS2*QSAT(J))
./pkg/bulk_force/bulkf_sh2rh_aim.F 43 BULKF_SH2RH_AIM
      _RL E0, C1, C2, T0, T1, T2, QS1, QS2
./pkg/bulk_force/bulkf_sh2rh_aim.F 57 BULKF_SH2RH_AIM
      QS2= .378 _d 0
./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 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)
./pkg/bulk_force/bulkf_sh2rh_aim.F 92 BULKF_SH2RH_AIM
          QSAT(J)= QS1*QSAT(J)/( PS(1)   - QS2*QSAT(J))
./pkg/bulk_force/bulkf_sh2rh_aim.F 96 BULKF_SH2RH_AIM
          QSAT(J)= QS1*QSAT(J)/(SIG*PS(J)- QS2*QSAT(J))