| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lwrad.F |
100 |
LWRIO |
cldtot(i,j,L)=min(1.0 _d 0,max(cldlw(i,j,L),fccave(i,j,L)/ |
|
./pkg/fizhi/fizhi_lwrad.F |
13 |
LWRIO |
. lpnt,imstturb,qliqave,fccave,landtype) |
|
./pkg/fizhi/fizhi_lwrad.F |
336 |
LWRIO |
fccave(i,j,L) = 0. |
|
./pkg/fizhi/fizhi_lwrad.F |
34 |
LWRIO |
_RL qliqave(im,jm,lm),fccave(im,jm,lm) |
|
./pkg/fizhi/fizhi_swrad.F |
12 |
SWRIO |
. lpnt,imstturb,qliqave,fccave,landtype,xlats,xlons) |
|
./pkg/fizhi/fizhi_swrad.F |
180 |
SWRIO |
cldtot(i,j,L)=min(1.0 _d 0,max(cldsw(i,j,L),fccave(i,j,L)/ |
|
./pkg/fizhi/fizhi_swrad.F |
36 |
SWRIO |
_RL qliqave(im,jm,lm),fccave(im,jm,lm) |
|
./pkg/fizhi/fizhi_swrad.F |
539 |
SWRIO |
fccave(i,j,L) = 0. |