--- MITgcm/eesupp/src/gather_2d_rx.template	2009/05/11 02:13:29	1.1
+++ MITgcm/eesupp/src/gather_2d_rx.template	2009/05/12 19:53:02	1.2
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/eesupp/src/gather_2d_rx.template,v 1.1 2009/05/11 02:13:29 jmc Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/eesupp/src/gather_2d_rx.template,v 1.2 2009/05/12 19:53:02 jmc Exp $
 C $Name:  $
 
 #include "PACKAGES_CONFIG.h"
@@ -23,8 +23,8 @@
 #include "EEPARAMS.h"
 #include "EESUPPORT.h"
 #ifdef ALLOW_EXCH2
+#include "W2_EXCH2_SIZE.h"
 #include "W2_EXCH2_TOPOLOGY.h"
-#include "W2_EXCH2_PARAMS.h"
 #endif /* ALLOW_EXCH2 */
 
 C     !INPUT/OUTPUT PARAMETERS:
@@ -167,7 +167,7 @@
 c         DO bj=1,nSy
           bj=1
            DO bi=1,nSx
-             tN = W2_mpi_myTileList(np,bi)
+             tN = W2_procTileList(bi,np)
              IF   ( exch2_mydNx(tN) .GT. xSize ) THEN
 C-           face x-size larger than glob-size : fold it
                iGjLoc = 0