| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1809 |
CLOUD |
TEM = TX1(I) + (ETA(I,L) - ETA(I,L+1)) * HOL(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
1817 |
CLOUD |
TX1(I) = TX1(I) + TEM*PCU(I) |
|
./pkg/fizhi/fizhi_moist.F |
1820 |
CLOUD |
TX1(I) = TEM |
|
./pkg/fizhi/fizhi_moist.F |
1887 |
CLOUD |
TEM = TX6(I) * (HOL(II,IC)-HOL(II,IC1)) + HOL(II,IC1) |
|
./pkg/fizhi/fizhi_moist.F |
1888 |
CLOUD |
TX8(I) = HOL(II,K) - TEM |
|
./pkg/fizhi/fizhi_moist.F |
1891 |
CLOUD |
TX5(I) = TEM - TEM1 * ALHL |
|
./pkg/fizhi/fizhi_moist.F |
1912 |
CLOUD |
TEM = ETA(I,L) - ETA(I,L+1) |
|
./pkg/fizhi/fizhi_moist.F |
1913 |
CLOUD |
WLQ(I) = WLQ(I) + TEM * QOL(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
1920 |
CLOUD |
TEM = ETA(I,L) - ETA(I,L+1) |
|
./pkg/fizhi/fizhi_moist.F |
1921 |
CLOUD |
UHT(I,NT) = UHT(I,NT) + TEM * UOI(II,L+nltop-1,NT) |
|
./pkg/fizhi/fizhi_moist.F |
1931 |
CLOUD |
TEM = (POI(II,KM1) - POI(II,K)) / (PRH(II,K) - PRH(II,KM1)) |
|
./pkg/fizhi/fizhi_moist.F |
1932 |
CLOUD |
HOL(I,K) = TEM * (PRJ(II,K)-PRH(II,KM1))*PRH(II,K)*PRI(II,K) |
|
./pkg/fizhi/fizhi_moist.F |
1933 |
CLOUD |
HOL(I,KM1) = TEM * (PRH(II,K)-PRJ(II,K))*PRH(II,KM1)*PRI(II,KM1) |
|
./pkg/fizhi/fizhi_moist.F |
1942 |
CLOUD |
TEM = (POI(II,L-1) - POI(II,L)) * ETA(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
1945 |
CLOUD |
HOL(I,L) = TEM * (PRJ(II,L)-PRH(II,L-1)) * PRH(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
1947 |
CLOUD |
HOL(I,L-1) = TEM * (PRH(II,L)-PRJ(II,L)) * PRH(II,L-1) |
|
./pkg/fizhi/fizhi_moist.F |
2053 |
CLOUD |
TEM = PRI(II,IC1) / PRI(II,IC) |
|
./pkg/fizhi/fizhi_moist.F |
2054 |
CLOUD |
HOL(I,IC1) = HOL(I,IC1) + HOL(I,IC) * TEM |
|
./pkg/fizhi/fizhi_moist.F |
2057 |
CLOUD |
GMH(I,IC1) = GMH(I,IC1) + GMH(I,IC) * TEM |
|
./pkg/fizhi/fizhi_moist.F |
2078 |
CLOUD |
TEM = (PRS(II,K+1)-PRS(II,K))*(CMB2PA*FRAC) |
|
./pkg/fizhi/fizhi_moist.F |
2079 |
CLOUD |
WFN(I) = MIN(WFN(I), TEM) |
|
./pkg/fizhi/fizhi_moist.F |
2123 |
CLOUD |
TEM = (GMH(I,L) - HOL(I,L)) * TX4(I) |
|
./pkg/fizhi/fizhi_moist.F |
2127 |
CLOUD |
QCU(II,L) = TEM |
|
./pkg/fizhi/fizhi_moist.F |
2146 |
CLOUD |
TEM = half*TX5(I) * PRI(II,K) |
|
./pkg/fizhi/fizhi_moist.F |
2148 |
CLOUD |
ucu(II,K,nt) = TEM * TX1(I) |
|
./pkg/fizhi/fizhi_moist.F |
2156 |
CLOUD |
TEM = half*TX5(I) * PRI(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
2159 |
CLOUD |
TX3(I) = (TX1(I) + TEM1) * TEM |
|
./pkg/fizhi/fizhi_moist.F |
2169 |
CLOUD |
TEM = half*TX5(I) * PRI(II,IC) |
|
./pkg/fizhi/fizhi_moist.F |
2171 |
CLOUD |
TEM = 0.0 |
|
./pkg/fizhi/fizhi_moist.F |
2173 |
CLOUD |
TX1(I) = (TX1(I) + UHT(I,nt) + UHT(I,nt)) * TEM |