Symbol Description Uses
ts1t 16



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1256 SOLIR
      _RL  rr1t(m,n),tt1t(m,n),td1t(m,n),rs1t(m,n),ts1t(m,n)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1416 SOLIR
             ts1t(i,j)=expmn(-1.66*tauto)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1431 SOLIR
              ts2t(i,j)=ts1t(i,j)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1482 SOLIR
               ts(i,j,k,1)=ts1t(i,j)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1676 SOLUV
      _RL  rr1t(m,n),tt1t(m,n),td1t(m,n),rs1t(m,n),ts1t(m,n)
./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 1808 SOLUV
           ts2t(i,j)=ts1t(i,j)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1854 SOLUV
            ts(i,j,k,1)=ts1t(i,j)
./pkg/fizhi/fizhi_swrad.F 1255 SOLIR
      _RL  rr1t(m,n),tt1t(m,n),td1t(m,n),rs1t(m,n),ts1t(m,n)
./pkg/fizhi/fizhi_swrad.F 1415 SOLIR
             ts1t(i,j)=expmn(-1.66*tauto)
./pkg/fizhi/fizhi_swrad.F 1430 SOLIR
              ts2t(i,j)=ts1t(i,j)
./pkg/fizhi/fizhi_swrad.F 1481 SOLIR
               ts(i,j,k,1)=ts1t(i,j)
./pkg/fizhi/fizhi_swrad.F 1675 SOLUV
      _RL  rr1t(m,n),tt1t(m,n),td1t(m,n),rs1t(m,n),ts1t(m,n)
./pkg/fizhi/fizhi_swrad.F 1797 SOLUV
          call SAGPOL (tauto,ssato,asyto,rs1t(i,j),ts1t(i,j))
./pkg/fizhi/fizhi_swrad.F 1807 SOLUV
           ts2t(i,j)=ts1t(i,j)
./pkg/fizhi/fizhi_swrad.F 1853 SOLUV
            ts(i,j,k,1)=ts1t(i,j)