File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lwrad.F |
101 |
LWRIO |
$ imstturb)) |
./pkg/fizhi/fizhi_lwrad.F |
103 |
LWRIO |
lwlz(i,j,L) = lwlz(i,j,L) + qliqave(i,j,L)/imstturb |
./pkg/fizhi/fizhi_lwrad.F |
13 |
LWRIO |
. lpnt,imstturb,qliqave,fccave,landtype) |
./pkg/fizhi/fizhi_lwrad.F |
331 |
LWRIO |
imstturb = 0 |
./pkg/fizhi/fizhi_lwrad.F |
33 |
LWRIO |
integer imstturb |
./pkg/fizhi/fizhi_lwrad.F |
96 |
LWRIO |
if(imstturb.ne.0) then |
./pkg/fizhi/fizhi_swrad.F |
12 |
SWRIO |
. lpnt,imstturb,qliqave,fccave,landtype,xlats,xlons) |
./pkg/fizhi/fizhi_swrad.F |
176 |
SWRIO |
if(imstturb.ne.0) then |
./pkg/fizhi/fizhi_swrad.F |
181 |
SWRIO |
$ imstturb)) |
./pkg/fizhi/fizhi_swrad.F |
183 |
SWRIO |
swlz(i,j,L)=swlz(i,j,L)+qliqave(i,j,L)/imstturb |
./pkg/fizhi/fizhi_swrad.F |
35 |
SWRIO |
integer imstturb |
./pkg/fizhi/fizhi_swrad.F |
534 |
SWRIO |
imstturb = 0 |