File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
1178 |
RAS |
*, UOI, ntracedim, ntracer, POI, QOI, PRS, PRJ, rnd, ncrnd |
./pkg/fizhi/fizhi_moist.F |
1195 |
RAS |
_RL QOI(lng,K), PRS(lng,K+1), PRJ(lng,K+1) |
./pkg/fizhi/fizhi_moist.F |
1298 |
RAS |
*, POI, QOI, UOI, ntracedim, Ntracer, PRS, PRJ |
./pkg/fizhi/fizhi_moist.F |
1502 |
CLOUD |
*, POI, QOI, UOI, ntracedim, Ntracer, PRS, PRJ |
./pkg/fizhi/fizhi_moist.F |
1639 |
CLOUD |
_RL POI(lng,K),QOI(lng,K),PRS(lng,K+1),PRJ(lng,K+1) |
./pkg/fizhi/fizhi_moist.F |
1691 |
CLOUD |
PRH(I,L) = (PRJ(I,L+1)*PRS(I,L+1) - PRJ(I,L)*PRS(I,L)) |
./pkg/fizhi/fizhi_moist.F |
1692 |
CLOUD |
* / ((PRS(I,L+1)-PRS(I,L)) * RKAPP1) |
./pkg/fizhi/fizhi_moist.F |
1699 |
CLOUD |
TX1(I) = (PRS(I,L) + PRS(I,L+1)) * 0.5 |
./pkg/fizhi/fizhi_moist.F |
1705 |
CLOUD |
PRI(I,L) = (CP/CMB2PA) / (PRS(I,L+1) - PRS(I,L)) |
./pkg/fizhi/fizhi_moist.F |
1829 |
CLOUD |
TX2(I) = 0.5 * (PRS(II,IC) + PRS(II,IC1)) |
./pkg/fizhi/fizhi_moist.F |
1830 |
CLOUD |
TX4(I) = PRS(II,K) |
./pkg/fizhi/fizhi_moist.F |
1841 |
CLOUD |
TX2(I) = 0.5 * (PRS(II,IC1)+PRS(II,IC1+1)) * (1.0-TX6(I)) |
./pkg/fizhi/fizhi_moist.F |
2007 |
CLOUD |
TX2(I) = 0.5 * (PRS(II,IC) + PRS(II,IC1)) |
./pkg/fizhi/fizhi_moist.F |
2116 |
CLOUD |
TX2(I) = 0.5 * (PRS(II,IC) + PRS(II,IC1)) |
./pkg/fizhi/fizhi_moist.F |
2117 |
CLOUD |
* + 0.5*(PRS(II,IC+2) - PRS(II,IC)) * (ONE-TX6(I)) |
./pkg/fizhi/fizhi_moist.F |
2119 |
CLOUD |
TX1(I) = PRS(II,IC1) |
./pkg/fizhi/fizhi_moist.F |
2120 |
CLOUD |
TX5(I) = 0.5 * (PRS(II,IC1) + PRS(II,IC+2)) |
./pkg/fizhi/fizhi_moist.F |
2150 |
CLOUD |
TEM = (PRS(II,K+1)-PRS(II,K))*(CMB2PA*FRAC) |