| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1025 |
MOISTIO |
cldlow(i,j) = 0. |
|
./pkg/fizhi/fizhi_moist.F |
1100 |
MOISTIO |
if( L.ge.lowlevel ) cldlow(i,j) = max( cldnow,cldlow(i,j) ) |
|
./pkg/fizhi/fizhi_moist.F |
1119 |
MOISTIO |
. * (1.-cldlow(i,j)) |
|
./pkg/fizhi/fizhi_moist.F |
60 |
MOISTIO |
_RL cldhi (im,jm),cldlow(im,jm) |
|
./pkg/fizhi/fizhi_swrad.F |
168 |
SWRIO |
cldlow(i,j) = 0.0 |
|
./pkg/fizhi/fizhi_swrad.F |
212 |
SWRIO |
cldlow(i,j) = max( cldtot(i,j,L),cldlow(i,j) ) |
|
./pkg/fizhi/fizhi_swrad.F |
226 |
SWRIO |
. * (1.-cldlow(i,j)) |
|
./pkg/fizhi/fizhi_swrad.F |
261 |
SWRIO |
call DIAGNOSTICS_FILL(cldlow,'CLDLOW ',0,1,3,bi,bj,myid) |
|
./pkg/fizhi/fizhi_swrad.F |
354 |
SWRIO |
if( cldlow(i,j).ne.0.0 ) then |
|
./pkg/fizhi/fizhi_swrad.F |
57 |
SWRIO |
_RL cldlow (im,jm) |