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

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

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

revision 1.12 by jmc, Mon Mar 26 19:13:15 2012 UTC revision 1.13 by jmc, Mon Sep 3 19:39:25 2012 UTC
# Line 2  C $Header$ Line 2  C $Header$
2  C $Name$  C $Name$
3    
4  #include "CPP_EEOPTIONS.h"  #include "CPP_EEOPTIONS.h"
 #undef LOCAL_DBUG  
5    
6  CBOP  CBOP
7  C     !ROUTINE: EXCH_RX2_CUBE_AD  C     !ROUTINE: EXCH_RX2_CUBE_AD
# Line 160  C     Wait until all threads finish fill Line 159  C     Wait until all threads finish fill
159  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
160    
161  #ifdef ALLOW_USE_MPI  #ifdef ALLOW_USE_MPI
162          IF ( usingMPI ) THEN
163  C  AD: all MPI part is acting on buffer and is identical to forward code,  C  AD: all MPI part is acting on buffer and is identical to forward code,
164  C  AD: except a) the buffer level: send from lev.2, receive into lev.1  C  AD: except a) the buffer level: send from lev.2, receive into lev.1
165  C  AD:        b) the length of transferred buffer (<- match the ad_put/ad_get)  C  AD:        b) the length of transferred buffer (<- match the ad_put/ad_get)
# Line 251  C           that he has consumed the buf Line 251  C           that he has consumed the buf
251  C     Everyone waits until master-thread finishes receiving  C     Everyone waits until master-thread finishes receiving
252        CALL BAR2( myThid )        CALL BAR2( myThid )
253    
254          ENDIF
255  #endif /* ALLOW_USE_MPI */  #endif /* ALLOW_USE_MPI */
256    
257  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13

  ViewVC Help
Powered by ViewVC 1.1.22