/[MITgcm]/MITgcm/pkg/mom_vecinv/mom_vi_del2uv.F
ViewVC logotype

Diff of /MITgcm/pkg/mom_vecinv/mom_vi_del2uv.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.8 by adcroft, Tue Jul 20 17:46:38 2004 UTC revision 1.9 by jmc, Tue Sep 21 00:14:40 2004 UTC
# Line 127  C               | Line 127  C               |
127  C   V(N,0) --- Z(N+1,0) --- V(N+1,0) ---  C   V(N,0) --- Z(N+1,0) --- V(N+1,0) ---
128  C               |  C               |
129  C              U(N+1,-1)  C              U(N+1,-1)
130           if(southEastCorner.and.i.eq.sNx+1.and.j.eq.0) Dij=hDiv(sNx+1,1)           if(southEastCorner.and.i.eq.sNx+1.and.j.eq.0)uDij=hDiv(sNx+1,1)
131           if(southEastCorner.and.i.eq.sNx+1.and.j.eq.1) Dim=hDiv(sNx,0)           if(southEastCorner.and.i.eq.sNx+1.and.j.eq.1) Dim=hDiv(sNx,0)
132  C                U(N+1,N+2)  C                U(N+1,N+2)
133  C                 |  C                 |
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22