| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
2403 |
RNEVP |
_RL rainmax(irun) |
|
./pkg/fizhi/fizhi_moist.F |
2544 |
RNEVP |
rainmax(i) = rhcrit(i,L)*evp9(i,L) + |
|
./pkg/fizhi/fizhi_moist.F |
2547 |
RNEVP |
if (rainmax(i).LE.0.0) then |
|
./pkg/fizhi/fizhi_moist.F |
2560 |
RNEVP |
RLAR(I) = RLAR(I)-rainmax(I) |
|
./pkg/fizhi/fizhi_moist.F |
2561 |
RNEVP |
QL(I,L) = QL(I,L)+rainmax(I)*TEMP3(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
2562 |
RNEVP |
TL(I,L) = TL(I,L)-rainmax(I)*TEMP3(I,L)*ELOCP |
|
./pkg/fizhi/fizhi_moist.F |
2564 |
RNEVP |
cldlz(i,L) = cldlz(i,L) - rainmax(i)*temp3(i,L) |
|
./pkg/fizhi/fizhi_moist.F |
2569 |
RNEVP |
IF((RLAR(I).GT.0.0).AND.(rainmax(I).GT.0.0))THEN |
|
./pkg/fizhi/fizhi_moist.F |
2573 |
RNEVP |
TEMP1(I,7) = rainmax(I)*AREARAT |