/[MITgcm]/MITgcm/eesupp/src/exch_uv_xy_rx.template
ViewVC logotype

Diff of /MITgcm/eesupp/src/exch_uv_xy_rx.template

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

revision 1.9 by jmc, Fri Aug 17 18:34:17 2007 UTC revision 1.10 by jmc, Tue Apr 28 15:17:00 2009 UTC
# Line 97  c    I            OLw, OLe, OLs, OLn, my Line 97  c    I            OLw, OLe, OLs, OLn, my
97  c    I            exchWidthX, exchWidthY,  c    I            exchWidthX, exchWidthY,
98  c    I            FORWARD_SIMULATION, EXCH_UPDATE_CORNERS, myThid )  c    I            FORWARD_SIMULATION, EXCH_UPDATE_CORNERS, myThid )
99  c_jmc: for JAM compatibility, replace the 2 CALLs above by the 2 CPP_MACROs:  c_jmc: for JAM compatibility, replace the 2 CALLs above by the 2 CPP_MACROs:
100         _EXCH_XY_RX( Uphi, myThid )  c      _EXCH_XY_RX( Uphi, myThid )
101         _EXCH_XY_RX( Vphi, myThid )  c      _EXCH_XY_RX( Vphi, myThid )
102           CALL EXCH_XY_RX( Uphi, myThid )
103           CALL EXCH_XY_RX( Vphi, myThid )
104        ENDIF        ENDIF
105    
106        RETURN        RETURN

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

  ViewVC Help
Powered by ViewVC 1.1.22