Symbol Description Uses
I_obc local index of open boundary 118


File Line number Procedure Code
./pkg/obcs/obcs_calc.F 286 OBCS_CALC 
            I_obc = OB_Ie(j,bi,bj)
./pkg/obcs/obcs_calc.F 288 OBCS_CALC 
     &           pTracer(I_obc-1,j,k,bi,bj,iTracer)
./pkg/obcs/obcs_calc.F 289 OBCS_CALC 
     &           *_maskW(I_obc,j,k,bi,bj)
./pkg/obcs/obcs_calc.F 318 OBCS_CALC 
            I_obc = OB_Iw(j,bi,bj)
./pkg/obcs/obcs_calc.F 320 OBCS_CALC 
     &           pTracer(I_obc+1,j,k,bi,bj,iTracer)
./pkg/obcs/obcs_calc.F 321 OBCS_CALC 
     &           *_maskW(I_obc+1,j,k,bi,bj)
./pkg/obcs/obcs_calc.F 63 OBCS_CALC 
      INTEGER I_obc, J_obc
./pkg/obcs/orlanski_east.F 108 ORLANSKI_EAST 
            I_obc=OB_Ie(J,bi,bj)
./pkg/obcs/orlanski_east.F 109 ORLANSKI_EAST 
            IF ( I_obc.NE.OB_indexNone ) THEN
./pkg/obcs/orlanski_east.F 115 ORLANSKI_EAST 
                  CL=-(uVel(I_obc-1,J,K,bi,bj)-UE_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_east.F 128 ORLANSKI_EAST 
                 CVEL_UE(J,K,bi,bj) = f1*(CL*dxF(I_obc-2,J,bi,bj)/deltaT
./pkg/obcs/orlanski_east.F 132 ORLANSKI_EAST 
               OBEu(J,K,bi,bj)=uVel(I_obc,J,K,bi,bj)-
./pkg/obcs/orlanski_east.F 133 ORLANSKI_EAST 
     &           CVEL_UE(J,K,bi,bj)*(deltaT*recip_dxF(I_obc-1,J,bi,bj))*
./pkg/obcs/orlanski_east.F 134 ORLANSKI_EAST 
     &           (ab1*(uVel(I_obc,J,K,bi,bj)-uVel(I_obc-1,J,K,bi,bj)) +
./pkg/obcs/orlanski_east.F 141 ORLANSKI_EAST 
                  CL=-(vVel(I_obc-1,J,K,bi,bj)-VE_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_east.F 154 ORLANSKI_EAST 
                 CVEL_VE(J,K,bi,bj) = f1*(CL*dxV(I_obc-1,J,bi,bj)
./pkg/obcs/orlanski_east.F 158 ORLANSKI_EAST 
               OBEv(J,K,bi,bj)=vVel(I_obc,J,K,bi,bj)-
./pkg/obcs/orlanski_east.F 159 ORLANSKI_EAST 
     &           CVEL_VE(J,K,bi,bj)*(deltaT*recip_dxV(I_obc,J,bi,bj))*
./pkg/obcs/orlanski_east.F 160 ORLANSKI_EAST 
     &           (ab1*(vVel(I_obc,J,K,bi,bj)-vVel(I_obc-1,J,K,bi,bj)) +
./pkg/obcs/orlanski_east.F 167 ORLANSKI_EAST 
                  CL=-(theta(I_obc-1,J,K,bi,bj)-TE_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_east.F 180 ORLANSKI_EAST 
                 CVEL_TE(J,K,bi,bj) = f1*(CL*dxC(I_obc-1,J,bi,bj)
./pkg/obcs/orlanski_east.F 184 ORLANSKI_EAST 
               OBEt(J,K,bi,bj)=theta(I_obc,J,K,bi,bj)-
./pkg/obcs/orlanski_east.F 185 ORLANSKI_EAST 
     &           CVEL_TE(J,K,bi,bj)*(deltaT*recip_dxC(I_obc,J,bi,bj))*
./pkg/obcs/orlanski_east.F 186 ORLANSKI_EAST 
     &           (ab1*(theta(I_obc,J,K,bi,bj)-theta(I_obc-1,J,K,bi,bj))+
./pkg/obcs/orlanski_east.F 193 ORLANSKI_EAST 
                  CL=-(salt(I_obc-1,J,K,bi,bj)-SE_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_east.F 206 ORLANSKI_EAST 
                 CVEL_SE(J,K,bi,bj) = f1*(CL*dxC(I_obc-1,J,bi,bj)
./pkg/obcs/orlanski_east.F 210 ORLANSKI_EAST 
               OBEs(J,K,bi,bj)=salt(I_obc,J,K,bi,bj)-
./pkg/obcs/orlanski_east.F 211 ORLANSKI_EAST 
     &           CVEL_SE(J,K,bi,bj)*(deltaT*recip_dxC(I_obc,J,bi,bj))*
./pkg/obcs/orlanski_east.F 212 ORLANSKI_EAST 
     &           (ab1*(salt(I_obc,J,K,bi,bj)-salt(I_obc-1,J,K,bi,bj))+
./pkg/obcs/orlanski_east.F 221 ORLANSKI_EAST 
                  CL=-(wVel(I_obc-1,J,K,bi,bj)-WE_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_east.F 234 ORLANSKI_EAST 
                 CVEL_WE(J,K,bi,bj)=f1*(CL*dxC(I_obc-1,J,bi,bj)/deltaT)
./pkg/obcs/orlanski_east.F 238 ORLANSKI_EAST 
               OBEw(J,K,bi,bj)=wVel(I_obc,J,K,bi,bj)-
./pkg/obcs/orlanski_east.F 239 ORLANSKI_EAST 
     &           CVEL_WE(J,K,bi,bj)*(deltaT*recip_dxC(I_obc,J,bi,bj))*
./pkg/obcs/orlanski_east.F 240 ORLANSKI_EAST 
     &           (ab1*(wVel(I_obc,J,K,bi,bj)-wVel(I_obc-1,J,K,bi,bj))+
./pkg/obcs/orlanski_east.F 249 ORLANSKI_EAST 
               UE_STORE_2(J,K,bi,bj)=uVel(I_obc-1,J,K,bi,bj) -
./pkg/obcs/orlanski_east.F 250 ORLANSKI_EAST 
     &         uVel(I_obc-2,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 251 ORLANSKI_EAST 
               UE_STORE_1(J,K,bi,bj)=uVel(I_obc-1,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 252 ORLANSKI_EAST 
               UE_STORE_4(J,K,bi,bj)=uVel(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 257 ORLANSKI_EAST 
               VE_STORE_2(J,K,bi,bj)=vVel(I_obc-1,J,K,bi,bj) -
./pkg/obcs/orlanski_east.F 258 ORLANSKI_EAST 
     &         vVel(I_obc-2,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 259 ORLANSKI_EAST 
               VE_STORE_1(J,K,bi,bj)=vVel(I_obc-1,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 260 ORLANSKI_EAST 
               VE_STORE_4(J,K,bi,bj)=vVel(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 265 ORLANSKI_EAST 
               TE_STORE_2(J,K,bi,bj)=theta(I_obc-1,J,K,bi,bj) -
./pkg/obcs/orlanski_east.F 266 ORLANSKI_EAST 
     &         theta(I_obc-2,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 267 ORLANSKI_EAST 
               TE_STORE_1(J,K,bi,bj)=theta(I_obc-1,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 268 ORLANSKI_EAST 
               TE_STORE_4(J,K,bi,bj)=theta(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 273 ORLANSKI_EAST 
               SE_STORE_2(J,K,bi,bj)=salt(I_obc-1,J,K,bi,bj) -
./pkg/obcs/orlanski_east.F 274 ORLANSKI_EAST 
     &         salt(I_obc-2,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 275 ORLANSKI_EAST 
               SE_STORE_1(J,K,bi,bj)=salt(I_obc-1,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 276 ORLANSKI_EAST 
               SE_STORE_4(J,K,bi,bj)=salt(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 283 ORLANSKI_EAST 
               WE_STORE_2(J,K,bi,bj)=wVel(I_obc-1,J,K,bi,bj) -
./pkg/obcs/orlanski_east.F 284 ORLANSKI_EAST 
     &         wVel(I_obc-2,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 285 ORLANSKI_EAST 
               WE_STORE_1(J,K,bi,bj)=wVel(I_obc-1,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 286 ORLANSKI_EAST 
               WE_STORE_4(J,K,bi,bj)=wVel(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_east.F 93 ORLANSKI_EAST 
      INTEGER J, K, I_obc
./pkg/obcs/orlanski_west.F 110 ORLANSKI_WEST 
            I_obc=OB_Iw(J,bi,bj)
./pkg/obcs/orlanski_west.F 111 ORLANSKI_WEST 
            IF ( I_obc.NE.OB_indexNone ) THEN
./pkg/obcs/orlanski_west.F 117 ORLANSKI_WEST 
                  CL=(uVel(I_obc+2,J,K,bi,bj)-UW_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_west.F 130 ORLANSKI_WEST 
                 CVEL_UW(J,K,bi,bj) = f1*(CL*dxF(I_obc+2,J,bi,bj)/deltaT
./pkg/obcs/orlanski_west.F 134 ORLANSKI_WEST 
               OBWu(J,K,bi,bj)=uVel(I_obc+1,J,K,bi,bj)+
./pkg/obcs/orlanski_west.F 135 ORLANSKI_WEST 
     &          CVEL_UW(J,K,bi,bj)*(deltaT*recip_dxF(I_obc+1,J,bi,bj))*
./pkg/obcs/orlanski_west.F 136 ORLANSKI_WEST 
     &          (ab1*(uVel(I_obc+2,J,K,bi,bj)-uVel(I_obc+1,J,K,bi,bj))+
./pkg/obcs/orlanski_west.F 143 ORLANSKI_WEST 
                  CL=(vVel(I_obc+1,J,K,bi,bj)-VW_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_west.F 156 ORLANSKI_WEST 
                 CVEL_VW(J,K,bi,bj) = f1*(CL*dxV(I_obc+2,J,bi,bj)/deltaT
./pkg/obcs/orlanski_west.F 160 ORLANSKI_WEST 
               OBWv(J,K,bi,bj)=vVel(I_obc,J,K,bi,bj)+
./pkg/obcs/orlanski_west.F 161 ORLANSKI_WEST 
     &           CVEL_VW(J,K,bi,bj)*(deltaT*recip_dxV(I_obc+1,J,bi,bj))*
./pkg/obcs/orlanski_west.F 162 ORLANSKI_WEST 
     &           (ab1*(vVel(I_obc+1,J,K,bi,bj)-vVel(I_obc,J,K,bi,bj))+
./pkg/obcs/orlanski_west.F 169 ORLANSKI_WEST 
                  CL=(theta(I_obc+1,J,K,bi,bj)-TW_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_west.F 182 ORLANSKI_WEST 
                 CVEL_TW(J,K,bi,bj) = f1*(CL*dxC(I_obc+2,J,bi,bj)/deltaT
./pkg/obcs/orlanski_west.F 186 ORLANSKI_WEST 
               OBWt(J,K,bi,bj)=theta(I_obc,J,K,bi,bj)+
./pkg/obcs/orlanski_west.F 187 ORLANSKI_WEST 
     &          CVEL_TW(J,K,bi,bj)*(deltaT*recip_dxC(I_obc+1,J,bi,bj))*
./pkg/obcs/orlanski_west.F 188 ORLANSKI_WEST 
     &          (ab1*(theta(I_obc+1,J,K,bi,bj)-theta(I_obc,J,K,bi,bj))+
./pkg/obcs/orlanski_west.F 195 ORLANSKI_WEST 
                  CL=(salt(I_obc+1,J,K,bi,bj)-SW_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_west.F 208 ORLANSKI_WEST 
                 CVEL_SW(J,K,bi,bj) = f1*(CL*dxC(I_obc+2,J,bi,bj)/deltaT
./pkg/obcs/orlanski_west.F 212 ORLANSKI_WEST 
               OBWs(J,K,bi,bj)=salt(I_obc,J,K,bi,bj)+
./pkg/obcs/orlanski_west.F 213 ORLANSKI_WEST 
     &           CVEL_SW(J,K,bi,bj)*(deltaT*recip_dxC(I_obc+1,J,bi,bj))*
./pkg/obcs/orlanski_west.F 214 ORLANSKI_WEST 
     &           (ab1*(salt(I_obc+1,J,K,bi,bj)-salt(I_obc,J,K,bi,bj))+
./pkg/obcs/orlanski_west.F 223 ORLANSKI_WEST 
                  CL=(wVel(I_obc+1,J,K,bi,bj)-WW_STORE_1(J,K,bi,bj))/
./pkg/obcs/orlanski_west.F 236 ORLANSKI_WEST 
                 CVEL_WW(J,K,bi,bj)=f1*(CL*dxC(I_obc+2,J,bi,bj)/deltaT)
./pkg/obcs/orlanski_west.F 240 ORLANSKI_WEST 
               OBWw(J,K,bi,bj)=wVel(I_obc,J,K,bi,bj)+
./pkg/obcs/orlanski_west.F 241 ORLANSKI_WEST 
     &           CVEL_WW(J,K,bi,bj)*(deltaT*recip_dxC(I_obc+1,J,bi,bj))*
./pkg/obcs/orlanski_west.F 242 ORLANSKI_WEST 
     &            (ab1*(wVel(I_obc+1,J,K,bi,bj)-wVel(I_obc,J,K,bi,bj))+
./pkg/obcs/orlanski_west.F 251 ORLANSKI_WEST 
               UW_STORE_2(J,K,bi,bj)=uVel(I_obc+3,J,K,bi,bj) -
./pkg/obcs/orlanski_west.F 252 ORLANSKI_WEST 
     &         uVel(I_obc+2,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 253 ORLANSKI_WEST 
               UW_STORE_1(J,K,bi,bj)=uVel(I_obc+2,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 254 ORLANSKI_WEST 
               UW_STORE_4(J,K,bi,bj)=uVel(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 259 ORLANSKI_WEST 
               VW_STORE_2(J,K,bi,bj)=vVel(I_obc+2,J,K,bi,bj) -
./pkg/obcs/orlanski_west.F 260 ORLANSKI_WEST 
     &         vVel(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 261 ORLANSKI_WEST 
               VW_STORE_1(J,K,bi,bj)=vVel(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 262 ORLANSKI_WEST 
               VW_STORE_4(J,K,bi,bj)=vVel(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 267 ORLANSKI_WEST 
               TW_STORE_2(J,K,bi,bj)=theta(I_obc+2,J,K,bi,bj) -
./pkg/obcs/orlanski_west.F 268 ORLANSKI_WEST 
     &         theta(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 269 ORLANSKI_WEST 
               TW_STORE_1(J,K,bi,bj)=theta(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 270 ORLANSKI_WEST 
               TW_STORE_4(J,K,bi,bj)=theta(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 275 ORLANSKI_WEST 
               SW_STORE_2(J,K,bi,bj)=salt(I_obc+2,J,K,bi,bj) -
./pkg/obcs/orlanski_west.F 276 ORLANSKI_WEST 
     &         salt(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 277 ORLANSKI_WEST 
               SW_STORE_1(J,K,bi,bj)=salt(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 278 ORLANSKI_WEST 
               SW_STORE_4(J,K,bi,bj)=salt(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 285 ORLANSKI_WEST 
               WW_STORE_2(J,K,bi,bj)=wVel(I_obc+2,J,K,bi,bj) -
./pkg/obcs/orlanski_west.F 286 ORLANSKI_WEST 
     &         wVel(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 287 ORLANSKI_WEST 
               WW_STORE_1(J,K,bi,bj)=wVel(I_obc+1,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 288 ORLANSKI_WEST 
               WW_STORE_4(J,K,bi,bj)=wVel(I_obc,J,K,bi,bj)
./pkg/obcs/orlanski_west.F 95 ORLANSKI_WEST 
      INTEGER J, K, I_obc
./pkg/seaice/seaice_init_varia.F 412 SEAICE_INIT_VARIA 
          I_obc = OB_Iw(j,bi,bj)
./pkg/seaice/seaice_init_varia.F 413 SEAICE_INIT_VARIA 
          IF ( I_obc.NE.OB_indexNone ) THEN
./pkg/seaice/seaice_init_varia.F 414 SEAICE_INIT_VARIA 
           seaiceMaskU(I_obc,j,bi,bj)=   0.0 _d 0
./pkg/seaice/seaice_init_varia.F 415 SEAICE_INIT_VARIA 
           seaiceMaskV(I_obc,j,bi,bj)=   0.0 _d 0
./pkg/seaice/seaice_init_varia.F 50 SEAICE_INIT_VARIA 
      INTEGER I_obc, J_obc