Symbol Description Uses
J_obc local index of open boundary 118


File Line number Procedure Code
./pkg/obcs/obcs_calc.F 350 OBCS_CALC 
            J_obc = OB_Jn(i,bi,bj)
./pkg/obcs/obcs_calc.F 352 OBCS_CALC 
     &           pTracer(i,J_obc-1,k,bi,bj,iTracer)
./pkg/obcs/obcs_calc.F 353 OBCS_CALC 
     &           *_maskS(i,J_obc,k,bi,bj)
./pkg/obcs/obcs_calc.F 382 OBCS_CALC 
            J_obc = OB_Js(i,bi,bj)
./pkg/obcs/obcs_calc.F 384 OBCS_CALC 
     &           pTracer(i,J_obc+1,k,bi,bj,iTracer)
./pkg/obcs/obcs_calc.F 385 OBCS_CALC 
     &           *_maskS(i,J_obc+1,k,bi,bj)
./pkg/obcs/obcs_calc.F 63 OBCS_CALC 
      INTEGER I_obc, J_obc
./pkg/obcs/orlanski_north.F 100 ORLANSKI_NORTH 
            IF ( J_obc.NE.OB_indexNone ) THEN
./pkg/obcs/orlanski_north.F 106 ORLANSKI_NORTH 
                  CL=-(uVel(I,J_obc-1,K,bi,bj)-UN_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_north.F 114 ORLANSKI_NORTH 
               CVEL_UN(I,K,bi,bj) = f1*(CL*dyU(I,J_obc-1,bi,bj)/deltaT)+
./pkg/obcs/orlanski_north.F 117 ORLANSKI_NORTH 
               OBNu(I,K,bi,bj)=uVel(I,J_obc,K,bi,bj)-
./pkg/obcs/orlanski_north.F 118 ORLANSKI_NORTH 
     &           CVEL_UN(I,K,bi,bj)*deltaT*recip_dyU(I,J_obc,bi,bj)*
./pkg/obcs/orlanski_north.F 119 ORLANSKI_NORTH 
     &           (ab1*(uVel(I,J_obc,K,bi,bj)-uVel(I,J_obc-1,K,bi,bj)) +
./pkg/obcs/orlanski_north.F 126 ORLANSKI_NORTH 
                  CL=-(vVel(I,J_obc-1,K,bi,bj)-VN_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_north.F 134 ORLANSKI_NORTH 
               CVEL_VN(I,K,bi,bj) = f1*(CL*dyF(I,J_obc-2,bi,bj)/deltaT)+
./pkg/obcs/orlanski_north.F 137 ORLANSKI_NORTH 
               OBNv(I,K,bi,bj)=vVel(I,J_obc,K,bi,bj)-
./pkg/obcs/orlanski_north.F 138 ORLANSKI_NORTH 
     &           CVEL_VN(I,K,bi,bj)*deltaT*recip_dyF(I,J_obc-1,bi,bj)*
./pkg/obcs/orlanski_north.F 139 ORLANSKI_NORTH 
     &           (ab1*(vVel(I,J_obc,K,bi,bj)-vVel(I,J_obc-1,K,bi,bj)) +
./pkg/obcs/orlanski_north.F 146 ORLANSKI_NORTH 
                  CL=-(theta(I,J_obc-1,K,bi,bj)-TN_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_north.F 154 ORLANSKI_NORTH 
               CVEL_TN(I,K,bi,bj) = f1*(CL*dyC(I,J_obc-1,bi,bj)/deltaT)+
./pkg/obcs/orlanski_north.F 157 ORLANSKI_NORTH 
               OBNt(I,K,bi,bj)=theta(I,J_obc,K,bi,bj)-
./pkg/obcs/orlanski_north.F 158 ORLANSKI_NORTH 
     &          CVEL_TN(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc,bi,bj)*
./pkg/obcs/orlanski_north.F 159 ORLANSKI_NORTH 
     &          (ab1*(theta(I,J_obc,K,bi,bj)-theta(I,J_obc-1,K,bi,bj))+
./pkg/obcs/orlanski_north.F 166 ORLANSKI_NORTH 
                  CL=-(salt(I,J_obc-1,K,bi,bj)-SN_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_north.F 174 ORLANSKI_NORTH 
               CVEL_SN(I,K,bi,bj) = f1*(CL*dyC(I,J_obc-1,bi,bj)/deltaT)+
./pkg/obcs/orlanski_north.F 177 ORLANSKI_NORTH 
               OBNs(I,K,bi,bj)=salt(I,J_obc,K,bi,bj)-
./pkg/obcs/orlanski_north.F 178 ORLANSKI_NORTH 
     &          CVEL_SN(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc,bi,bj)*
./pkg/obcs/orlanski_north.F 179 ORLANSKI_NORTH 
     &          (ab1*(salt(I,J_obc,K,bi,bj)-salt(I,J_obc-1,K,bi,bj)) +
./pkg/obcs/orlanski_north.F 188 ORLANSKI_NORTH 
                 CL=-(wVel(I,J_obc-1,K,bi,bj)-WN_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_north.F 196 ORLANSKI_NORTH 
               CVEL_WN(I,K,bi,bj)=f1*(CL*dyC(I,J_obc-1,bi,bj)/deltaT)
./pkg/obcs/orlanski_north.F 199 ORLANSKI_NORTH 
               OBNw(I,K,bi,bj)=wVel(I,J_obc,K,bi,bj)-
./pkg/obcs/orlanski_north.F 200 ORLANSKI_NORTH 
     &           CVEL_WN(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc,bi,bj)*
./pkg/obcs/orlanski_north.F 201 ORLANSKI_NORTH 
     &           (ab1*(wVel(I,J_obc,K,bi,bj)-wVel(I,J_obc-1,K,bi,bj))+
./pkg/obcs/orlanski_north.F 210 ORLANSKI_NORTH 
               UN_STORE_2(I,K,bi,bj)=uVel(I,J_obc-1,K,bi,bj) -
./pkg/obcs/orlanski_north.F 211 ORLANSKI_NORTH 
     &         uVel(I,J_obc-2,K,bi,bj)
./pkg/obcs/orlanski_north.F 212 ORLANSKI_NORTH 
               UN_STORE_1(I,K,bi,bj)=uVel(I,J_obc-1,K,bi,bj)
./pkg/obcs/orlanski_north.F 213 ORLANSKI_NORTH 
               UN_STORE_4(I,K,bi,bj)=uVel(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_north.F 218 ORLANSKI_NORTH 
               VN_STORE_2(I,K,bi,bj)=vVel(I,J_obc-1,K,bi,bj) -
./pkg/obcs/orlanski_north.F 219 ORLANSKI_NORTH 
     &         vVel(I,J_obc-2,K,bi,bj)
./pkg/obcs/orlanski_north.F 220 ORLANSKI_NORTH 
               VN_STORE_1(I,K,bi,bj)=vVel(I,J_obc-1,K,bi,bj)
./pkg/obcs/orlanski_north.F 221 ORLANSKI_NORTH 
               VN_STORE_4(I,K,bi,bj)=vVel(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_north.F 226 ORLANSKI_NORTH 
               TN_STORE_2(I,K,bi,bj)=theta(I,J_obc-1,K,bi,bj) -
./pkg/obcs/orlanski_north.F 227 ORLANSKI_NORTH 
     &         theta(I,J_obc-2,K,bi,bj)
./pkg/obcs/orlanski_north.F 228 ORLANSKI_NORTH 
               TN_STORE_1(I,K,bi,bj)=theta(I,J_obc-1,K,bi,bj)
./pkg/obcs/orlanski_north.F 229 ORLANSKI_NORTH 
               TN_STORE_4(I,K,bi,bj)=theta(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_north.F 234 ORLANSKI_NORTH 
               SN_STORE_2(I,K,bi,bj)=salt(I,J_obc-1,K,bi,bj) -
./pkg/obcs/orlanski_north.F 235 ORLANSKI_NORTH 
     &         salt(I,J_obc-2,K,bi,bj)
./pkg/obcs/orlanski_north.F 236 ORLANSKI_NORTH 
               SN_STORE_1(I,K,bi,bj)=salt(I,J_obc-1,K,bi,bj)
./pkg/obcs/orlanski_north.F 237 ORLANSKI_NORTH 
               SN_STORE_4(I,K,bi,bj)=salt(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_north.F 244 ORLANSKI_NORTH 
               WN_STORE_2(I,K,bi,bj)=wVel(I,J_obc-1,K,bi,bj) -
./pkg/obcs/orlanski_north.F 245 ORLANSKI_NORTH 
     &         wVel(I,J_obc-2,K,bi,bj)
./pkg/obcs/orlanski_north.F 246 ORLANSKI_NORTH 
               WN_STORE_1(I,K,bi,bj)=wVel(I,J_obc-1,K,bi,bj)
./pkg/obcs/orlanski_north.F 247 ORLANSKI_NORTH 
               WN_STORE_4(I,K,bi,bj)=wVel(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_north.F 84 ORLANSKI_NORTH 
      INTEGER  I, K, J_obc
./pkg/obcs/orlanski_north.F 99 ORLANSKI_NORTH 
            J_obc=OB_Jn(I,bi,bj)
./pkg/obcs/orlanski_south.F 100 ORLANSKI_SOUTH 
            IF ( J_obc.NE.OB_indexNone ) THEN
./pkg/obcs/orlanski_south.F 106 ORLANSKI_SOUTH 
                  CL=(uVel(I,J_obc+1,K,bi,bj)-US_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_south.F 114 ORLANSKI_SOUTH 
               CVEL_US(I,K,bi,bj) = f1*(CL*dyU(I,J_obc+2,bi,bj)/deltaT)+
./pkg/obcs/orlanski_south.F 117 ORLANSKI_SOUTH 
               OBSu(I,K,bi,bj)=uVel(I,J_obc,K,bi,bj)+
./pkg/obcs/orlanski_south.F 118 ORLANSKI_SOUTH 
     &          CVEL_US(I,K,bi,bj)*deltaT*recip_dyU(I,J_obc+1,bi,bj)*
./pkg/obcs/orlanski_south.F 119 ORLANSKI_SOUTH 
     &          (ab1*(uVel(I,J_obc+1,K,bi,bj)-uVel(I,J_obc,K,bi,bj)) +
./pkg/obcs/orlanski_south.F 126 ORLANSKI_SOUTH 
                  CL=(vVel(I,J_obc+2,K,bi,bj)-VS_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_south.F 134 ORLANSKI_SOUTH 
               CVEL_VS(I,K,bi,bj) = f1*(CL*dyF(I,J_obc+2,bi,bj)/deltaT)+
./pkg/obcs/orlanski_south.F 137 ORLANSKI_SOUTH 
               OBSv(I,K,bi,bj)=vVel(I,J_obc+1,K,bi,bj)+
./pkg/obcs/orlanski_south.F 138 ORLANSKI_SOUTH 
     &          CVEL_VS(I,K,bi,bj)*deltaT*recip_dyF(I,J_obc+1,bi,bj)*
./pkg/obcs/orlanski_south.F 139 ORLANSKI_SOUTH 
     &          (ab1*(vVel(I,J_obc+2,K,bi,bj)-vVel(I,J_obc+1,K,bi,bj))+
./pkg/obcs/orlanski_south.F 146 ORLANSKI_SOUTH 
                  CL=(theta(I,J_obc+1,K,bi,bj)-TS_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_south.F 154 ORLANSKI_SOUTH 
               CVEL_TS(I,K,bi,bj) = f1*(CL*dyC(I,J_obc+2,bi,bj)/deltaT)+
./pkg/obcs/orlanski_south.F 157 ORLANSKI_SOUTH 
               OBSt(I,K,bi,bj)=theta(I,J_obc,K,bi,bj)+
./pkg/obcs/orlanski_south.F 158 ORLANSKI_SOUTH 
     &          CVEL_TS(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc+1,bi,bj)*
./pkg/obcs/orlanski_south.F 159 ORLANSKI_SOUTH 
     &          (ab1*(theta(I,J_obc+1,K,bi,bj)-theta(I,J_obc,K,bi,bj))+
./pkg/obcs/orlanski_south.F 166 ORLANSKI_SOUTH 
                  CL=(salt(I,J_obc+1,K,bi,bj)-SS_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_south.F 174 ORLANSKI_SOUTH 
               CVEL_SS(I,K,bi,bj) = f1*(CL*dyC(I,J_obc+2,bi,bj)/deltaT)+
./pkg/obcs/orlanski_south.F 177 ORLANSKI_SOUTH 
               OBSs(I,K,bi,bj)=salt(I,J_obc,K,bi,bj)+
./pkg/obcs/orlanski_south.F 178 ORLANSKI_SOUTH 
     &          CVEL_SS(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc+1,bi,bj)*
./pkg/obcs/orlanski_south.F 179 ORLANSKI_SOUTH 
     &          (ab1*(salt(I,J_obc+1,K,bi,bj)-salt(I,J_obc,K,bi,bj)) +
./pkg/obcs/orlanski_south.F 188 ORLANSKI_SOUTH 
                  CL=(wVel(I,J_obc+1,K,bi,bj)-WS_STORE_1(I,K,bi,bj))/
./pkg/obcs/orlanski_south.F 196 ORLANSKI_SOUTH 
               CVEL_WS(I,K,bi,bj)=f1*(CL*dyC(I,J_obc+2,bi,bj)/deltaT)
./pkg/obcs/orlanski_south.F 199 ORLANSKI_SOUTH 
               OBSw(I,K,bi,bj)=wVel(I,J_obc,K,bi,bj)+
./pkg/obcs/orlanski_south.F 200 ORLANSKI_SOUTH 
     &           CVEL_WS(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc+1,bi,bj)*
./pkg/obcs/orlanski_south.F 201 ORLANSKI_SOUTH 
     &           (ab1*(wVel(I,J_obc+1,K,bi,bj)-wVel(I,J_obc,K,bi,bj))+
./pkg/obcs/orlanski_south.F 210 ORLANSKI_SOUTH 
               US_STORE_2(I,K,bi,bj)=uVel(I,J_obc+2,K,bi,bj) -
./pkg/obcs/orlanski_south.F 211 ORLANSKI_SOUTH 
     &         uVel(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 212 ORLANSKI_SOUTH 
               US_STORE_1(I,K,bi,bj)=uVel(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 213 ORLANSKI_SOUTH 
               US_STORE_4(I,K,bi,bj)=uVel(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_south.F 218 ORLANSKI_SOUTH 
               VS_STORE_2(I,K,bi,bj)=vVel(I,J_obc+3,K,bi,bj) -
./pkg/obcs/orlanski_south.F 219 ORLANSKI_SOUTH 
     &         vVel(I,J_obc+2,K,bi,bj)
./pkg/obcs/orlanski_south.F 220 ORLANSKI_SOUTH 
               VS_STORE_1(I,K,bi,bj)=vVel(I,J_obc+2,K,bi,bj)
./pkg/obcs/orlanski_south.F 221 ORLANSKI_SOUTH 
               VS_STORE_4(I,K,bi,bj)=vVel(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 226 ORLANSKI_SOUTH 
               TS_STORE_2(I,K,bi,bj)=theta(I,J_obc+2,K,bi,bj) -
./pkg/obcs/orlanski_south.F 227 ORLANSKI_SOUTH 
     &         theta(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 228 ORLANSKI_SOUTH 
               TS_STORE_1(I,K,bi,bj)=theta(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 229 ORLANSKI_SOUTH 
               TS_STORE_4(I,K,bi,bj)=theta(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_south.F 234 ORLANSKI_SOUTH 
               SS_STORE_2(I,K,bi,bj)=salt(I,J_obc+2,K,bi,bj) -
./pkg/obcs/orlanski_south.F 235 ORLANSKI_SOUTH 
     &         salt(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 236 ORLANSKI_SOUTH 
               SS_STORE_1(I,K,bi,bj)=salt(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 237 ORLANSKI_SOUTH 
               SS_STORE_4(I,K,bi,bj)=salt(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_south.F 244 ORLANSKI_SOUTH 
               WS_STORE_2(I,K,bi,bj)=wVel(I,J_obc+2,K,bi,bj) -
./pkg/obcs/orlanski_south.F 245 ORLANSKI_SOUTH 
     &         wVel(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 246 ORLANSKI_SOUTH 
               WS_STORE_1(I,K,bi,bj)=wVel(I,J_obc+1,K,bi,bj)
./pkg/obcs/orlanski_south.F 247 ORLANSKI_SOUTH 
               WS_STORE_4(I,K,bi,bj)=wVel(I,J_obc,K,bi,bj)
./pkg/obcs/orlanski_south.F 84 ORLANSKI_SOUTH 
      INTEGER  I, K, J_obc
./pkg/obcs/orlanski_south.F 99 ORLANSKI_SOUTH 
            J_obc=OB_Js(I,bi,bj)
./pkg/seaice/seaice_init_varia.F 404 SEAICE_INIT_VARIA 
          J_obc = OB_Js(i,bi,bj)
./pkg/seaice/seaice_init_varia.F 405 SEAICE_INIT_VARIA 
          IF ( J_obc.NE.OB_indexNone ) THEN
./pkg/seaice/seaice_init_varia.F 406 SEAICE_INIT_VARIA 
           seaiceMaskU(i,J_obc,bi,bj)=   0.0 _d 0
./pkg/seaice/seaice_init_varia.F 407 SEAICE_INIT_VARIA 
           seaiceMaskV(i,J_obc,bi,bj)=   0.0 _d 0
./pkg/seaice/seaice_init_varia.F 50 SEAICE_INIT_VARIA 
      INTEGER I_obc, J_obc