Symbol Description Uses
E0 10



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 50 SHTORH
      E0=  6.108 _d -3
./pkg/aim_v23/phy_shtorh.F 67 SHTORH
          tmpQ   = E0*EXP(C1*(TA(J)-T0)/(TA(J)-T1))
./pkg/aim_v23/phy_shtorh.F 72 SHTORH
          tmpQ   = E0*EXP(C2*(TA(J)-T0)/(TA(J)-T2))
./pkg/aim_v23/phy_shtorh.F 84 SHTORH
          QSAT(J)=E0*EXP(C1*(TA(J)-T0)/(TA(J)-T1))
./pkg/aim_v23/phy_shtorh.F 86 SHTORH
          QSAT(J)=E0*EXP(C2*(TA(J)-T0)/(TA(J)-T2))