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) ) |