File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
1743 |
CLOUD |
TEM1 = TX2(I) + PRJ(I,L+1) * POI(I,L) * CP |
./pkg/fizhi/fizhi_moist.F |
1744 |
CLOUD |
HOL(I,L) = TEM1 + QOL(I,L )* ALHL |
./pkg/fizhi/fizhi_moist.F |
1745 |
CLOUD |
HST(I,L) = TEM1 + QS1(I) * ALHL |
./pkg/fizhi/fizhi_moist.F |
1761 |
CLOUD |
TEM1 = TX2(I) + PRJ(I,IC1) * POI(I,IC) * CP |
./pkg/fizhi/fizhi_moist.F |
1762 |
CLOUD |
HOL(I,IC) = TEM1 + QOL(I,IC) * ALHL |
./pkg/fizhi/fizhi_moist.F |
1763 |
CLOUD |
HST(I,IC) = TEM1 + QS1(I) * ALHL |
./pkg/fizhi/fizhi_moist.F |
1878 |
CLOUD |
TEM1 = ETA(I,L+1) * PCU(I) |
./pkg/fizhi/fizhi_moist.F |
1882 |
CLOUD |
TEM1 = (TEM1 + ETA(I,L) * PCU(I)) * HST(II,L) |
./pkg/fizhi/fizhi_moist.F |
1885 |
CLOUD |
WFN(I) = WFN(I) + (TX1(I) - TEM1) * GAM(II,L) |
./pkg/fizhi/fizhi_moist.F |
1962 |
CLOUD |
TEM1 = TX6(I) * (QOL(II,IC)-QOL(II,IC1)) + QOL(II,IC1) |
./pkg/fizhi/fizhi_moist.F |
1963 |
CLOUD |
TX5(I) = TEM - TEM1 * ALHL |
./pkg/fizhi/fizhi_moist.F |
1964 |
CLOUD |
QS1(I) = TEM1 + TX8(I)*(ONE/ALHL) |
./pkg/fizhi/fizhi_moist.F |
2196 |
CLOUD |
TEM1 = HOL(I,L) * TX5(I) |
./pkg/fizhi/fizhi_moist.F |
2198 |
CLOUD |
TCU(II,L) = TEM1 / PRH(II,L) |
./pkg/fizhi/fizhi_moist.F |
2229 |
CLOUD |
TEM1 = TX1(I) |
./pkg/fizhi/fizhi_moist.F |
2231 |
CLOUD |
TX3(I) = (TX1(I) + TEM1) * TEM |