File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
1683 |
CLOUD |
TEM1 = TX2(I) + PRJ(I,L+1) * POI(I,L) * CP |
./pkg/fizhi/fizhi_moist.F |
1684 |
CLOUD |
HOL(I,L) = TEM1 + QOL(I,L )* ALHL |
./pkg/fizhi/fizhi_moist.F |
1685 |
CLOUD |
HST(I,L) = TEM1 + QS1(I) * ALHL |
./pkg/fizhi/fizhi_moist.F |
1701 |
CLOUD |
TEM1 = TX2(I) + PRJ(I,IC1) * POI(I,IC) * CP |
./pkg/fizhi/fizhi_moist.F |
1702 |
CLOUD |
HOL(I,IC) = TEM1 + QOL(I,IC) * ALHL |
./pkg/fizhi/fizhi_moist.F |
1703 |
CLOUD |
HST(I,IC) = TEM1 + QS1(I) * ALHL |
./pkg/fizhi/fizhi_moist.F |
1812 |
CLOUD |
TEM1 = ETA(I,L+1) * PCU(I) |
./pkg/fizhi/fizhi_moist.F |
1816 |
CLOUD |
TEM1 = (TEM1 + ETA(I,L) * PCU(I)) * HST(II,L) |
./pkg/fizhi/fizhi_moist.F |
1819 |
CLOUD |
WFN(I) = WFN(I) + (TX1(I) - TEM1) * GAM(II,L) |
./pkg/fizhi/fizhi_moist.F |
1890 |
CLOUD |
TEM1 = TX6(I) * (QOL(II,IC)-QOL(II,IC1)) + QOL(II,IC1) |
./pkg/fizhi/fizhi_moist.F |
1891 |
CLOUD |
TX5(I) = TEM - TEM1 * ALHL |
./pkg/fizhi/fizhi_moist.F |
1892 |
CLOUD |
QS1(I) = TEM1 + TX8(I)*(ONE/ALHL) |
./pkg/fizhi/fizhi_moist.F |
2124 |
CLOUD |
TEM1 = HOL(I,L) * TX5(I) |
./pkg/fizhi/fizhi_moist.F |
2126 |
CLOUD |
TCU(II,L) = TEM1 / PRH(II,L) |
./pkg/fizhi/fizhi_moist.F |
2157 |
CLOUD |
TEM1 = TX1(I) |
./pkg/fizhi/fizhi_moist.F |
2159 |
CLOUD |
TX3(I) = (TX1(I) + TEM1) * TEM |