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

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

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

revision 1.6 by jmc, Fri Aug 1 00:45:16 2008 UTC revision 1.7 by cnh, Tue Aug 5 18:31:55 2008 UTC
# Line 132  C      Setup MPI stuff here Line 132  C      Setup MPI stuff here
132         mb = nN         mb = nN
133         ir = 2         ir = 2
134         theTag1 =  (tt-1)*MAX_NEIGHBOURS*2 + oN-1         theTag1 =  (tt-1)*MAX_NEIGHBOURS*2 + oN-1
      &         + 10000*(  
      &            (thisTile-1)*MAX_NEIGHBOURS*2 + oN-1  
      &           )  
135         theTag2 =  (tt-1)*MAX_NEIGHBOURS*2 + MAX_NEIGHBOURS + oN-1         theTag2 =  (tt-1)*MAX_NEIGHBOURS*2 + MAX_NEIGHBOURS + oN-1
      &         + 10000*(  
      &            (thisTile-1)*MAX_NEIGHBOURS*2 + MAX_NEIGHBOURS + oN-1  
      &           )  
136         tProc = exch2_tProc(thisTile)-1         tProc = exch2_tProc(thisTile)-1
137         sProc = exch2_tProc(tt)-1         sProc = exch2_tProc(tt)-1
138         theType = MPI_REAL8         theType = MPI_REAL8
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22