Symbol Description Uses
xq 13


File Line number Procedure Code
./pkg/streamice/streamice_init_phi.F 31 STREAMICE_INIT_PHI 
      INTEGER bi, bj, i, j, xnode, ynode, xq, yq, m, n, p, kx, ky
./pkg/streamice/streamice_init_phi.F 59 STREAMICE_INIT_PHI 
          DO xq = 1,2
./pkg/streamice/streamice_init_phi.F 60 STREAMICE_INIT_PHI 
           gradx(xq) = Xquad(3-xq) * recip_dxG (i,j,bi,bj) +
./pkg/streamice/streamice_init_phi.F 61 STREAMICE_INIT_PHI 
     &                 Xquad(xq) * recip_dxG (i+1,j,bi,bj)
./pkg/streamice/streamice_init_phi.F 62 STREAMICE_INIT_PHI 
           grady(xq) = Xquad(3-xq) * recip_dyG (i,j,bi,bj) +
./pkg/streamice/streamice_init_phi.F 63 STREAMICE_INIT_PHI 
     &                 Xquad(xq) * recip_dyG (i,j+1,bi,bj)
./pkg/streamice/streamice_init_phi.F 68 STREAMICE_INIT_PHI 
           xq = 2 - mod(n,2)
./pkg/streamice/streamice_init_phi.F 77 STREAMICE_INIT_PHI 
            if (xq.eq.xnode) kx = 2
./pkg/streamice/streamice_init_phi.F 84 STREAMICE_INIT_PHI 
     &       (2*ynode-3) * Xquad(kx) * grady(xq)
./pkg/streamice/streamice_init_phi.F 89 STREAMICE_INIT_PHI 
     &      (Xquad(3-xq)*dyG(i,j,bi,bj) + Xquad(xq)*dyG(i+1,j,bi,bj)) *