File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
1206 |
RAS |
*, PRH(lng,K), PRI(lng,K) |
./pkg/fizhi/fizhi_moist.F |
1300 |
RAS |
*, ALF, BET, GAM, PRH, PRI, HOI, ETA |
./pkg/fizhi/fizhi_moist.F |
1504 |
CLOUD |
*, ALF, BET, GAM, PRH, PRI, HOL, ETA |
./pkg/fizhi/fizhi_moist.F |
1643 |
CLOUD |
_RL ALF(lng,K), BET(lng,K), GAM(lng,K), PRH(lng,K), PRI(lng,K) |
./pkg/fizhi/fizhi_moist.F |
1705 |
CLOUD |
PRI(I,L) = (CP/CMB2PA) / (PRS(I,L+1) - PRS(I,L)) |
./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 |
2018 |
CLOUD |
* * PRI(II,L) + HOL(I,L) |
./pkg/fizhi/fizhi_moist.F |
2020 |
CLOUD |
* * PRI(II,L-1) |
./pkg/fizhi/fizhi_moist.F |
2039 |
CLOUD |
TX1(I) = TX1(I) + (TX5(I)-TX3(I)+QOL(II,IC)*ALHL)*(PRI(II,IC)/CP) |
./pkg/fizhi/fizhi_moist.F |
2043 |
CLOUD |
HOL(I,IC) = TX1(I) - TX2(I) * ALBCP * PRI(I1(I),IC) |
./pkg/fizhi/fizhi_moist.F |
2059 |
CLOUD |
GMH(I,K) = HOL(I,K) + TX3(I) * PRI(II,K) * (ALBCP) |
./pkg/fizhi/fizhi_moist.F |
2074 |
CLOUD |
GMH(I,L) = HOL(I,L) + TX2(I) * PRI(II,L) * (ALBCP*HALF) |
./pkg/fizhi/fizhi_moist.F |
2084 |
CLOUD |
GMH(I,IC) = TX1(I) + PRI(I1(I),IC) * ONEBCP |
./pkg/fizhi/fizhi_moist.F |
2125 |
CLOUD |
TEM = PRI(II,IC1) / PRI(II,IC) |
./pkg/fizhi/fizhi_moist.F |
2218 |
CLOUD |
TEM = half*TX5(I) * PRI(II,K) |
./pkg/fizhi/fizhi_moist.F |
2228 |
CLOUD |
TEM = half*TX5(I) * PRI(II,L) |
./pkg/fizhi/fizhi_moist.F |
2241 |
CLOUD |
TEM = half*TX5(I) * PRI(II,IC) |