Symbol Description Uses
pbl 3



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 122 MOISTIO
      integer pbl(istrip),depths(lm)
./pkg/fizhi/fizhi_moist.F 361 MOISTIO
       CALL STRINT( levgather, pbl     ,im*jm,ISTRIP,1 ,NN )
./pkg/fizhi/fizhi_moist.F 389 MOISTIO
       if(pbl(i).eq.L) nindeces(L) = nindeces(L) + 1