/[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.4 by jmc, Sat Aug 2 23:04:38 2008 UTC revision 1.5 by jmc, Mon Apr 27 04:06:11 2009 UTC
# Line 231  c      CALL EXCH_RX( Vphi, Line 231  c      CALL EXCH_RX( Vphi,
231  c    I            OLw, OLe, OLs, OLn, myNz,  c    I            OLw, OLe, OLs, OLn, myNz,
232  c    I            exchWidthX, exchWidthY,  c    I            exchWidthX, exchWidthY,
233  c    I            FORWARD_SIMULATION, EXCH_UPDATE_CORNERS, myThid )  c    I            FORWARD_SIMULATION, EXCH_UPDATE_CORNERS, myThid )
234  c_jmc: for JAM compatibility, replace the 2 CALLs above by the 2 CPP_MACROs:         CALL EXCH_3D_RX( Uphi, myNz, myThid )
235         _EXCH_XYZ_RX( Uphi, myThid )         CALL EXCH_3D_RX( Vphi, myNz, myThid )
        _EXCH_XYZ_RX( Vphi, myThid )  
236    
237        ENDIF        ENDIF
238    

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.22