| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_swrad.F |
2207 |
CLDFLX |
_RL ch(m,n),cm(m,n),ct(m,n),flxdn(m,n,np+1) |
|
./pkg/fizhi/fizhi_swrad.F |
2404 |
CLDFLX |
ct(i,j)=cm(i,j)*(1.0-cc(i,j,3)) |
|
./pkg/fizhi/fizhi_swrad.F |
2414 |
CLDFLX |
ct(i,j)=cm(i,j)*cc(i,j,3) |
|
./pkg/fizhi/fizhi_swrad.F |
2483 |
CLDFLX |
fall(i,j,k)=fall(i,j,k)+flxdn(i,j,k)*ct(i,j) |
|
./pkg/fizhi/fizhi_swrad.F |
2490 |
CLDFLX |
fsdir(i,j)=fsdir(i,j)+fdndir(i,j)*ct(i,j) |
|
./pkg/fizhi/fizhi_swrad.F |
2491 |
CLDFLX |
fsdif(i,j)=fsdif(i,j)+fdndif(i,j)*ct(i,j) |
|
./pkg/fizhi/fizhi_turb.F |
2706 |
TRBFLX |
sct(I) = sct(I) + AITR*ct(I) |