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

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

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

revision 1.7 by jmc, Thu May 6 23:28:45 2010 UTC revision 1.8 by jmc, Mon Mar 26 19:43:10 2012 UTC
# Line 75  C--   First call the exchanges for the t Line 75  C--   First call the exchanges for the t
75         CALL EXCH2_RX1_CUBE( uPhi, .FALSE., 'T ',         CALL EXCH2_RX1_CUBE( uPhi, .FALSE., 'T ',
76       I            OLw, OLe, OLs, OLn, myNz,       I            OLw, OLe, OLs, OLn, myNz,
77       I            exchWidthX, exchWidthY,       I            exchWidthX, exchWidthY,
78       I            EXCH_UPDATE_CORNERS, myThid )       I            EXCH_IGNORE_CORNERS, myThid )
79         CALL EXCH2_RX1_CUBE( uPhi, .FALSE., 'T ',         CALL EXCH2_RX1_CUBE( uPhi, .FALSE., 'T ',
80       I            OLw, OLe, OLs, OLn, myNz,       I            OLw, OLe, OLs, OLn, myNz,
81       I            exchWidthX, exchWidthY,       I            exchWidthX, exchWidthY,
# Line 84  C--   First call the exchanges for the t Line 84  C--   First call the exchanges for the t
84         CALL EXCH2_RX1_CUBE( vPhi, .FALSE., 'T ',         CALL EXCH2_RX1_CUBE( vPhi, .FALSE., 'T ',
85       I            OLw, OLe, OLs, OLn, myNz,       I            OLw, OLe, OLs, OLn, myNz,
86       I            exchWidthX, exchWidthY,       I            exchWidthX, exchWidthY,
87       I            EXCH_UPDATE_CORNERS, myThid )       I            EXCH_IGNORE_CORNERS, myThid )
88         CALL EXCH2_RX1_CUBE( vPhi, .FALSE., 'T ',         CALL EXCH2_RX1_CUBE( vPhi, .FALSE., 'T ',
89       I            OLw, OLe, OLs, OLn, myNz,       I            OLw, OLe, OLs, OLn, myNz,
90       I            exchWidthX, exchWidthY,       I            exchWidthX, exchWidthY,
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22