Symbol Description Uses
myYGlobalLo 110


File Line number Procedure Code
./pkg/fizhi/fizhi_init_veg.F 116 FIZHI_INIT_VEG 
      bjglobal=bj+(myYGlobalLo-1)/jm
./pkg/fizhi/fizhi_init_vegsurftiles.F 91 FIZHI_INIT_VEGSURFTILES 
       bjslot = myYGlobalLo-1+(bj-1)*sNy
./pkg/fizhi/fizhi_readwrite_vegtiles.F 120 FIZHI_WRITE_VEGTILES 
       jG = bj+(myYGlobalLo-1)/sNy
./pkg/fizhi/fizhi_readwrite_vegtiles.F 375 FIZHI_READ_VEGTILES 
       jG = bj+(myYGlobalLo-1)/sNy
./pkg/fizhi/update_ocean_exports.F 86 UPDATE_OCEAN_EXPORTS 
       bjslot = myYGlobalLo-1+(bj-1)*sNy
./pkg/flt/flt_mdsreadvector.F 110 FLT_MDSREADVECTOR 
      jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/flt/flt_mdsreadvector.F 159 FLT_MDSREADVECTOR 
         jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/flt/flt_runga2.F 96 FLT_RUNGA2 
              jG = myYGlobalLo + (bj-1)*sNy + jc-1
./pkg/flt/flt_traj.F 105 FLT_TRAJ 
         j0y = DFLOAT( myYGlobalLo-1 + (bj-1)*sNy )
./pkg/flt/flt_traj.F 65 FLT_TRAJ 
         jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/flt/flt_up.F 104 FLT_UP 
         j0y = DFLOAT( myYGlobalLo-1 + (bj-1)*sNy )
./pkg/flt/flt_up.F 65 FLT_UP 
         jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/mdsio/mdsio_read_field.F 379 MDS_READ_FIELD 
           tBy = myYGlobalLo-1 + (bj-1)*sNy
./pkg/mdsio/mdsio_read_field.F 430 MDS_READ_FIELD 
           jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_read_meta.F 156 MDS_READ_META 
        jG = 1+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_read_section.F 162 MDS_READ_SEC_XZ 
         jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_read_section.F 196 MDS_READ_SEC_XZ 
            jG = (myYGlobalLo-1)/sNy + (bj-1)
./pkg/mdsio/mdsio_read_section.F 418 MDS_READ_SEC_YZ 
         jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_read_section.F 452 MDS_READ_SEC_YZ 
            jG = myYGlobalLo-1 + (bj-1)*sNy
./pkg/mdsio/mdsio_readvector.F 155 MDSREADVECTOR 
         jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/mdsio/mdsio_readvector.F 187 MDSREADVECTOR 
            jG   = myYGlobalLo-1+(bj-1)*sNy
./pkg/mdsio/mdsio_wr_metafiles.F 158 MDS_WR_METAFILES 
           jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_wr_metafiles.F 165 MDS_WR_METAFILES 
           tBy = myYGlobalLo-1 + (bj-1)*sNy
./pkg/mdsio/mdsio_write_field.F 410 MDS_WRITE_FIELD 
          tBy = myYGlobalLo-1 + (bj-1)*sNy
./pkg/mdsio/mdsio_write_field.F 459 MDS_WRITE_FIELD 
           jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_write_field.F 493 MDS_WRITE_FIELD 
           jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_write_section.F 147 MDS_WRITE_SEC_XZ 
         jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_write_section.F 166 MDS_WRITE_SEC_XZ 
            jG = (myYGlobalLo-1)/sNy + (bj-1)
./pkg/mdsio/mdsio_write_section.F 379 MDS_WRITE_SEC_YZ 
         jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_write_section.F 398 MDS_WRITE_SEC_YZ 
            jG = myYGlobalLo-1 + (bj-1)*sNy
./pkg/mdsio/mdsio_writelocal.F 295 MDS_WRITELOCAL 
          tBy = myYGlobalLo-1 + (bj-1)*sNy
./pkg/mdsio/mdsio_writelocal.F 343 MDS_WRITELOCAL 
            jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_writelocal.F 377 MDS_WRITELOCAL 
           jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_writevec_loc.F 157 MDS_WRITEVEC_LOC 
            jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_writevec_loc.F 223 MDS_WRITEVEC_LOC 
            jG=bj+(myYGlobalLo-1)/sNy
./pkg/mdsio/mdsio_writevector.F 261 MDSWRITEVECTOR 
         jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/mdsio/mdsio_writevector.F 279 MDSWRITEVECTOR 
            jG   = myYGlobalLo-1+(bj-1)*sNy
./pkg/mdsio/mdsio_writevector.F 313 MDSWRITEVECTOR 
         jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/mdsio/mdsio_writevector.F 320 MDSWRITEVECTOR 
         dimList(2,2) = (myYGlobalLo-1)/sNy + bj
./pkg/mdsio/mdsio_writevector.F 321 MDSWRITEVECTOR 
         dimList(3,2) = (myYGlobalLo-1)/sNy + bj
./pkg/mnc/mnc_cw_cvars.F 78 MNC_CW_WRITE_CVAR 
       ytmin = sNy * ( bj+(myYGlobalLo-1)/sNy - 1 )
./pkg/mnc/mnc_cwrapper.F 639 MNC_CW_GET_TILE_NUM 
      jG = bj+(myYGlobalLo-1)/sNy
./pkg/mnc/mnc_cwrapper.F 732 MNC_CW_GET_XYFO 
      iyoff = myYGlobalLo + bj * sNy
./pkg/obcs/obcs_readparms.F 251 OBCS_READPARMS 
         jG = myYGlobalLo-1+(bj-1)*sNy+J
./pkg/obcs/obcs_readparms.F 266 OBCS_READPARMS 
         jG = myYGlobalLo-1+(bj-1)*sNy+J
./pkg/ocn_compon_interf/cpl_register.F 51 CPL_REGISTER 
        jG0 = myYGlobalLo+(bj-1)*sNy
./pkg/profiles/profiles_init_fixed.F 490 PROFILES_INIT_FIXED 
         jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/profiles/profiles_init_fixed.F 585 PROFILES_INIT_FIXED 
         jG=bj+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/regrid/regrid_init_varia.F 102 REGRID_INIT_VARIA 
          jG = bj + (myYGlobalLo-1)/sNy
./pkg/regrid/regrid_init_varia.F 109 REGRID_INIT_VARIA 
          iminy = myYGlobalLo
./pkg/regrid/regrid_init_varia.F 110 REGRID_INIT_VARIA 
          imaxy = myYGlobalLo + sNy - 1
./pkg/seaice/seaice_cost_export.F 51 SEAICE_COST_EXPORT 
            jg = myYGlobalLo-1+(bj-1)*sNy+j
./model/src/ini_cartesian_grid.F 76 INI_CARTESIAN_GRID 
      jGl(j,bj) = 1+MOD(myYGlobalLo-1+(bj-1)*sNy+j+Oly*Ny-1,Ny)
./model/src/ini_cartesian_grid.F 87 INI_CARTESIAN_GRID 
        jG = myYGlobalLo + (bj-1)*sNy
./verification/OpenAD/code_ad_singlelayer/cost_test.F 65 COST_TEST 
          jg = myYGlobalLo-1+(bj-1)*sNy+j
./model/src/ini_curvilinear_grid.F 291 INI_CURVILINEAR_GRID 
        jG = bj+(myYGlobalLo-1)/sNy
./model/src/ini_cylinder_grid.F 84 INI_CYLINDER_GRID 
      jGl(j,bj) = 1+MOD(myYGlobalLo-1+(bj-1)*sNy+j+Oly*Ny-1,Ny)
./model/src/ini_cylinder_grid.F 95 INI_CYLINDER_GRID 
        jG = myYGlobalLo + (bj-1)*sNy
./model/src/ini_depths.F 233 INI_DEPTHS 
           jG = myYGlobalLo-1+(bj-1)*sNy+j
./model/src/ini_depths.F 255 INI_DEPTHS 
           jG = myYGlobalLo-1+(bj-1)*sNy+j
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 233 INI_DEPTHS 
           jG = myYGlobalLo-1+(bj-1)*sNy+j
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 255 INI_DEPTHS 
           jG = myYGlobalLo-1+(bj-1)*sNy+j
./verification/bottom_ctrl_5x5/code_ad/cost_test.F 54 COST_TEST 
         jg = myYGlobalLo-1+(bj-1)*sNy+J
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 86 UPDATE_OCEAN_EXPORTS 
       bjslot = myYGlobalLo-1+(bj-1)*sNy
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 47 UPDATE_OCEAN_EXPORTS 
       bjglobal=bj+(myYGlobalLo-1)/jm2
./verification/global_ocean.cs32x15/code_ad/cost_test.F 69 COST_TEST 
          jg = myYGlobalLo-1+(bj-1)*sNy+j
./model/src/ini_spherical_polar_grid.F 331 INI_SPHERICAL_POLAR_GRID 
         jG = myYGlobalLo + (bj-1)*sNy + j-1
./model/src/ini_spherical_polar_grid.F 86 INI_SPHERICAL_POLAR_GRID 
      jGl(j,bj) = 1+MOD(myYGlobalLo-1+(bj-1)*sNy+j+Oly*Ny-1,Ny)
./model/src/ini_spherical_polar_grid.F 97 INI_SPHERICAL_POLAR_GRID 
        jG = myYGlobalLo + (bj-1)*sNy
./verification/hs94.1x64x5/code_ad/cost_test.F 69 COST_TEST 
          jg = myYGlobalLo-1+(bj-1)*sNy+j
./verification/rotating_tank/code/external_forcing.F 367 EXTERNAL_FORCING_T 
        jG = myYGlobalLo-1+(bj-1)*sNy+J
./pkg/aim_compon_interf/cpl_register.F 51 CPL_REGISTER 
        jG0 = myYGlobalLo+(bj-1)*sNy
./eesupp/src/gather_vector.F 35 GATHER_VECTOR 
         jG=1+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./eesupp/src/gather_yz.F 36 GATHER_YZ 
                  jG = myYGlobalLo-1+(bi-1)*sNy+j
./eesupp/src/ini_procs.F 181 INI_PROCS 
       myYGlobalLo  = mpiYGlobalLo
./eesupp/src/ini_procs.F 189 INI_PROCS 
          itemp(2) = myYGlobalLo
./eesupp/src/ini_procs.F 80 INI_PROCS 
      myYGlobalLo = 1
./eesupp/src/mds_check4file.F 88 MDS_CHECK4FILE 
        jG = 1+(myYGlobalLo-1)/sNy
./pkg/cheapaml/cheapaml_fields_load.F 110 CHEAPAML_FIELDS_LOAD 
                  jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/cheapaml_fields_load.F 125 CHEAPAML_FIELDS_LOAD 
          jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/cheapaml_fields_load.F 155 CHEAPAML_FIELDS_LOAD 
                  jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/cheapaml_fields_load.F 168 CHEAPAML_FIELDS_LOAD 
                  jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/cheapaml_fields_load.F 295 CHEAPAML_FIELDS_LOAD 
                  jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/cheapaml_fields_load.F 312 CHEAPAML_FIELDS_LOAD 
        jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/cheapaml_fields_load.F 350 CHEAPAML_FIELDS_LOAD 
                  jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/cheapaml_fields_load.F 370 CHEAPAML_FIELDS_LOAD 
                  jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/cheapaml_init_varia.F 53 CHEAPAML_INIT_VARIA 
                  jG = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cheapaml/gad_diff_2d_y.F 60 GAD_DIFF_2D_Y 
                  jG = myYGlobalLo-1+(bj-1)*sNy+j
./eesupp/src/print.F 1310 PRINT_MAPRL 
     &  '(',myYGlobalLo-1+(byMin-1)*sNy+jMin,
./eesupp/src/print.F 1311 PRINT_MAPRL 
     &  ':',myYGlobalLo-1+(byMax-1)*sNy+jMax,
./eesupp/src/print.F 1351 PRINT_MAPRL 
       dwnBase = myYGlobalLo
./eesupp/src/print.F 1371 PRINT_MAPRL 
       accBase = myYGlobalLo
./eesupp/src/print.F 1423 PRINT_MAPRL 
       pltBase = myYGlobalLo
./eesupp/src/print.F 876 PRINT_MAPRS 
     &  '(',myYGlobalLo-1+(byMin-1)*sNy+jMin,
./eesupp/src/print.F 877 PRINT_MAPRS 
     &  ':',myYGlobalLo-1+(byMax-1)*sNy+jMax,
./eesupp/src/print.F 917 PRINT_MAPRS 
       dwnBase = myYGlobalLo
./eesupp/src/print.F 937 PRINT_MAPRS 
       accBase = myYGlobalLo
./eesupp/src/print.F 989 PRINT_MAPRS 
       pltBase = myYGlobalLo
./eesupp/src/scatter_vector.F 35 SCATTER_VECTOR 
         jG=1+(myYGlobalLo-1)/sNy ! Kludge until unstructered tiles
./pkg/cost/cost_atlantic_heat.F 150 COST_ATLANTIC_HEAT 
            jg = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cost/cost_atlantic_heat.F 89 COST_ATLANTIC_HEAT 
         jg = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cost/cost_test.F 66 COST_TEST 
          jg = myYGlobalLo-1+(bj-1)*sNy+j
./pkg/cost/cost_vector.F 61 COST_VECTOR 
         jg = myYGlobalLo-1+(bj-1)*sNy+j
./eesupp/src/scatter_yz.F 37 SCATTER_YZ 
                  jG = myYGlobalLo-1+(bi-1)*sNy+j
./eesupp/inc/EEPARAMS.h 222 NO PROCEDURE 
     &  myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads,
./eesupp/inc/EEPARAMS.h 241 NO PROCEDURE 
      INTEGER myYGlobalLo
./pkg/debug/write_fullarray_rl.F 104 WRITE_FULLARRAY_RL 
         jG=bjArg+(myYGlobalLo-1)/sNy
./pkg/debug/write_fullarray_rl.F 75 WRITE_FULLARRAY_RL 
         jG=bj+(myYGlobalLo-1)/sNy
./pkg/diagnostics/diagnostics_summary.F 58 DIAGNOSTICS_SUMMARY 
        outpSummary = ( myXGlobalLo.EQ.1 .AND. myYGlobalLo.EQ.1 )
./pkg/ecco/cost_averagesfields.F 525 COST_AVERAGESFIELDS 
           jg = myYGlobalLo-1+(bj-1)*sNy+j