/[MITgcm]/MITgcm/pkg/exch2/exch2_uv_3d_rx.template
ViewVC logotype

Diff of /MITgcm/pkg/exch2/exch2_uv_3d_rx.template

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

revision 1.3 by jmc, Fri Aug 1 00:50:18 2008 UTC revision 1.4 by jmc, Sat Aug 2 23:04:38 2008 UTC
# Line 3  C $Name$ Line 3  C $Name$
3    
4  #include "CPP_EEOPTIONS.h"  #include "CPP_EEOPTIONS.h"
5  #include "W2_OPTIONS.h"  #include "W2_OPTIONS.h"
6  #define DO_CORNER_COPY_V2U  #undef DO_CORNER_COPY_V2U
7    
8  CBOP  CBOP
9  C     !ROUTINE: EXCH2_UV_3D_RX  C     !ROUTINE: EXCH2_UV_3D_RX
# Line 119  C          Uphi(snx+1,sny+1,k,bi,bj)= vP Line 119  C          Uphi(snx+1,sny+1,k,bi,bj)= vP
119            ENDDO            ENDDO
120           ENDIF           ENDIF
121          ENDIF          ENDIF
122  #endif  #endif /* DO_CORNER_COPY_V2U */
123    
124  C--     Now zero out the null areas that should not be used in the numerics  C--     Now zero out the null areas that should not be used in the numerics
125  C       Also add one valid u,v value next to the corner, that allows  C       Also add one valid u,v value next to the corner, that allows
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22