Symbol Description Uses
SAGPOL 4



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 1457 SOLIR
              call SAGPOL (tauto,ssato,asyto,rs2t(i,j),ts2t(i,j))
./pkg/fizhi/fizhi_swrad.F 1805 SOLUV
          call SAGPOL (tauto,ssato,asyto,rs1t(i,j),ts1t(i,j))
./pkg/fizhi/fizhi_swrad.F 1832 SOLUV
           call SAGPOL (tauto,ssato,asyto,rs2t(i,j),ts2t(i,j))
./pkg/fizhi/fizhi_swrad.F 2075 SAGPOL
      subroutine SAGPOL(tau,ssc,g0,rll,tll)