Symbol Description Uses
GAM 11



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1146 RAS
      _RL ALF(lng,K), BET(lng,K), GAM(lng,K)
./pkg/fizhi/fizhi_moist.F 1240 RAS
     *,           ALF, BET, GAM, PRH, PRI, HOI, ETA
./pkg/fizhi/fizhi_moist.F 1444 CLOUD
     *,                 ALF, BET, GAM, PRH, PRI, HOL, ETA
./pkg/fizhi/fizhi_moist.F 1583 CLOUD
      _RL ALF(lng,K), BET(lng,K),  GAM(lng,K), PRH(lng,K), PRI(lng,K)
./pkg/fizhi/fizhi_moist.F 1644 CLOUD
          GAM(I,L) = 1.0 / ((1.0 + TX4(I)*ALBCP) * PRH(I,L))
./pkg/fizhi/fizhi_moist.F 1794 CLOUD
         WFN(I) = - GAM(II,IC) * (PRJ(II,IC1) - PRH(II,IC))
./pkg/fizhi/fizhi_moist.F 1819 CLOUD
         WFN(I) = WFN(I) + (TX1(I) - TEM1) * GAM(II,L)
./pkg/fizhi/fizhi_moist.F 1828 CLOUD
         WFN(I) = WFN(I) + TX1(I) * GAM(II,IC)*(PRJ(II,IC1)-PRH(II,IC))
./pkg/fizhi/fizhi_moist.F 1989 CLOUD
      AKM(I)   = AKM(I) + GAM(II,KM1)*(PRJ(II,K)-PRH(II,KM1)) 
./pkg/fizhi/fizhi_moist.F 2026 CLOUD
         TX2(I) = GAM(II,L-1) * (PRJ(II,L) - PRH(II,L-1))
./pkg/fizhi/fizhi_moist.F 2037 CLOUD
     *          (TX2(I) + GAM(II,L)*(PRH(II,L)-PRJ(II,L)))