| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1442 |
CLOUD |
*, POI, QOI, UOI, ntracedim, Ntracer, PRS, PRJ |
|
./pkg/fizhi/fizhi_moist.F |
1579 |
CLOUD |
_RL POI(lng,K),QOI(lng,K),PRS(lng,K+1),PRJ(lng,K+1) |
|
./pkg/fizhi/fizhi_moist.F |
1631 |
CLOUD |
PRH(I,L) = (PRJ(I,L+1)*PRS(I,L+1) - PRJ(I,L)*PRS(I,L)) |
|
./pkg/fizhi/fizhi_moist.F |
1632 |
CLOUD |
* / ((PRS(I,L+1)-PRS(I,L)) * RKAPP1) |
|
./pkg/fizhi/fizhi_moist.F |
1639 |
CLOUD |
TX1(I) = (PRS(I,L) + PRS(I,L+1)) * 0.5 |
|
./pkg/fizhi/fizhi_moist.F |
1645 |
CLOUD |
PRI(I,L) = (CP/CMB2PA) / (PRS(I,L+1) - PRS(I,L)) |
|
./pkg/fizhi/fizhi_moist.F |
1763 |
CLOUD |
TX2(I) = 0.5 * (PRS(II,IC) + PRS(II,IC1)) |
|
./pkg/fizhi/fizhi_moist.F |
1764 |
CLOUD |
TX4(I) = PRS(II,K) |
|
./pkg/fizhi/fizhi_moist.F |
1775 |
CLOUD |
TX2(I) = 0.5 * (PRS(II,IC1)+PRS(II,IC1+1)) * (1.0-TX6(I)) |
|
./pkg/fizhi/fizhi_moist.F |
1935 |
CLOUD |
TX2(I) = 0.5 * (PRS(II,IC) + PRS(II,IC1)) |
|
./pkg/fizhi/fizhi_moist.F |
2044 |
CLOUD |
TX2(I) = 0.5 * (PRS(II,IC) + PRS(II,IC1)) |
|
./pkg/fizhi/fizhi_moist.F |
2045 |
CLOUD |
* + 0.5*(PRS(II,IC+2) - PRS(II,IC)) * (ONE-TX6(I)) |
|
./pkg/fizhi/fizhi_moist.F |
2047 |
CLOUD |
TX1(I) = PRS(II,IC1) |
|
./pkg/fizhi/fizhi_moist.F |
2048 |
CLOUD |
TX5(I) = 0.5 * (PRS(II,IC1) + PRS(II,IC+2)) |
|
./pkg/fizhi/fizhi_moist.F |
2078 |
CLOUD |
TEM = (PRS(II,K+1)-PRS(II,K))*(CMB2PA*FRAC) |