Symbol Description Uses
fraccu 4



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 590 OPTHK
      _RL dp, alf, fracls, fraccu
./pkg/fizhi/fizhi_swrad.F 608 OPTHK
         fraccu = 1.0-fracls
./pkg/fizhi/fizhi_swrad.F 646 OPTHK
         tau(i,j,L,3) = tau(i,j,L,3) + fraccu*tauras*dp
./pkg/fizhi/fizhi_swrad.F 649 OPTHK
         tau(i,j,L,1) = tau(i,j,L,1) + fraccu*tauras*dp