Symbol Description Uses
obc_mask 17



File Line number Procedure Code
./pkg/obcs/obcs_apply_w.F 111 OBCS_APPLY_W
            obc_mask = maskC(Iobc,j,km1,bi,bj)*maskC(Iobc,j,k,bi,bj)
./pkg/obcs/obcs_apply_w.F 112 OBCS_APPLY_W
            wFld(Iobc,j,k,bi,bj) = OBEw(j,k,bi,bj)*obc_mask
./pkg/obcs/obcs_apply_w.F 115 OBCS_APPLY_W
            obc_mask = maskC(Iobc,j,km1,bi,bj)*maskC(Iobc,j,k,bi,bj)
./pkg/obcs/obcs_apply_w.F 116 OBCS_APPLY_W
            wFld(Iobc,j,k,bi,bj) = OBEw(j,k,bi,bj)*obc_mask
./pkg/obcs/obcs_apply_w.F 130 OBCS_APPLY_W
            obc_mask = maskC(Iobc,j,km1,bi,bj)*maskC(Iobc,j,k,bi,bj)
./pkg/obcs/obcs_apply_w.F 131 OBCS_APPLY_W
            wFld(Iobc,j,k,bi,bj) = OBWw(j,k,bi,bj)*obc_mask
./pkg/obcs/obcs_apply_w.F 134 OBCS_APPLY_W
            obc_mask = maskC(Iobc,j,km1,bi,bj)*maskC(Iobc,j,k,bi,bj)
./pkg/obcs/obcs_apply_w.F 135 OBCS_APPLY_W
            wFld(Iobc,j,k,bi,bj) = OBWw(j,k,bi,bj)*obc_mask
./pkg/obcs/obcs_apply_w.F 51 OBCS_APPLY_W
      _RL obc_mask
./pkg/obcs/obcs_apply_w.F 72 OBCS_APPLY_W
            obc_mask = maskC(i,Jobc,km1,bi,bj)*maskC(i,Jobc,k,bi,bj)
./pkg/obcs/obcs_apply_w.F 73 OBCS_APPLY_W
            wFld(i,Jobc,k,bi,bj) = OBNw(i,k,bi,bj)*obc_mask
./pkg/obcs/obcs_apply_w.F 76 OBCS_APPLY_W
            obc_mask = maskC(i,Jobc,km1,bi,bj)*maskC(i,Jobc,k,bi,bj)
./pkg/obcs/obcs_apply_w.F 77 OBCS_APPLY_W
            wFld(i,Jobc,k,bi,bj) = OBNw(i,k,bi,bj)*obc_mask
./pkg/obcs/obcs_apply_w.F 91 OBCS_APPLY_W
            obc_mask = maskC(i,Jobc,km1,bi,bj)*maskC(i,Jobc,k,bi,bj)
./pkg/obcs/obcs_apply_w.F 92 OBCS_APPLY_W
            wFld(i,Jobc,k,bi,bj) = OBSw(i,k,bi,bj)*obc_mask
./pkg/obcs/obcs_apply_w.F 95 OBCS_APPLY_W
            obc_mask = maskC(i,Jobc,km1,bi,bj)*maskC(i,Jobc,k,bi,bj)
./pkg/obcs/obcs_apply_w.F 96 OBCS_APPLY_W
            wFld(i,Jobc,k,bi,bj) = OBSw(i,k,bi,bj)*obc_mask