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 |
1584 |
CLOUD |
_RL HOL(LENC,K), ETA(LENC,K), HST(LENC,K), QOL(LENC,K) |
./pkg/fizhi/fizhi_moist.F |
1670 |
CLOUD |
QOL(I,K) = MIN(QS1(I)*RHMAX,QOI(I,K)) |
./pkg/fizhi/fizhi_moist.F |
1672 |
CLOUD |
HOL(I,K) = TX1(I)*CP + QOL(I,K)*ALHL |
./pkg/fizhi/fizhi_moist.F |
1681 |
CLOUD |
QOL(I,L) = MIN(QS1(I)*RHMAX,QOI(I,L)) |
./pkg/fizhi/fizhi_moist.F |
1684 |
CLOUD |
HOL(I,L) = TEM1 + QOL(I,L )* ALHL |
./pkg/fizhi/fizhi_moist.F |
1699 |
CLOUD |
QOL(I,IC) = MIN(QS1(I)*RHMAX,QOI(I,IC)) |
./pkg/fizhi/fizhi_moist.F |
1702 |
CLOUD |
HOL(I,IC) = TEM1 + QOL(I,IC) * ALHL |
./pkg/fizhi/fizhi_moist.F |
1749 |
CLOUD |
QOL(I,1) = 0.0 |
./pkg/fizhi/fizhi_moist.F |
1856 |
CLOUD |
QOL(I,1) = 0.0 |
./pkg/fizhi/fizhi_moist.F |
1890 |
CLOUD |
TEM1 = TX6(I) * (QOL(II,IC)-QOL(II,IC1)) + QOL(II,IC1) |
./pkg/fizhi/fizhi_moist.F |
1899 |
CLOUD |
WLQ(I) = QOL(II,K) - QS1(I) * ETA(I,IC) |
./pkg/fizhi/fizhi_moist.F |
1913 |
CLOUD |
WLQ(I) = WLQ(I) + TEM * QOL(II,L) |
./pkg/fizhi/fizhi_moist.F |
1967 |
CLOUD |
TX1(I) = TX1(I) + (TX5(I)-TX3(I)+QOL(II,IC)*ALHL)*(PRI(II,IC)/CP) |
./pkg/fizhi/fizhi_moist.F |
1986 |
CLOUD |
TX3(I) = QOL(II,KM1) - QOL(II,K) |
./pkg/fizhi/fizhi_moist.F |
1999 |
CLOUD |
TX3(I) = (QOL(II,L-1) - QOL(II,L)) * ETA(I,L) |
./pkg/fizhi/fizhi_moist.F |
2009 |
CLOUD |
* * (TX7(I) - TX8(I) - TX5(I) - QOL(I1(I),IC)*ALHL) |