/[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.8 by jmc, Fri Apr 23 20:21:07 2010 UTC revision 1.9 by jmc, Thu May 6 23:28:44 2010 UTC
# Line 10  C     !ROUTINE: EXCH_RX_CUBE_AD Line 10  C     !ROUTINE: EXCH_RX_CUBE_AD
10    
11  C     !INTERFACE:  C     !INTERFACE:
12        SUBROUTINE EXCH2_RX1_CUBE_AD(        SUBROUTINE EXCH2_RX1_CUBE_AD(
13       U            array, fieldCode,       U            array,
14         I            signOption, fieldCode,
15       I            myOLw, myOLe, myOLn, myOLs, myNz,       I            myOLw, myOLe, myOLn, myOLs, myNz,
16       I            exchWidthX, exchWidthY,       I            exchWidthX, exchWidthY,
17       I            simulationMode, cornerMode, myThid )       I            cornerMode, myThid )
18    
19  C     !DESCRIPTION:  C     !DESCRIPTION:
20  C     Scalar field (1 component) AD-Exchange:  C     Scalar field (1 component) AD-Exchange:
# Line 33  C     == Global data == Line 34  C     == Global data ==
34    
35  C     !INPUT/OUTPUT PARAMETERS:  C     !INPUT/OUTPUT PARAMETERS:
36  C     array       :: Array with edges to exchange.  C     array       :: Array with edges to exchange.
37    C     signOption  :: Flag controlling whether field sign depends on orientation
38    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     myOLn,myOLs :: North and South overlap region sizes.
# Line 48  C     myThid      :: Thread number of th Line 51  C     myThid      :: Thread number of th
51        _RX array(1-myOLw:sNx+myOLe,        _RX array(1-myOLw:sNx+myOLe,
52       &          1-myOLs:sNy+myOLn,       &          1-myOLs:sNy+myOLn,
53       &          myNZ, nSx, nSy)       &          myNZ, nSx, nSy)
54          LOGICAL signOption
55        CHARACTER*2 fieldCode        CHARACTER*2 fieldCode
56        INTEGER exchWidthX        INTEGER exchWidthX
57        INTEGER exchWidthY        INTEGER exchWidthY
       INTEGER simulationMode  
58        INTEGER cornerMode        INTEGER cornerMode
59        INTEGER myThid        INTEGER myThid
60    
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22