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))) |