File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
435 |
SWRIO |
tauc(i,L,1) = taul(i,L)/(1.+alf/(1-alf) * (reffi/reffw*0.80) ) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
436 |
SWRIO |
tauc(i,L,2) = taul(i,L)/(1.+(1-alf)/alf * (reffw/reffi*1.25) ) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
450 |
SWRIO |
reff(i,L,2) = reffw |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
45 |
SWRIO |
_RL ra,alf,reffw,reffi,tminv |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
47 |
SWRIO |
parameter ( reffw = 10.0 ) |
./pkg/fizhi/fizhi_swrad.F |
434 |
SWRIO |
tauc(i,L,1) = taul(i,L)/(1.+alf/(1-alf) * (reffi/reffw*0.80) ) |
./pkg/fizhi/fizhi_swrad.F |
435 |
SWRIO |
tauc(i,L,2) = taul(i,L)/(1.+(1-alf)/alf * (reffw/reffi*1.25) ) |
./pkg/fizhi/fizhi_swrad.F |
449 |
SWRIO |
reff(i,L,2) = reffw |
./pkg/fizhi/fizhi_swrad.F |
45 |
SWRIO |
_RL ra,alf,reffw,reffi,tminv |
./pkg/fizhi/fizhi_swrad.F |
47 |
SWRIO |
parameter ( reffw = 10.0 ) |