Symbol Description Uses
indgath 13



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 139 MOISTIO
      integer i,j,iloop,indx,indgath,l,nn,num,numdeps,nt
./pkg/fizhi/fizhi_moist.F 849 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 850 MOISTIO
        tmpdiag(i,j)=(dtmoist(i,j,L)*sday*pkzgather(indgath,L)/pz(i,j))
./pkg/fizhi/fizhi_moist.F 876 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 877 MOISTIO
        tmpdiag(i,j)=tmpgather(indgath,L)
./pkg/fizhi/fizhi_moist.F 890 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 891 MOISTIO
        tmpdiag(i,j)=pkegather(indgath,L)
./pkg/fizhi/fizhi_moist.F 904 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 905 MOISTIO
        tmpdiag(i,j)=deltrnev(indgath,L)
./pkg/fizhi/fizhi_moist.F 918 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 919 MOISTIO
        tmpdiag(i,j)=delqrnev(indgath,L)
./pkg/fizhi/fizhi_moist.F 943 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 944 MOISTIO
        tmpdiag(i,j) = raincgath(indgath)*sday*tminv