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 873 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 874 MOISTIO
        tmpdiag(i,j)=(dtmoist(i,j,L)*sday*pkzgather(indgath,L)/pz(i,j))
./pkg/fizhi/fizhi_moist.F 926 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 927 MOISTIO
        tmpdiag(i,j)=tmpgather(indgath,L)
./pkg/fizhi/fizhi_moist.F 940 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 941 MOISTIO
        tmpdiag(i,j)=pkegather(indgath,L)
./pkg/fizhi/fizhi_moist.F 954 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 955 MOISTIO
        tmpdiag(i,j)=deltrnev(indgath,L)
./pkg/fizhi/fizhi_moist.F 968 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 969 MOISTIO
        tmpdiag(i,j)=delqrnev(indgath,L)
./pkg/fizhi/fizhi_moist.F 993 MOISTIO
        indgath = (j-1)*im + i
./pkg/fizhi/fizhi_moist.F 994 MOISTIO
        tmpdiag(i,j) = raincgath(indgath)*sday*tminv