Symbol Description Uses
OB_indexNone null value for OB index (if row or column without OB) 256


File Line number Procedure Code
./pkg/obcs/OBCS_GRID.h 43 NO PROCEDURE 
     &  OB_indexNone, OBCS_indexStatus
./pkg/obcs/OBCS_GRID.h 48 NO PROCEDURE 
      INTEGER OB_indexNone
./pkg/obcs/obcs_add_tides.F 103 OBCS_ADD_TIDES 
           IF ( jB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_add_tides.F 121 OBCS_ADD_TIDES 
           IF ( jB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_add_tides.F 67 OBCS_ADD_TIDES 
           IF ( iB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_add_tides.F 85 OBCS_ADD_TIDES 
           IF ( iB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_adjust_uvice.F 148 OBCS_ADJUST_UVICE 
       IF (OB_Ie(J,bi,bj).NE.OB_indexNone) THEN
./pkg/obcs/obcs_adjust_uvice.F 193 OBCS_ADJUST_UVICE 
       IF (OB_Iw(J,bi,bj).NE.OB_indexNone) THEN
./pkg/obcs/obcs_adjust_uvice.F 52 OBCS_ADJUST_UVICE 
       IF (OB_Jn(I,bi,bj).NE.OB_indexNone) THEN
./pkg/obcs/obcs_adjust_uvice.F 97 OBCS_ADJUST_UVICE 
       IF (OB_Js(I,bi,bj).NE.OB_indexNone) THEN
./pkg/obcs/obcs_apply_eta.F 55 OBCS_APPLY_ETA 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_eta.F 65 OBCS_APPLY_ETA 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_eta.F 77 OBCS_APPLY_ETA 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_eta.F 87 OBCS_APPLY_ETA 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ptracer.F 104 OBCS_APPLY_PTRACER 
        IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ptracer.F 119 OBCS_APPLY_PTRACER 
        IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ptracer.F 73 OBCS_APPLY_PTRACER 
        IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ptracer.F 88 OBCS_APPLY_PTRACER 
        IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_r_star.F 104 OBCS_APPLY_R_STAR 
        IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_r_star.F 121 OBCS_APPLY_R_STAR 
        IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_r_star.F 68 OBCS_APPLY_R_STAR 
        IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_r_star.F 85 OBCS_APPLY_R_STAR 
        IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_seaice.F 113 OBCS_APPLY_SEAICE 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_seaice.F 135 OBCS_APPLY_SEAICE 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_seaice.F 174 OBCS_APPLY_SEAICE 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_seaice.F 213 OBCS_APPLY_SEAICE 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_seaice.F 252 OBCS_APPLY_SEAICE 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_seaice.F 62 OBCS_APPLY_SEAICE 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_seaice.F 79 OBCS_APPLY_SEAICE 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_seaice.F 96 OBCS_APPLY_SEAICE 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_surf_dr.F 112 OBCS_APPLY_SURF_DR 
        IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_surf_dr.F 131 OBCS_APPLY_SURF_DR 
        IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_surf_dr.F 72 OBCS_APPLY_SURF_DR 
        IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_surf_dr.F 91 OBCS_APPLY_SURF_DR 
        IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ts.F 118 OBCS_APPLY_TS 
           IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ts.F 133 OBCS_APPLY_TS 
           IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ts.F 153 OBCS_APPLY_TS 
           IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ts.F 168 OBCS_APPLY_TS 
           IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ts.F 187 OBCS_APPLY_TS 
           IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ts.F 202 OBCS_APPLY_TS 
           IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ts.F 84 OBCS_APPLY_TS 
           IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_ts.F 99 OBCS_APPLY_TS 
           IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uv.F 102 OBCS_APPLY_UV 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uv.F 118 OBCS_APPLY_UV 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uv.F 132 OBCS_APPLY_UV 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uv.F 149 OBCS_APPLY_UV 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uv.F 166 OBCS_APPLY_UV 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uv.F 185 OBCS_APPLY_UV 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uv.F 202 OBCS_APPLY_UV 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uv.F 88 OBCS_APPLY_UV 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uvice.F 109 OBCS_APPLY_UVICE 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uvice.F 122 OBCS_APPLY_UVICE 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uvice.F 138 OBCS_APPLY_UVICE 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uvice.F 155 OBCS_APPLY_UVICE 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uvice.F 173 OBCS_APPLY_UVICE 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uvice.F 190 OBCS_APPLY_UVICE 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uvice.F 82 OBCS_APPLY_UVICE 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_uvice.F 95 OBCS_APPLY_UVICE 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_w.F 108 OBCS_APPLY_W 
          IF ( Iobc.NE.OB_indexNone .AND. kArg.EQ.0 ) THEN
./pkg/obcs/obcs_apply_w.F 114 OBCS_APPLY_W 
          ELSEIF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_w.F 127 OBCS_APPLY_W 
          IF ( Iobc.NE.OB_indexNone .AND. kArg.EQ.0 ) THEN
./pkg/obcs/obcs_apply_w.F 133 OBCS_APPLY_W 
          ELSEIF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_w.F 69 OBCS_APPLY_W 
          IF ( Jobc.NE.OB_indexNone .AND. kArg.EQ.0 ) THEN
./pkg/obcs/obcs_apply_w.F 75 OBCS_APPLY_W 
          ELSEIF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_apply_w.F 88 OBCS_APPLY_W 
          IF ( Jobc.NE.OB_indexNone .AND. kArg.EQ.0 ) THEN
./pkg/obcs/obcs_apply_w.F 94 OBCS_APPLY_W 
          ELSEIF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_balance_flow.F 100 OBCS_BALANCE_FLOW 
           IF ( iB.NE.OB_indexNone .AND. iB.GT.1 ) THEN
./pkg/obcs/obcs_balance_flow.F 149 OBCS_BALANCE_FLOW 
           IF ( iB.NE.OB_indexNone .AND. iB.LT.sNx ) THEN
./pkg/obcs/obcs_balance_flow.F 198 OBCS_BALANCE_FLOW 
           IF ( jB.NE.OB_indexNone .AND. jB.GT.1 ) THEN
./pkg/obcs/obcs_balance_flow.F 247 OBCS_BALANCE_FLOW 
           IF ( jB.NE.OB_indexNone .AND. jB.LT.sNy ) THEN
./pkg/obcs/obcs_balance_flow.F 326 OBCS_BALANCE_FLOW 
            IF ( iB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_balance_flow.F 346 OBCS_BALANCE_FLOW 
            IF ( iB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_balance_flow.F 366 OBCS_BALANCE_FLOW 
            IF ( jB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_balance_flow.F 386 OBCS_BALANCE_FLOW 
            IF ( jB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 103 OBCS_CALC 
            IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 118 OBCS_CALC 
            IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 153 OBCS_CALC 
            IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 168 OBCS_CALC 
            IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 202 OBCS_CALC 
            IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 236 OBCS_CALC 
            IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 285 OBCS_CALC 
           IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 317 OBCS_CALC 
           IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 349 OBCS_CALC 
           IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc.F 381 OBCS_CALC 
           IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 1052 OBCS_STEVENS_SAVE_TRACERS 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 1068 OBCS_STEVENS_SAVE_TRACERS 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 1084 OBCS_STEVENS_SAVE_TRACERS 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 1100 OBCS_STEVENS_SAVE_TRACERS 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 176 OBCS_CALC_STEVENS 
          IF ( I.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 227 OBCS_CALC_STEVENS 
           IF ( I.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 238 OBCS_CALC_STEVENS 
           IF ( I.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 254 OBCS_CALC_STEVENS 
     I        OB_Ie, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 262 OBCS_CALC_STEVENS 
     I        OB_Ie, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 303 OBCS_CALC_STEVENS 
          IF ( I.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 354 OBCS_CALC_STEVENS 
           IF ( I.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 365 OBCS_CALC_STEVENS 
           IF ( I.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 381 OBCS_CALC_STEVENS 
     I        OB_Iw, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 389 OBCS_CALC_STEVENS 
     I        OB_Iw, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 414 OBCS_CALC_STEVENS 
          IF ( J.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 465 OBCS_CALC_STEVENS 
           IF ( J.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 476 OBCS_CALC_STEVENS 
           IF ( J.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 492 OBCS_CALC_STEVENS 
     I        OB_Jn, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 500 OBCS_CALC_STEVENS 
     I        OB_Jn, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 526 OBCS_CALC_STEVENS 
          IF ( J.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 577 OBCS_CALC_STEVENS 
           IF ( J.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 588 OBCS_CALC_STEVENS 
           IF ( J.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 604 OBCS_CALC_STEVENS 
     I        OB_Js, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 612 OBCS_CALC_STEVENS 
     I        OB_Js, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 640 OBCS_CALC_STEVENS 
          IF ( I.EQ.OB_indexNone ) I = 1
./pkg/obcs/obcs_calc_stevens.F 644 OBCS_CALC_STEVENS 
          IF ( I.EQ.OB_indexNone ) I = 1
./pkg/obcs/obcs_calc_stevens.F 680 OBCS_STEVENS_CALC_TRACER_EAST 
     I     OB_I, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 704 OBCS_STEVENS_CALC_TRACER_EAST 
      INTEGER OB_indexNone
./pkg/obcs/obcs_calc_stevens.F 728 OBCS_STEVENS_CALC_TRACER_EAST 
        IF ( I.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 761 OBCS_STEVENS_CALC_TRACER_WEST 
     I     OB_I, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 785 OBCS_STEVENS_CALC_TRACER_WEST 
      INTEGER OB_indexNone
./pkg/obcs/obcs_calc_stevens.F 810 OBCS_STEVENS_CALC_TRACER_WEST 
        IF ( I.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 843 OBCS_STEVENS_CALC_TRACER_NORTH 
     I     OB_J, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 867 OBCS_STEVENS_CALC_TRACER_NORTH 
      INTEGER OB_indexNone
./pkg/obcs/obcs_calc_stevens.F 891 OBCS_STEVENS_CALC_TRACER_NORTH 
        IF ( J.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_calc_stevens.F 925 OBCS_STEVENS_CALC_TRACER_SOUTH 
     I     OB_J, OB_indexNone, bi, bj,
./pkg/obcs/obcs_calc_stevens.F 949 OBCS_STEVENS_CALC_TRACER_SOUTH 
      INTEGER OB_indexNone
./pkg/obcs/obcs_calc_stevens.F 973 OBCS_STEVENS_CALC_TRACER_SOUTH 
        IF ( J.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_check.F 114 OBCS_CHECK 
      CALL WRITE_0D_I( OB_indexNone, INDEX_NONE, 'OB_indexNone =',
./pkg/obcs/obcs_check.F 464 OBCS_CHECK 
          IF ( i.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_check.F 488 OBCS_CHECK 
          IF ( i.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_check.F 515 OBCS_CHECK 
          IF ( j.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_check.F 539 OBCS_CHECK 
          IF ( j.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_check_depths.F 45 OBCS_CHECK_DEPTHS 
         IF ( j.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_check_depths.F 61 OBCS_CHECK_DEPTHS 
         IF ( j.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_check_depths.F 77 OBCS_CHECK_DEPTHS 
         IF ( i.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_check_depths.F 94 OBCS_CHECK_DEPTHS 
         IF ( i.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_copy_tracer.F 110 OBCS_COPY_TRACER 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_copy_tracer.F 61 OBCS_COPY_TRACER 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_copy_tracer.F 77 OBCS_COPY_TRACER 
          IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_copy_tracer.F 94 OBCS_COPY_TRACER 
          IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_copy_uv_n.F 108 OBCS_COPY_UV_N 
        IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_copy_uv_n.F 59 OBCS_COPY_UV_N 
        IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_copy_uv_n.F 75 OBCS_COPY_UV_N 
        IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_copy_uv_n.F 92 OBCS_COPY_UV_N 
        IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_diag_balance.F 116 OBCS_DIAG_BALANCE 
           IF ( iB.NE.OB_indexNone .AND. iB.LT.sNx ) THEN
./pkg/obcs/obcs_diag_balance.F 139 OBCS_DIAG_BALANCE 
           IF ( jB.NE.OB_indexNone .AND. jB.GT.1 ) THEN
./pkg/obcs/obcs_diag_balance.F 161 OBCS_DIAG_BALANCE 
           IF ( jB.NE.OB_indexNone .AND. jB.LT.sNy ) THEN
./pkg/obcs/obcs_diag_balance.F 206 OBCS_DIAG_BALANCE 
            IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_diag_balance.F 226 OBCS_DIAG_BALANCE 
            IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_diag_balance.F 247 OBCS_DIAG_BALANCE 
            IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_diag_balance.F 267 OBCS_DIAG_BALANCE 
            IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_diag_balance.F 94 OBCS_DIAG_BALANCE 
           IF ( iB.NE.OB_indexNone .AND. iB.GT.1 ) THEN
./pkg/obcs/obcs_init_fixed.F 104 OBCS_INIT_FIXED 
          IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 183 OBCS_INIT_FIXED 
            IF ( OB_Ie(j,bi,bj).EQ.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 206 OBCS_INIT_FIXED 
            IF ( OB_Iw(j,bi,bj).EQ.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 229 OBCS_INIT_FIXED 
            IF ( OB_Jn(i,bi,bj).EQ.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 252 OBCS_INIT_FIXED 
            IF ( OB_Js(i,bi,bj).EQ.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 294 OBCS_INIT_FIXED 
         IF ( iB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 301 OBCS_INIT_FIXED 
           IF ( OB_Ie(jm,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 313 OBCS_INIT_FIXED 
         IF ( iB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 320 OBCS_INIT_FIXED 
           IF ( OB_Iw(jm,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 332 OBCS_INIT_FIXED 
         IF ( jB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 339 OBCS_INIT_FIXED 
           IF ( OB_Jn(im,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 351 OBCS_INIT_FIXED 
         IF ( jB.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 358 OBCS_INIT_FIXED 
           IF ( OB_Js(im,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 390 OBCS_INIT_FIXED 
     &                      ( OB_Ie(j,bi,bj).NE.OB_indexNone )
./pkg/obcs/obcs_init_fixed.F 392 OBCS_INIT_FIXED 
     &                      ( OB_Iw(j,bi,bj).NE.OB_indexNone )
./pkg/obcs/obcs_init_fixed.F 396 OBCS_INIT_FIXED 
     &                      ( OB_Jn(i,bi,bj).NE.OB_indexNone )
./pkg/obcs/obcs_init_fixed.F 398 OBCS_INIT_FIXED 
     &                      ( OB_Js(i,bi,bj).NE.OB_indexNone )
./pkg/obcs/obcs_init_fixed.F 75 OBCS_INIT_FIXED 
          IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 84 OBCS_INIT_FIXED 
          IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_init_fixed.F 95 OBCS_INIT_FIXED 
          IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_monitor.F 109 OBCS_MONITOR 
     I             OB_Ie, OB_Iw, OB_indexNone,
./pkg/obcs/obcs_monitor.F 115 OBCS_MONITOR 
     I             OB_Jn, OB_Js, OB_indexNone,
./pkg/obcs/obcs_monitor.F 131 OBCS_MONITOR 
     I             OB_Ie, OB_Iw, OB_indexNone,
./pkg/obcs/obcs_monitor.F 137 OBCS_MONITOR 
     I             OB_Jn, OB_Js, OB_indexNone,
./pkg/obcs/obcs_monitor.F 153 OBCS_MONITOR 
     I             OB_Ie, OB_Iw, OB_indexNone,
./pkg/obcs/obcs_monitor.F 159 OBCS_MONITOR 
     I             OB_Jn, OB_Js, OB_indexNone,
./pkg/obcs/obcs_readparms.F 229 OBCS_READPARMS 
      OB_indexNone  = -99
./pkg/obcs/obcs_readparms.F 580 OBCS_READPARMS 
         OB_Jn(i,bi,bj) = OB_indexNone
./pkg/obcs/obcs_readparms.F 581 OBCS_READPARMS 
         OB_Js(i,bi,bj) = OB_indexNone
./pkg/obcs/obcs_readparms.F 585 OBCS_READPARMS 
         OB_Ie(j,bi,bj) = OB_indexNone
./pkg/obcs/obcs_readparms.F 586 OBCS_READPARMS 
         OB_Iw(J,bi,bj) = OB_indexNone
./pkg/obcs/obcs_save_uv_n.F 100 OBCS_SAVE_UV_N 
        IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_save_uv_n.F 114 OBCS_SAVE_UV_N 
        IF ( Iobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_save_uv_n.F 71 OBCS_SAVE_UV_N 
        IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_save_uv_n.F 85 OBCS_SAVE_UV_N 
        IF ( Jobc.NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 111 OBCS_SEAICE_SPONGE_A 
           IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 138 OBCS_SEAICE_SPONGE_A 
           IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 214 OBCS_SEAICE_SPONGE_H 
           IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 241 OBCS_SEAICE_SPONGE_H 
           IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 268 OBCS_SEAICE_SPONGE_H 
           IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 295 OBCS_SEAICE_SPONGE_H 
           IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 371 OBCS_SEAICE_SPONGE_SL 
           IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 398 OBCS_SEAICE_SPONGE_SL 
           IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 425 OBCS_SEAICE_SPONGE_SL 
           IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 452 OBCS_SEAICE_SPONGE_SL 
           IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 528 OBCS_SEAICE_SPONGE_SN 
           IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 555 OBCS_SEAICE_SPONGE_SN 
           IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 57 OBCS_SEAICE_SPONGE_A 
           IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 582 OBCS_SEAICE_SPONGE_SN 
           IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 609 OBCS_SEAICE_SPONGE_SN 
           IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_seaice_sponge.F 84 OBCS_SEAICE_SPONGE_A 
           IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_set_connect.F 161 OBCS_SET_CONNECT 
          IF (OB_Jn(i,bi,bj).EQ.OB_indexNone) OBN_connect(i,k,bi,bj)=0
./pkg/obcs/obcs_set_connect.F 162 OBCS_SET_CONNECT 
          IF (OB_Js(i,bi,bj).EQ.OB_indexNone) OBS_connect(i,k,bi,bj)=0
./pkg/obcs/obcs_set_connect.F 165 OBCS_SET_CONNECT 
          IF (OB_Ie(j,bi,bj).EQ.OB_indexNone) OBE_connect(j,k,bi,bj)=0
./pkg/obcs/obcs_set_connect.F 166 OBCS_SET_CONNECT 
          IF (OB_Iw(j,bi,bj).EQ.OB_indexNone) OBW_connect(j,k,bi,bj)=0
./pkg/obcs/obcs_sponge.F 134 OBCS_SPONGE_U 
         IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 169 OBCS_SPONGE_U 
         IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 258 OBCS_SPONGE_V 
         IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 293 OBCS_SPONGE_V 
         IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 328 OBCS_SPONGE_V 
         IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 363 OBCS_SPONGE_V 
         IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 473 OBCS_SPONGE_T 
         IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 513 OBCS_SPONGE_T 
         IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 553 OBCS_SPONGE_T 
         IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 593 OBCS_SPONGE_T 
         IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 64 OBCS_SPONGE_U 
         IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 705 OBCS_SPONGE_S 
         IF ( OB_Jn(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 745 OBCS_SPONGE_S 
         IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 785 OBCS_SPONGE_S 
        IF ( OB_Ie(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 825 OBCS_SPONGE_S 
        IF ( OB_Iw(j,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/obcs_sponge.F 99 OBCS_SPONGE_U 
         IF ( OB_Js(i,bi,bj).NE.OB_indexNone ) THEN
./pkg/obcs/orlanski_east.F 109 ORLANSKI_EAST 
            IF ( I_obc.NE.OB_indexNone ) THEN
./pkg/obcs/orlanski_north.F 100 ORLANSKI_NORTH 
            IF ( J_obc.NE.OB_indexNone ) THEN
./pkg/obcs/orlanski_south.F 100 ORLANSKI_SOUTH 
            IF ( J_obc.NE.OB_indexNone ) THEN
./pkg/obcs/orlanski_west.F 111 ORLANSKI_WEST 
            IF ( I_obc.NE.OB_indexNone ) THEN
./pkg/seaice/seaice_init_varia.F 405 SEAICE_INIT_VARIA 
          IF ( J_obc.NE.OB_indexNone ) THEN
./pkg/seaice/seaice_init_varia.F 413 SEAICE_INIT_VARIA 
          IF ( I_obc.NE.OB_indexNone ) THEN
./pkg/ctrl/ctrl_getobcse.F 134 CTRL_GETOBCSE 
            IF ( i.EQ.OB_indexNone ) i = 1
./pkg/ctrl/ctrl_getobcse.F 203 CTRL_GETOBCSE 
            IF ( i.EQ.OB_indexNone ) i = 1
./pkg/ctrl/ctrl_getobcse.F 255 CTRL_GETOBCSE 
           IF ( i.EQ.OB_indexNone ) i = 1
./pkg/ctrl/ctrl_getobcsn.F 139 CTRL_GETOBCSN 
            IF ( j.EQ.OB_indexNone ) j = 1
./pkg/ctrl/ctrl_getobcsn.F 208 CTRL_GETOBCSN 
            IF ( j.EQ.OB_indexNone ) j = 1
./pkg/ctrl/ctrl_getobcsn.F 261 CTRL_GETOBCSN 
           IF ( j.EQ.OB_indexNone ) j = 1
./pkg/ctrl/ctrl_getobcss.F 135 CTRL_GETOBCSS 
            IF ( j.EQ.OB_indexNone ) j = 1
./pkg/ctrl/ctrl_getobcss.F 204 CTRL_GETOBCSS 
            IF ( j.EQ.OB_indexNone ) j = 1
./pkg/ctrl/ctrl_getobcss.F 256 CTRL_GETOBCSS 
           IF ( j.EQ.OB_indexNone ) j = 1
./pkg/ctrl/ctrl_getobcsw.F 134 CTRL_GETOBCSW 
            IF ( i.EQ.OB_indexNone ) i = 1
./pkg/ctrl/ctrl_getobcsw.F 203 CTRL_GETOBCSW 
            IF ( i.EQ.OB_indexNone ) i = 1
./pkg/ctrl/ctrl_getobcsw.F 255 CTRL_GETOBCSW 
           IF ( i.EQ.OB_indexNone ) i = 1
./pkg/ctrl/ctrl_init_wet.F 150 CTRL_INIT_WET 
      call CTRL_MASK_SET_XZ( 0, OB_indexNone, OB_Jn,
./pkg/ctrl/ctrl_init_wet.F 158 CTRL_INIT_WET 
      call CTRL_MASK_SET_XZ( 1, OB_indexNone, OB_Js,
./pkg/ctrl/ctrl_init_wet.F 166 CTRL_INIT_WET 
      call CTRL_MASK_SET_YZ( 1, OB_indexNone, OB_Iw,
./pkg/ctrl/ctrl_init_wet.F 174 CTRL_INIT_WET 
      call CTRL_MASK_SET_YZ( 0, OB_indexNone, OB_Ie,
./pkg/ecco/cost_obcs_ageos.F 233 COST_OBCS_AGEOS 
                if ( j.eq.OB_indexNone ) then
./pkg/ecco/cost_obcs_ageos.F 261 COST_OBCS_AGEOS 
                if ( j.eq.OB_indexNone ) j = 1
./pkg/ecco/cost_obcs_ageos.F 274 COST_OBCS_AGEOS 
                if ( j.eq.OB_indexNone ) j = 1
./pkg/ecco/cost_obcs_ageos.F 301 COST_OBCS_AGEOS 
                if ( j.eq.OB_indexNone ) then
./pkg/ecco/cost_obcs_ageos.F 331 COST_OBCS_AGEOS 
                 if ( j.eq.OB_indexNone ) j = 1
./pkg/ecco/cost_obcs_ageos.F 342 COST_OBCS_AGEOS 
                 if ( j.eq.OB_indexNone ) j = 1
./pkg/ecco/cost_obcs_ageos.F 371 COST_OBCS_AGEOS 
                if ( i.eq.OB_indexNone ) then
./pkg/ecco/cost_obcs_ageos.F 398 COST_OBCS_AGEOS 
                if ( i.eq.OB_indexNone ) i = 1
./pkg/ecco/cost_obcs_ageos.F 410 COST_OBCS_AGEOS 
                if ( i.eq.OB_indexNone ) i = 1
./pkg/ecco/cost_obcs_ageos.F 437 COST_OBCS_AGEOS 
                if ( i.eq.OB_indexNone ) then
./pkg/ecco/cost_obcs_ageos.F 465 COST_OBCS_AGEOS 
                if ( i.eq.OB_indexNone ) i = 1
./pkg/ecco/cost_obcs_ageos.F 477 COST_OBCS_AGEOS 
                if ( i.eq.OB_indexNone ) i = 1
./pkg/ecco/cost_obcsvol.F 218 COST_OBCSVOL 
                  IF ( j.EQ.OB_indexNone ) j = 1
./pkg/ecco/cost_obcsvol.F 260 COST_OBCSVOL 
                  IF ( j.EQ.OB_indexNone ) j = 1
./pkg/ecco/cost_obcsvol.F 303 COST_OBCSVOL 
                  IF ( i.EQ.OB_indexNone ) i = 1
./pkg/ecco/cost_obcsvol.F 346 COST_OBCSVOL 
                  IF ( i.EQ.OB_indexNone ) i = 1