| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_driver.F |
114 |
FIZHI_DRIVER |
INTEGER low_level,mid_level,nltop,nsubmin,nsubmax,Lup |
|
./pkg/fizhi/fizhi_driver.F |
147 |
FIZHI_DRIVER |
mid_level = pchecklevs(4) |
|
./pkg/fizhi/fizhi_driver.F |
165 |
FIZHI_DRIVER |
& low_level,mid_level,im,jm,lm, |
|
./pkg/fizhi/fizhi_driver.F |
188 |
FIZHI_DRIVER |
& low_level,mid_level,im,jm,lm, |
|
./pkg/fizhi/fizhi_driver.F |
246 |
FIZHI_DRIVER |
& low_level,mid_level,nltop,nsubmin,nsubmax,Lup, |
|
./pkg/fizhi/fizhi_lwrad.F |
20 |
LWRIO |
integer mid_level,low_level |
|
./pkg/fizhi/fizhi_lwrad.F |
215 |
LWRIO |
. cldwater,cwc,tauc,reff,clro,mid_level,low_level, |
|
./pkg/fizhi/fizhi_lwrad.F |
6 |
LWRIO |
. low_level,mid_level, |
|
./pkg/fizhi/fizhi_swrad.F |
127 |
SWRIO |
. low_level-1,' and ',mid_level |
|
./pkg/fizhi/fizhi_swrad.F |
19 |
SWRIO |
integer mid_level,low_level |
|
./pkg/fizhi/fizhi_swrad.F |
206 |
SWRIO |
if( L.lt.mid_level ) then |
|
./pkg/fizhi/fizhi_swrad.F |
208 |
SWRIO |
elseif( L.ge.mid_level .and. |
|
./pkg/fizhi/fizhi_swrad.F |
374 |
SWRIO |
do L = mid_level,low_level+1 |
|
./pkg/fizhi/fizhi_swrad.F |
393 |
SWRIO |
do L = 1,mid_level+1 |
|
./pkg/fizhi/fizhi_swrad.F |
462 |
SWRIO |
. tauc,reff,clro,mid_level,low_level,taua, |
|
./pkg/fizhi/fizhi_swrad.F |
6 |
SWRIO |
. low_level,mid_level,im,jm,lm, |