Symbol Description Uses
st8 5


File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 1997 DELEDD 
     *     all1,bll,st7,st8,cll,dll,fll,ell,st1,st2,st3,st4
./pkg/fizhi/fizhi_swrad.F 2043 DELEDD 
                st8 = one + xx
./pkg/fizhi/fizhi_swrad.F 2047 DELEDD 
                dll = (alf2 - xx) * st8
./pkg/fizhi/fizhi_swrad.F 2050 DELEDD 
                fll = (alf1 + xx) * st8
./pkg/fizhi/fizhi_swrad.F 2053 DELEDD 
                st3 = max(abs(st7*st8),tumin)