| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1122 |
RAS |
*, cp,grav,rkappa,alhl,rhfrac,rasmax ) |
|
./pkg/fizhi/fizhi_moist.F |
1141 |
RAS |
_RL cp,grav,rkappa,alhl,rhfrac(lng),rasmax |
|
./pkg/fizhi/fizhi_moist.F |
1244 |
RAS |
*, IA1,IA2,IA3,rhfrac) |
|
./pkg/fizhi/fizhi_moist.F |
1256 |
RAS |
tx1(i) = rhfrac(i)*rknob * cmass(i,ib) / tx1(i) |
|
./pkg/fizhi/fizhi_moist.F |
125 |
MOISTIO |
_RL rhfrac(istrip), rhmin, pup, ppbl, rhcrit(istrip,lm) |
|
./pkg/fizhi/fizhi_moist.F |
1265 |
RAS |
cmass(i,L) = rhfrac(i)*cmass(i,L) * dt |
|
./pkg/fizhi/fizhi_moist.F |
1282 |
RAS |
POI(I,L) = POI(I,L) + TCU(I,L) * DT * rhfrac(i) |
|
./pkg/fizhi/fizhi_moist.F |
1283 |
RAS |
QOI(I,L) = QOI(I,L) + QCU(I,L) * DT * rhfrac(i) |
|
./pkg/fizhi/fizhi_moist.F |
1289 |
RAS |
UOI(I,L+nltop-1,NT)=UOI(I,L+nltop-1,NT)+UCU(I,L,NT)*DT*rhfrac(i) |
|
./pkg/fizhi/fizhi_moist.F |
1294 |
RAS |
rains(I,ib) = rains(I,ib) + PCU(I)*dt * rhfrac(i) |
|
./pkg/fizhi/fizhi_moist.F |
1305 |
RAS |
temp = TCU(I,L) * DT * rhfrac(i) |
|
./pkg/fizhi/fizhi_moist.F |
1448 |
CLOUD |
*, IA, I1, I2,rhfrac) |
|
./pkg/fizhi/fizhi_moist.F |
1592 |
CLOUD |
_RL rhfrac(lng) |
|
./pkg/fizhi/fizhi_moist.F |
1727 |
CLOUD |
. .AND. rhfrac(i).ne.0.0 ) THEN |
|
./pkg/fizhi/fizhi_moist.F |
1738 |
CLOUD |
. .AND. rhfrac(i).ne.0.0 ) THEN |
|
./pkg/fizhi/fizhi_moist.F |
470 |
MOISTIO |
rhfrac(i) = 1. |
|
./pkg/fizhi/fizhi_moist.F |
512 |
MOISTIO |
8, cp,grav,rkappa,alhl,rhfrac(num),rasmax ) |