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

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

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

revision 1.12 by jmc, Fri Apr 23 20:21:06 2010 UTC revision 1.13 by jmc, Tue Sep 4 00:45:25 2012 UTC
# Line 87  C      Setup MPI stuff here Line 87  C      Setup MPI stuff here
87         theTag1 =  (thisTile-1)*W2_maxNeighbours*2 + nN-1         theTag1 =  (thisTile-1)*W2_maxNeighbours*2 + nN-1
88         theTag2 =  (thisTile-1)*W2_maxNeighbours*2         theTag2 =  (thisTile-1)*W2_maxNeighbours*2
89       &         + W2_maxNeighbours + nN-1       &         + W2_maxNeighbours + nN-1
90         tProc = exch2_tProc(tgT)-1         tProc = W2_tileProc(tgT)-1
91         sProc = exch2_tProc(thisTile)-1         sProc = W2_tileProc(thisTile)-1
92         theType = _MPI_TYPE_RX         theType = _MPI_TYPE_RX
93  #ifdef W2_E2_DEBUG_ON  #ifdef W2_E2_DEBUG_ON
94         WRITE(msgBuf,'(A,I5,A,I5,A)')         WRITE(msgBuf,'(A,I5,A,I5,A)')
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.22