Symbol Description Uses
pigather 3



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 259 MOISTIO
        pigather(indx) =     pz(pblindex(indx),1)
./pkg/fizhi/fizhi_moist.F 329 MOISTIO
       CALL STRIP (  pigather, SP      ,im*jm,ISTRIP,1 ,NN )
./pkg/fizhi/fizhi_moist.F 76 MOISTIO
      _RL     pigather(im*jm)