| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
2309 |
RNEVP |
_RL rhcrit(irun,nlay) |
|
./pkg/fizhi/fizhi_moist.F |
2471 |
RNEVP |
rainmax(i) = rhcrit(i,L)*evp9(i,L) + |
|
./pkg/fizhi/fizhi_moist.F |
2472 |
RNEVP |
. ql(i,L)*(rhcrit(i,L)-1.)/temp3(i,L) |
|
./pkg/fizhi/fizhi_moist.F |
2478 |
RNEVP |
if( rhcrit(i,L).eq.1.0 ) then |
|
./pkg/fizhi/fizhi_moist.F |
2481 |
RNEVP |
fact = min( 1.0 _d 0, alpha + (1.0-alpha)*( rh-rhcrit(i,L)) / |
|
./pkg/fizhi/fizhi_moist.F |
2482 |
RNEVP |
1 (1.0-rhcrit(i,L)) ) |
|
./pkg/fizhi/fizhi_moist.F |
2553 |
SRCLOUDS |
_RL rhcrit,rh,dum |
|
./pkg/fizhi/fizhi_moist.F |
2583 |
SRCLOUDS |
rhcrit = rhc(i,L) - offset |
|
./pkg/fizhi/fizhi_moist.F |
2584 |
SRCLOUDS |
ratio = alpha*(rh-rhcrit)/offset |
|
./pkg/fizhi/fizhi_moist.F |
480 |
MOISTIO |
rhcrit(i,L) = 1. |
|
./pkg/fizhi/fizhi_moist.F |
485 |
MOISTIO |
rhcrit(i,L) = rhmin |
|
./pkg/fizhi/fizhi_moist.F |
488 |
MOISTIO |
rhcrit(i,L) = rhmin + (1.-rhmin)/(19.) * |
|
./pkg/fizhi/fizhi_moist.F |
632 |
MOISTIO |
. CLSBTH,TMSTP,one,cp,grav,alhl,gamfac,cldlz,rhcrit,offset,alpha) |
|
./pkg/fizhi/fizhi_moist.F |
677 |
MOISTIO |
. rhcrit,offset,alpha) |