| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
2331 |
RNEVP |
_RL rainmax(irun) |
|
./pkg/fizhi/fizhi_moist.F |
2471 |
RNEVP |
rainmax(i) = rhcrit(i,L)*evp9(i,L) + |
|
./pkg/fizhi/fizhi_moist.F |
2474 |
RNEVP |
if (rainmax(i).LE.0.0) then |
|
./pkg/fizhi/fizhi_moist.F |
2487 |
RNEVP |
RLAR(I) = RLAR(I)-rainmax(I) |
|
./pkg/fizhi/fizhi_moist.F |
2488 |
RNEVP |
QL(I,L) = QL(I,L)+rainmax(I)*TEMP3(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
2489 |
RNEVP |
TL(I,L) = TL(I,L)-rainmax(I)*TEMP3(I,L)*ELOCP |
|
./pkg/fizhi/fizhi_moist.F |
2491 |
RNEVP |
cldlz(i,L) = cldlz(i,L) - rainmax(i)*temp3(i,L) |
|
./pkg/fizhi/fizhi_moist.F |
2496 |
RNEVP |
IF((RLAR(I).GT.0.0).AND.(rainmax(I).GT.0.0))THEN |
|
./pkg/fizhi/fizhi_moist.F |
2500 |
RNEVP |
TEMP1(I,7) = rainmax(I)*AREARAT |