Symbol Description Uses
GAM 11



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1204 RAS
      _RL ALF(lng,K), BET(lng,K), GAM(lng,K)
./pkg/fizhi/fizhi_moist.F 1300 RAS
     *,           ALF, BET, GAM, PRH, PRI, HOI, ETA
./pkg/fizhi/fizhi_moist.F 1504 CLOUD
     *,                 ALF, BET, GAM, PRH, PRI, HOL, ETA
./pkg/fizhi/fizhi_moist.F 1643 CLOUD
      _RL ALF(lng,K), BET(lng,K),  GAM(lng,K), PRH(lng,K), PRI(lng,K)
./pkg/fizhi/fizhi_moist.F 1704 CLOUD
          GAM(I,L) = 1.0 / ((1.0 + TX4(I)*ALBCP) * PRH(I,L))
./pkg/fizhi/fizhi_moist.F 1860 CLOUD
         WFN(I) = - GAM(II,IC) * (PRJ(II,IC1) - PRH(II,IC))
./pkg/fizhi/fizhi_moist.F 1885 CLOUD
         WFN(I) = WFN(I) + (TX1(I) - TEM1) * GAM(II,L)
./pkg/fizhi/fizhi_moist.F 1894 CLOUD
         WFN(I) = WFN(I) + TX1(I) * GAM(II,IC)*(PRJ(II,IC1)-PRH(II,IC))
./pkg/fizhi/fizhi_moist.F 2061 CLOUD
      AKM(I)   = AKM(I) + GAM(II,KM1)*(PRJ(II,K)-PRH(II,KM1))
./pkg/fizhi/fizhi_moist.F 2098 CLOUD
         TX2(I) = GAM(II,L-1) * (PRJ(II,L) - PRH(II,L-1))
./pkg/fizhi/fizhi_moist.F 2109 CLOUD
     *          (TX2(I) + GAM(II,L)*(PRH(II,L)-PRJ(II,L)))