Symbol Description Uses
OB_Jn 64



File Line number Procedure Code
./pkg/ctrl/ctrl_init_wet.F 132 CTRL_INIT_WET
      call CTRL_MASK_SET_XZ( 0, OB_Jn, nwetobcsn, ymaskobcs, mythid )
./model/src/update_cg2d.F 96 UPDATE_CG2D
          IF (OB_Jn(I,bi,bj).NE.0) aS2d(I,OB_Jn(I,bi,bj),bi,bj)=0.
./model/src/update_cg2d.F 97 UPDATE_CG2D
          IF (OB_Jn(I,bi,bj).NE.0) aS2d(I,OB_Jn(I,bi,bj)+1,bi,bj)=0.
./pkg/ctrl/ctrl_getobcsn.F 147 CTRL_GETOBCSN
                    j = OB_Jn(I,bi,bj)
./pkg/ctrl/ctrl_getobcsn.F 191 CTRL_GETOBCSN
                    j = OB_Jn(I,bi,bj)
./pkg/ctrl/ctrl_getobcsn.F 277 CTRL_GETOBCSN
                    j = OB_Jn(I,bi,bj)
./pkg/ctrl/ctrl_getobcsn.F 321 CTRL_GETOBCSN
                    j = OB_Jn(I,bi,bj)
./pkg/ctrl/ctrl_getobcsn.F 369 CTRL_GETOBCSN
                    j = OB_Jn(I,bi,bj)