Symbol Description Uses
js 50


File Line number Procedure Code
./pkg/exch2/w2_print_e2setup.F 173 W2_PRINT_E2SETUP 
       js  = exch2_myFace(is)
./pkg/exch2/w2_print_e2setup.F 174 W2_PRINT_E2SETUP 
       IF ( js.NE.0 ) THEN
./pkg/exch2/w2_print_e2setup.F 179 W2_PRINT_E2SETUP 
         IF ( js .NE. jp )
./pkg/exch2/w2_print_e2setup.F 181 W2_PRINT_E2SETUP 
     &    '- facet', js, ' : X-size=', fNx, ' , Y-size=', fNy,
./pkg/exch2/w2_print_e2setup.F 183 W2_PRINT_E2SETUP 
         jp = js
./pkg/exch2/w2_print_e2setup.F 203 W2_PRINT_E2SETUP 
       js  = exch2_myFace(is)
./pkg/exch2/w2_print_e2setup.F 204 W2_PRINT_E2SETUP 
       IF ( js.NE.0 ) THEN
./pkg/exch2/w2_print_e2setup.F 42 W2_PRINT_E2SETUP 
      INTEGER i, j, js, jp, jt, ii, is, it, ns, nt, k, tx, ty
./pkg/exch2/w2_print_e2setup.F 61 W2_PRINT_E2SETUP 
        js  = exch2_myFace(is)
./pkg/exch2/w2_print_e2setup.F 62 W2_PRINT_E2SETUP 
        IF ( js.NE.0 ) THEN
./pkg/exch2/w2_print_e2setup.F 68 W2_PRINT_E2SETUP 
         IF ( js.NE.jp ) THEN
./pkg/exch2/w2_print_e2setup.F 91 W2_PRINT_E2SETUP 
           jp = js
./pkg/exch2/w2_set_tile2tiles.F 119 W2_SET_TILE2TILES 
            nbTx = facet_dims(2*js-1)/tNx
./pkg/exch2/w2_set_tile2tiles.F 148 W2_SET_TILE2TILES 
          jt = INT(facet_link(i,js))
./pkg/exch2/w2_set_tile2tiles.F 149 W2_SET_TILE2TILES 
          ii = MOD( NINT(facet_link(i,js)*10.), 10 )
./pkg/exch2/w2_set_tile2tiles.F 187 W2_SET_TILE2TILES 
                 exch2_pij(k,ns,is) = facet_pij(k,i,js)
./pkg/exch2/w2_set_tile2tiles.F 189 W2_SET_TILE2TILES 
               exch2_oi(ns,is) = facet_oi(i,js)
./pkg/exch2/w2_set_tile2tiles.F 190 W2_SET_TILE2TILES 
               exch2_oj(ns,is) = facet_oj(i,js)
./pkg/exch2/w2_set_tile2tiles.F 200 W2_SET_TILE2TILES 
               isbd1 = facet_pij(1,i,js)*itbd1
./pkg/exch2/w2_set_tile2tiles.F 201 W2_SET_TILE2TILES 
     &               + facet_pij(2,i,js)*jtbd1 + facet_oi(i,js)
./pkg/exch2/w2_set_tile2tiles.F 202 W2_SET_TILE2TILES 
               isbd2 = facet_pij(1,i,js)*itbd2
./pkg/exch2/w2_set_tile2tiles.F 203 W2_SET_TILE2TILES 
     &               + facet_pij(2,i,js)*jtbd2 + facet_oi(i,js)
./pkg/exch2/w2_set_tile2tiles.F 204 W2_SET_TILE2TILES 
               jsbd1 = facet_pij(3,i,js)*itbd1
./pkg/exch2/w2_set_tile2tiles.F 205 W2_SET_TILE2TILES 
     &               + facet_pij(4,i,js)*jtbd1 + facet_oj(i,js)
./pkg/exch2/w2_set_tile2tiles.F 206 W2_SET_TILE2TILES 
               jsbd2 = facet_pij(3,i,js)*itbd2
./pkg/exch2/w2_set_tile2tiles.F 207 W2_SET_TILE2TILES 
     &               + facet_pij(4,i,js)*jtbd2 + facet_oj(i,js)
./pkg/exch2/w2_set_tile2tiles.F 44 W2_SET_TILE2TILES 
      INTEGER is, js, ns, it, jt, nt, tx, ty
./pkg/exch2/w2_set_tile2tiles.F 72 W2_SET_TILE2TILES 
       js  = exch2_myFace(is)
./pkg/exch2/w2_set_tile2tiles.F 74 W2_SET_TILE2TILES 
       IF ( js.NE.0 ) THEN
./pkg/exch2/w2_set_tile2tiles.F 75 W2_SET_TILE2TILES 
        js  = exch2_myFace(is)
./pkg/streamice/adstreamice_cg_solve.F 70 ADSTREAMICE_CG_SOLVE 
      INTEGER iter, is, js, ie, je, colx, coly, k
./pkg/streamice/streamice_cg_functions.F 14 STREAMICE_CG_ACTION 
     I    is, ie, js, je )
./pkg/streamice/streamice_cg_functions.F 39 STREAMICE_CG_ACTION 
      INTEGER is, ie, js, je
./pkg/streamice/streamice_cg_functions.F 75 STREAMICE_CG_ACTION 
      DO j = js, je
./pkg/streamice/streamice_cg_solve.F 291 STREAMICE_CG_SOLVE 
       js = 1 - cg_halo
./pkg/streamice/streamice_cg_solve.F 311 STREAMICE_CG_SOLVE 
          DO j=js,je
./pkg/streamice/streamice_cg_solve.F 68 STREAMICE_CG_SOLVE 
      INTEGER iter, is, js, ie, je, colx, coly, k
./pkg/streamice/streamice_cg_solve_matfree.F 207 STREAMICE_CG_SOLVE_MATFREE 
       js = 1 - cg_halo
./pkg/streamice/streamice_cg_solve_matfree.F 256 STREAMICE_CG_SOLVE_MATFREE 
     I     is,ie,js,je)
./pkg/streamice/streamice_cg_solve_matfree.F 47 STREAMICE_CG_SOLVE_MATFREE 
      INTEGER iter, is, js, ie, je, colx, coly, k
./pkg/streamice/streamice_cg_solve_petsc.F 73 STREAMICE_CG_SOLVE_PETSC 
      INTEGER iter, is, js, ie, je, colx, coly, k
./pkg/diagnostics/diag_calc_psivel.F 114 DIAG_CALC_PSIVEL 
         js = 0
./pkg/diagnostics/diag_calc_psivel.F 120 DIAG_CALC_PSIVEL 
             js = j
./pkg/diagnostics/diag_calc_psivel.F 128 DIAG_CALC_PSIVEL 
           kPsi(is,js) = .TRUE.
./pkg/diagnostics/diag_calc_psivel.F 209 DIAG_CALC_PSIVEL 
     &          ' diag_calc_psivel:            is,js=', is,js,
./pkg/diagnostics/diag_calc_psivel.F 73 DIAG_CALC_PSIVEL 
      INTEGER is, js, ix, jx, iy, jy, ijCnt