File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
1207 |
RAS |
_RL HST(lng,K), QOL(lng,K), GMH(lng,K) |
./pkg/fizhi/fizhi_moist.F |
1301 |
RAS |
*, HST, QOL, GMH |
./pkg/fizhi/fizhi_moist.F |
1505 |
CLOUD |
*, HST, QOL, GMH |
./pkg/fizhi/fizhi_moist.F |
1645 |
CLOUD |
_RL GMH(LENC,K) |
./pkg/fizhi/fizhi_moist.F |
2059 |
CLOUD |
GMH(I,K) = HOL(I,K) + TX3(I) * PRI(II,K) * (ALBCP) |
./pkg/fizhi/fizhi_moist.F |
2062 |
CLOUD |
* * GMH(I,K) |
./pkg/fizhi/fizhi_moist.F |
2074 |
CLOUD |
GMH(I,L) = HOL(I,L) + TX2(I) * PRI(II,L) * (ALBCP*HALF) |
./pkg/fizhi/fizhi_moist.F |
2084 |
CLOUD |
GMH(I,IC) = TX1(I) + PRI(I1(I),IC) * ONEBCP |
./pkg/fizhi/fizhi_moist.F |
2092 |
CLOUD |
TX1(I) = GMH(I,K) |
./pkg/fizhi/fizhi_moist.F |
2097 |
CLOUD |
TX1(I) = TX1(I) + (ETA(I,L) - ETA(I,L+1)) * GMH(I,L) |
./pkg/fizhi/fizhi_moist.F |
2129 |
CLOUD |
GMH(I,IC1) = GMH(I,IC1) + GMH(I,IC) * TEM |
./pkg/fizhi/fizhi_moist.F |
2130 |
CLOUD |
GMH(I,IC) = ZERO |
./pkg/fizhi/fizhi_moist.F |
2195 |
CLOUD |
TEM = (GMH(I,L) - HOL(I,L)) * TX4(I) |