Symbol Description Uses
SAGPOL 8



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1450 SOLIR
              call SAGPOL (tauto,ssato,asyto,rs2t(i,j),ts2t(i,j))
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1798 SOLUV
          call SAGPOL (tauto,ssato,asyto,rs1t(i,j),ts1t(i,j))
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1825 SOLUV
           call SAGPOL (tauto,ssato,asyto,rs2t(i,j),ts2t(i,j))
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2068 SAGPOL
      subroutine SAGPOL(tau,ssc,g0,rll,tll)
./pkg/fizhi/fizhi_swrad.F 1449 SOLIR
              call SAGPOL (tauto,ssato,asyto,rs2t(i,j),ts2t(i,j))
./pkg/fizhi/fizhi_swrad.F 1797 SOLUV
          call SAGPOL (tauto,ssato,asyto,rs1t(i,j),ts1t(i,j))
./pkg/fizhi/fizhi_swrad.F 1824 SOLUV
           call SAGPOL (tauto,ssato,asyto,rs2t(i,j),ts2t(i,j))
./pkg/fizhi/fizhi_swrad.F 2067 SAGPOL
      subroutine SAGPOL(tau,ssc,g0,rll,tll)