Symbol Description Uses
i1 Loop counters 13



File Line number Procedure Code
./pkg/aim_v23/phy_suflux_post.F 146 SUFLUX_POST
         i1 = 1 + mod((J-1),sNx)
./pkg/aim_v23/phy_suflux_post.F 158 SUFLUX_POST
     &        i1,j1,bi,bj,myThid,J,xC(i1,j1,bi,bj),yC(i1,j1,bi,bj)
./pkg/aim_v23/phy_suflux_post.F 93 SUFLUX_POST
      INTEGER J,i1,j1