Symbol Description Uses
fluxi 5



File Line number Procedure Code
./pkg/dic/insol.F 38 INSOL
       _RL  cosz, frac, fluxi
./pkg/dic/insol.F 69 INSOL
          fluxi = solar*(1.0-albedo)*cosz*frac*par
./pkg/dic/insol.F 72 INSOL
          if (fluxi.gt.0.0) sfac(j)=fluxi
./pkg/dic/insol.F 74 INSOL
          if (fluxi.lt.0.00001) sfac(j)=0.00001