Symbol Description Uses
TEM1 17



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1743 CLOUD
         TEM1 = TX2(I) + PRJ(I,L+1) * POI(I,L) * CP
./pkg/fizhi/fizhi_moist.F 1744 CLOUD
         HOL(I,L) = TEM1 + QOL(I,L )* ALHL
./pkg/fizhi/fizhi_moist.F 1745 CLOUD
         HST(I,L) = TEM1 + QS1(I)   * ALHL
./pkg/fizhi/fizhi_moist.F 1761 CLOUD
      TEM1      = TX2(I) + PRJ(I,IC1) * POI(I,IC) * CP
./pkg/fizhi/fizhi_moist.F 1762 CLOUD
      HOL(I,IC) = TEM1 + QOL(I,IC) * ALHL
./pkg/fizhi/fizhi_moist.F 1763 CLOUD
      HST(I,IC) = TEM1 + QS1(I)    * ALHL
./pkg/fizhi/fizhi_moist.F 1878 CLOUD
         TEM1   = ETA(I,L+1) * PCU(I)
./pkg/fizhi/fizhi_moist.F 1882 CLOUD
         TEM1   = (TEM1 + ETA(I,L) * PCU(I)) * HST(II,L)
./pkg/fizhi/fizhi_moist.F 1885 CLOUD
         WFN(I) = WFN(I) + (TX1(I) - TEM1) * GAM(II,L)
./pkg/fizhi/fizhi_moist.F 1962 CLOUD
      TEM1   = TX6(I) * (QOL(II,IC)-QOL(II,IC1)) + QOL(II,IC1)
./pkg/fizhi/fizhi_moist.F 1963 CLOUD
      TX5(I) = TEM    - TEM1 * ALHL
./pkg/fizhi/fizhi_moist.F 1964 CLOUD
      QS1(I) = TEM1   + TX8(I)*(ONE/ALHL)
./pkg/fizhi/fizhi_moist.F 2196 CLOUD
      TEM1     =  HOL(I,L) * TX5(I)
./pkg/fizhi/fizhi_moist.F 2198 CLOUD
      TCU(II,L) = TEM1 / PRH(II,L)
./pkg/fizhi/fizhi_moist.F 2229 CLOUD
      TEM1   = TX1(I)
./pkg/fizhi/fizhi_moist.F 2231 CLOUD
      TX3(I) = (TX1(I) + TEM1) * TEM