| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
161 |
SWRIO |
cldmid(i,j) = 0.0 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
203 |
SWRIO |
cldmid(i,j) = max( cldtot(i,j,L),cldmid(i,j) ) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
218 |
SWRIO |
. * (1.-cldmid(i,j)) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
258 |
SWRIO |
call DIAGNOSTICS_FILL(cldmid,'CLDMID ',0,1,3,bi,bj,myid) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
366 |
SWRIO |
if( cldmid(i,j).ne.0.0 ) then |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
58 |
SWRIO |
_RL cldmid (im,jm) |
|
./pkg/fizhi/fizhi_swrad.F |
161 |
SWRIO |
cldmid(i,j) = 0.0 |
|
./pkg/fizhi/fizhi_swrad.F |
202 |
SWRIO |
cldmid(i,j) = max( cldtot(i,j,L),cldmid(i,j) ) |
|
./pkg/fizhi/fizhi_swrad.F |
217 |
SWRIO |
. * (1.-cldmid(i,j)) |
|
./pkg/fizhi/fizhi_swrad.F |
257 |
SWRIO |
call DIAGNOSTICS_FILL(cldmid,'CLDMID ',0,1,3,bi,bj,myid) |
|
./pkg/fizhi/fizhi_swrad.F |
365 |
SWRIO |
if( cldmid(i,j).ne.0.0 ) then |
|
./pkg/fizhi/fizhi_swrad.F |
58 |
SWRIO |
_RL cldmid (im,jm) |
|
./pkg/fizhi/fizhi_moist.F |
1042 |
MOISTIO |
. L.lt.lowlevel ) cldmid(i,1) = max( cldnow,cldmid(i,1) ) |
|
./pkg/fizhi/fizhi_moist.F |
1060 |
MOISTIO |
. * (1.-cldmid(i,j)) |
|
./pkg/fizhi/fizhi_moist.F |
61 |
MOISTIO |
_RL cldmid(im,jm),totcld(im,jm) |
|
./pkg/fizhi/fizhi_moist.F |
974 |
MOISTIO |
cldmid(i,j) = 0. |