Symbol Description Uses
st2 6


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 2056 DELEDD 
                st2 = expmn(-akk*taup)
./pkg/fizhi/fizhi_swrad.F 2057 DELEDD 
                st4 = st2 * st2
./pkg/fizhi/fizhi_swrad.F 2064 DELEDD 
                rr =   ( cll-dll*st4    -all1*st2)*st1
./pkg/fizhi/fizhi_swrad.F 2065 DELEDD 
                tt = - ((fll-ell*st4)*td-bll*st2)*st1