Symbol Description Uses
levgather 3



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 266 MOISTIO
       levgather(indx) = levpbl(i,j)
./pkg/fizhi/fizhi_moist.F 361 MOISTIO
       CALL STRINT( levgather, pbl     ,im*jm,ISTRIP,1 ,NN )
./pkg/fizhi/fizhi_moist.F 94 MOISTIO
      integer levgather(im*jm)