Symbol Description Uses
mask2 7



File Line number Procedure Code
./pkg/fizhi/CtoA.F 36 CTOA
       _RS mask2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/CtoA.F 59 CTOA
           tmpfld2(i,j) = fieldin2(i,j,L,bi,bj)*mask2(i,j,L,bi,bj)
./pkg/fizhi/CtoA.F 5 CTOA
       subroutine CTOA(myThid,fieldin1,fieldin2,mask1,mask2,idim1,idim2,
./pkg/fizhi/CtoA.F 76 CTOA
          if( (mask2(i,j,L,bi,bj).ne.0.) .or. 
./pkg/fizhi/CtoA.F 77 CTOA
     .                               (mask2(i,j+1,L,bi,bj).ne.0.) ) then
./pkg/fizhi/CtoA.F 84 CTOA
     .            ( mask2(i,j,L,bi,bj) + mask2(i,j+1,L,bi,bj) )