Symbol Description Uses
ob_js 9



File Line number Procedure Code
./pkg/ctrl/ctrl_obcsvol.F 259 CTRL_OBCSVOL
                  if (ob_jn(i,bi,bj).ne.j .and. ob_js(i,bi,bj).ne.j)then
./pkg/ctrl/ctrl_obcsvol.F 295 CTRL_OBCSVOL
                  if (ob_jn(i,bi,bj).ne.j .and. ob_js(i,bi,bj).ne.j)then
./pkg/ctrl/ctrl_obcsvol.F 417 CTRL_OBCSVOL
                  if (ob_jn(i,bi,bj).ne.j .and. ob_js(i,bi,bj).ne.j)then
./pkg/ctrl/ctrl_obcsvol.F 453 CTRL_OBCSVOL
                  if (ob_jn(i,bi,bj).ne.j .and. ob_js(i,bi,bj).ne.j)then
./pkg/ctrl/ctrl_volflux.F 291 CTRL_VOLFLUX
                  if (ob_jn(i,bi,bj).ne.j.and. ob_js(i,bi,bj).ne.j)then
./pkg/ctrl/ctrl_volflux.F 353 CTRL_VOLFLUX
                  if (ob_jn(i,bi,bj).ne.j .and.ob_js(i,bi,bj).ne.j)then
./pkg/ecco/cost_obcs_ageos.F 289 COST_OBCS_AGEOS
                j = ob_js(i,bi,bj)
./pkg/ecco/cost_obcs_ageos.F 316 COST_OBCS_AGEOS
                 j = ob_js(i,bi,bj)
./pkg/ecco/cost_obcs_ageos.F 326 COST_OBCS_AGEOS
                 j = ob_js(i,bi,bj)