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

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

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

revision 1.9 by jmc, Thu May 6 23:28:44 2010 UTC revision 1.10 by jmc, Wed May 19 01:25:17 2010 UTC
# Line 12  C     !INTERFACE: Line 12  C     !INTERFACE:
12        SUBROUTINE EXCH2_RX1_CUBE_AD(        SUBROUTINE EXCH2_RX1_CUBE_AD(
13       U            array,       U            array,
14       I            signOption, fieldCode,       I            signOption, fieldCode,
15       I            myOLw, myOLe, myOLn, myOLs, myNz,       I            myOLw, myOLe, myOLs, myOLn, myNz,
16       I            exchWidthX, exchWidthY,       I            exchWidthX, exchWidthY,
17       I            cornerMode, myThid )       I            cornerMode, myThid )
18    
# Line 38  C     signOption  :: Flag controlling wh Line 38  C     signOption  :: Flag controlling wh
38  C                 :: (signOption not yet implemented but needed for SM exch)  C                 :: (signOption not yet implemented but needed for SM exch)
39  C     fieldCode   :: field code (position on staggered grid)  C     fieldCode   :: field code (position on staggered grid)
40  C     myOLw,myOLe :: West and East overlap region sizes.  C     myOLw,myOLe :: West and East overlap region sizes.
41  C     myOLn,myOLs :: North and South overlap region sizes.  C     myOLs,myOLn :: South and North overlap region sizes.
42  C     exchWidthX  :: Width of data regi exchanged in X.  C     exchWidthX  :: Width of data regi exchanged in X.
43  C     exchWidthY  :: Width of data region exchanged in Y.  C     exchWidthY  :: Width of data region exchanged in Y.
44  C     cornerMode  :: halo-corner-region treatment: update/ignore corner region  C     cornerMode  :: halo-corner-region treatment: update/ignore corner region
45  C     myThid      :: Thread number of this instance of S/R EXCH...  C     myThid      :: Thread number of this instance of S/R EXCH...
46        INTEGER myOLw  
47        INTEGER myOLe        INTEGER myOLw, myOLe, myOLs, myOLn, myNz
       INTEGER myOLs  
       INTEGER myOLn  
       INTEGER myNz  
48        _RX array(1-myOLw:sNx+myOLe,        _RX array(1-myOLw:sNx+myOLe,
49       &          1-myOLs:sNy+myOLn,       &          1-myOLs:sNy+myOLn,
50       &          myNZ, nSx, nSy)       &          myNZ, nSx, nSy)
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22