| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2200 |
CLDFLX |
_RL ch(m,n),cm(m,n),ct(m,n),flxdn(m,n,np+1) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2457 |
CLDFLX |
flxdn(i,j,k)=fdndir(i,j)+fdndif(i,j)-fupdif |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2464 |
CLDFLX |
flxdn(i,j,1)=1.0-rra(i,j,1,im,is) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2474 |
CLDFLX |
fclr(i,j,k)=flxdn(i,j,k) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2476 |
CLDFLX |
fall(i,j,k)=fall(i,j,k)+flxdn(i,j,k)*ct(i,j) |
|
./pkg/fizhi/fizhi_swrad.F |
2199 |
CLDFLX |
_RL ch(m,n),cm(m,n),ct(m,n),flxdn(m,n,np+1) |
|
./pkg/fizhi/fizhi_swrad.F |
2456 |
CLDFLX |
flxdn(i,j,k)=fdndir(i,j)+fdndif(i,j)-fupdif |
|
./pkg/fizhi/fizhi_swrad.F |
2463 |
CLDFLX |
flxdn(i,j,1)=1.0-rra(i,j,1,im,is) |
|
./pkg/fizhi/fizhi_swrad.F |
2473 |
CLDFLX |
fclr(i,j,k)=flxdn(i,j,k) |
|
./pkg/fizhi/fizhi_swrad.F |
2475 |
CLDFLX |
fall(i,j,k)=fall(i,j,k)+flxdn(i,j,k)*ct(i,j) |