Symbol Description Uses
reffw 5



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 442 SWRIO
      tauc(i,L,1) = taul(i,L)/(1.+alf/(1-alf) * (reffi/reffw*0.80) )
./pkg/fizhi/fizhi_swrad.F 443 SWRIO
      tauc(i,L,2) = taul(i,L)/(1.+(1-alf)/alf * (reffw/reffi*1.25) )
./pkg/fizhi/fizhi_swrad.F 457 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 )