/[MITgcm]/MITgcm/pkg/exch2/w2_set_gen_facets.F
ViewVC logotype

Diff of /MITgcm/pkg/exch2/w2_set_gen_facets.F

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

revision 1.1 by jmc, Tue May 12 19:40:32 2009 UTC revision 1.2 by jmc, Fri Apr 23 20:21:06 2010 UTC
# Line 18  C     process topology information from Line 18  C     process topology information from
18  C     !USES:  C     !USES:
19        IMPLICIT NONE        IMPLICIT NONE
20    
21  C      Tile toplogy settings data structures  C      Tile topology settings data structures
22  #include "SIZE.h"  #include "SIZE.h"
23  #include "EEPARAMS.h"  #include "EEPARAMS.h"
24  #include "W2_EXCH2_SIZE.h"  #include "W2_EXCH2_SIZE.h"
# Line 32  C               (Note: not relevant sinc Line 32  C               (Note: not relevant sinc
32    
33  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
34  C     === Local variables ===  C     === Local variables ===
35  C     msgBuf     :: Informational/error meesage buffer  C     msgBuf     :: Informational/error message buffer
36        CHARACTER*(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
37        CHARACTER*1 edge(4)        CHARACTER*1 edge(4)
38        INTEGER i,j,jj,fNx,fNy        INTEGER i,j,jj,fNx,fNy
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22