Symbol Description Uses
jsize 7



File Line number Procedure Code
./pkg/ecco/cost_geoid.F 67 COST_GEOID
      integer jsize, joff, jbeg, jend
./pkg/ecco/cost_geoid.F 89 COST_GEOID
      jsize = ncshc / numberOfProcs
./pkg/ecco/cost_geoid.F 90 COST_GEOID
      if (jsize*numberOfProcs .lt. ncshc ) then
./pkg/ecco/cost_geoid.F 91 COST_GEOID
         jsize = jsize + 1
./pkg/ecco/cost_geoid.F 95 COST_GEOID
      joff = myProcId*jsize
./pkg/ecco/cost_geoid.F 97 COST_GEOID
      jend = min( ncshc, joff+jsize )