| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1149 |
RAS |
_RL HST(lng,K), QOL(lng,K), GMH(lng,K) |
|
./pkg/fizhi/fizhi_moist.F |
1241 |
RAS |
*, HST, QOL, GMH |
|
./pkg/fizhi/fizhi_moist.F |
1445 |
CLOUD |
*, HST, QOL, GMH |
|
./pkg/fizhi/fizhi_moist.F |
1585 |
CLOUD |
_RL GMH(LENC,K) |
|
./pkg/fizhi/fizhi_moist.F |
1987 |
CLOUD |
GMH(I,K) = HOL(I,K) + TX3(I) * PRI(II,K) * (ALBCP) |
|
./pkg/fizhi/fizhi_moist.F |
1990 |
CLOUD |
* * GMH(I,K) |
|
./pkg/fizhi/fizhi_moist.F |
2002 |
CLOUD |
GMH(I,L) = HOL(I,L) + TX2(I) * PRI(II,L) * (ALBCP*HALF) |
|
./pkg/fizhi/fizhi_moist.F |
2012 |
CLOUD |
GMH(I,IC) = TX1(I) + PRI(I1(I),IC) * ONEBCP |
|
./pkg/fizhi/fizhi_moist.F |
2020 |
CLOUD |
TX1(I) = GMH(I,K) |
|
./pkg/fizhi/fizhi_moist.F |
2025 |
CLOUD |
TX1(I) = TX1(I) + (ETA(I,L) - ETA(I,L+1)) * GMH(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
2057 |
CLOUD |
GMH(I,IC1) = GMH(I,IC1) + GMH(I,IC) * TEM |
|
./pkg/fizhi/fizhi_moist.F |
2058 |
CLOUD |
GMH(I,IC) = ZERO |
|
./pkg/fizhi/fizhi_moist.F |
2123 |
CLOUD |
TEM = (GMH(I,L) - HOL(I,L)) * TX4(I) |