--- MITgcm/pkg/exch2/exch2_recv_rx2.template	2010/04/23 20:21:07	1.11
+++ MITgcm/pkg/exch2/exch2_recv_rx2.template	2012/09/04 00:45:25	1.12
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/exch2/exch2_recv_rx2.template,v 1.11 2010/04/23 20:21:07 jmc Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/exch2/exch2_recv_rx2.template,v 1.12 2012/09/04 00:45:25 jmc Exp $
 C $Name:  $
 
 #include "CPP_EEOPTIONS.h"
@@ -80,8 +80,8 @@
 C      Setup MPI stuff here
        theTag1 = (soT-1)*W2_maxNeighbours*2 + oNb-1
        theTag2 = (soT-1)*W2_maxNeighbours*2 + W2_maxNeighbours + oNb-1
-       tProc = exch2_tProc(thisTile)-1
-       sProc = exch2_tProc(soT)-1
+       tProc = W2_tileProc(thisTile)-1
+       sProc = W2_tileProc(soT)-1
        theType = _MPI_TYPE_RX
        CALL MPI_Recv( e2Bufr1_RX, iBufr1, theType, sProc,
      &                theTag1, MPI_COMM_MODEL, mpiStatus, mpiRc )