| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1875 |
CLOUD |
TEM = TX1(I) + (ETA(I,L) - ETA(I,L+1)) * HOL(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
1883 |
CLOUD |
TX1(I) = TX1(I) + TEM*PCU(I) |
|
./pkg/fizhi/fizhi_moist.F |
1886 |
CLOUD |
TX1(I) = TEM |
|
./pkg/fizhi/fizhi_moist.F |
1959 |
CLOUD |
TEM = TX6(I) * (HOL(II,IC)-HOL(II,IC1)) + HOL(II,IC1) |
|
./pkg/fizhi/fizhi_moist.F |
1960 |
CLOUD |
TX8(I) = HOL(II,K) - TEM |
|
./pkg/fizhi/fizhi_moist.F |
1963 |
CLOUD |
TX5(I) = TEM - TEM1 * ALHL |
|
./pkg/fizhi/fizhi_moist.F |
1984 |
CLOUD |
TEM = ETA(I,L) - ETA(I,L+1) |
|
./pkg/fizhi/fizhi_moist.F |
1985 |
CLOUD |
WLQ(I) = WLQ(I) + TEM * QOL(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
1992 |
CLOUD |
TEM = ETA(I,L) - ETA(I,L+1) |
|
./pkg/fizhi/fizhi_moist.F |
1993 |
CLOUD |
UHT(I,NT) = UHT(I,NT) + TEM * UOI(II,L+nltop-1,NT) |
|
./pkg/fizhi/fizhi_moist.F |
2003 |
CLOUD |
TEM = (POI(II,KM1) - POI(II,K)) / (PRH(II,K) - PRH(II,KM1)) |
|
./pkg/fizhi/fizhi_moist.F |
2004 |
CLOUD |
HOL(I,K) = TEM * (PRJ(II,K)-PRH(II,KM1))*PRH(II,K)*PRI(II,K) |
|
./pkg/fizhi/fizhi_moist.F |
2005 |
CLOUD |
HOL(I,KM1) = TEM * (PRH(II,K)-PRJ(II,K))*PRH(II,KM1)*PRI(II,KM1) |
|
./pkg/fizhi/fizhi_moist.F |
2014 |
CLOUD |
TEM = (POI(II,L-1) - POI(II,L)) * ETA(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
2017 |
CLOUD |
HOL(I,L) = TEM * (PRJ(II,L)-PRH(II,L-1)) * PRH(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
2019 |
CLOUD |
HOL(I,L-1) = TEM * (PRH(II,L)-PRJ(II,L)) * PRH(II,L-1) |
|
./pkg/fizhi/fizhi_moist.F |
2125 |
CLOUD |
TEM = PRI(II,IC1) / PRI(II,IC) |
|
./pkg/fizhi/fizhi_moist.F |
2126 |
CLOUD |
HOL(I,IC1) = HOL(I,IC1) + HOL(I,IC) * TEM |
|
./pkg/fizhi/fizhi_moist.F |
2129 |
CLOUD |
GMH(I,IC1) = GMH(I,IC1) + GMH(I,IC) * TEM |
|
./pkg/fizhi/fizhi_moist.F |
2150 |
CLOUD |
TEM = (PRS(II,K+1)-PRS(II,K))*(CMB2PA*FRAC) |
|
./pkg/fizhi/fizhi_moist.F |
2151 |
CLOUD |
WFN(I) = MIN(WFN(I), TEM) |
|
./pkg/fizhi/fizhi_moist.F |
2195 |
CLOUD |
TEM = (GMH(I,L) - HOL(I,L)) * TX4(I) |
|
./pkg/fizhi/fizhi_moist.F |
2199 |
CLOUD |
QCU(II,L) = TEM |
|
./pkg/fizhi/fizhi_moist.F |
2218 |
CLOUD |
TEM = half*TX5(I) * PRI(II,K) |
|
./pkg/fizhi/fizhi_moist.F |
2220 |
CLOUD |
ucu(II,K,nt) = TEM * TX1(I) |
|
./pkg/fizhi/fizhi_moist.F |
2228 |
CLOUD |
TEM = half*TX5(I) * PRI(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
2231 |
CLOUD |
TX3(I) = (TX1(I) + TEM1) * TEM |
|
./pkg/fizhi/fizhi_moist.F |
2241 |
CLOUD |
TEM = half*TX5(I) * PRI(II,IC) |
|
./pkg/fizhi/fizhi_moist.F |
2243 |
CLOUD |
TEM = 0.0 |
|
./pkg/fizhi/fizhi_moist.F |
2245 |
CLOUD |
TX1(I) = (TX1(I) + UHT(I,nt) + UHT(I,nt)) * TEM |
|
./pkg/atm2d/forward_step_atm2d.F |
279 |
FORWARD_STEP_ATM2D |
CALL TEM(idyear,monid-1) |