/[MITgcm]/MITgcm/verification/global_ocean.cs32x15/code_alt/code.12t_32x16/W2_EXCH2_TOPOLOGY.h
ViewVC logotype

Contents of /MITgcm/verification/global_ocean.cs32x15/code_alt/code.12t_32x16/W2_EXCH2_TOPOLOGY.h

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


Revision 1.2 - (show annotations) (download)
Fri Aug 1 21:27:46 2008 UTC (14 years ago) by jmc
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +0 -0 lines
File MIME type: text/plain
FILE REMOVED
updated files have been moved to utils/exch2/code-mods

1 C Tiling topology data structures header file
2 C *** THIS FILE IS AUTOMATICALLY GENERATED ***
3 C NTILES :: Number of tiles in this topology
4 C MAX_NEIGHBOURS :: Maximum number of neighbours any tile has.
5 C exch2_domain_nxt :: Total domain length in tiles.
6 C exch2_domain_nyt :: Maximum domain height in tiles.
7 C exch2_tnx :: Size in X for each tile.
8 C exch2_tny :: Size in Y for each tile.
9 C exch2_tbasex :: Tile offset in X within its sub-domain (cube face)
10 C exch2_tbasey :: Tile offset in Y within its sub-domain (cube face)
11 C exch2_tglobalxlo :: Tile base X index within global index space.
12 C exch2_tglobalylo :: Tile base Y index within global index space.
13 C exch2_isWedge :: 0 if West not at domain edge, 1 if it is.
14 C exch2_isNedge :: 0 if North not at domain edge, 1 if it is.
15 C exch2_isEedge :: 0 if East not at domain edge, 1 if it is.
16 C exch2_isSedge :: 0 if South not at domain edge, 1 if it is.
17 C exch2_myFace :: Cube face number used for I/O.
18 C exch2_nNeighbours :: Tile neighbour entries count.
19 C exch2_tProc :: Rank of process owning tile
20 C :: (filled at run time).
21 C exch2_neighbourId :: Tile number for each neighbour entry.
22 C exch2_opposingSend_record :: Record for entry in target tile send
23 C :: list that has this tile and face
24 C :: as its target.
25 C exch2_pi :: X index row of target to source permutation
26 C :: matrix for each neighbour entry.
27 C exch2_pj :: Y index row of target to source permutation
28 C :: matrix for each neighbour entry.
29 C exch2_oi :: X index element of target to source
30 C :: offset vector for cell-centered quantities
31 C :: of each neighbor entry.
32 C exch2_oj :: Y index element of target to source
33 C :: offset vector for cell-centered quantities
34 C :: of each neighbor entry.
35 C exch2_oi_f :: X index element of target to source
36 C :: offset vector for face quantities
37 C :: of each neighbor entry.
38 C exch2_oj_f :: Y index element of target to source
39 C :: offset vector for face quantities
40 C :: of each neighbor entry.
41 INTEGER NTILES
42 INTEGER MAX_NEIGHBOURS
43 INTEGER exch2_domain_nyt
44 INTEGER exch2_domain_nxt
45 PARAMETER ( NTILES = 12)
46 PARAMETER ( MAX_NEIGHBOURS = 5)
47 PARAMETER ( exch2_domain_nxt=6)
48 PARAMETER ( exch2_domain_nyt=2)
49 INTEGER exch2_tnx(NTILES)
50 INTEGER exch2_tny(NTILES)
51 INTEGER exch2_tbasex(NTILES)
52 INTEGER exch2_tbasey(NTILES)
53 INTEGER exch2_txglobalo(NTILES)
54 INTEGER exch2_tyglobalo(NTILES)
55 INTEGER exch2_isWedge(NTILES)
56 INTEGER exch2_isNedge(NTILES)
57 INTEGER exch2_isEedge(NTILES)
58 INTEGER exch2_isSedge(NTILES)
59 INTEGER exch2_myFace(NTILES)
60 INTEGER exch2_mydnx(NTILES)
61 INTEGER exch2_mydny(NTILES)
62 INTEGER exch2_nNeighbours(NTILES)
63 INTEGER exch2_tProc(NTILES)
64 INTEGER exch2_neighbourId(MAX_NEIGHBOURS,NTILES)
65 INTEGER exch2_opposingSend_record(MAX_NEIGHBOURS,NTILES)
66 INTEGER exch2_pi(2,MAX_NEIGHBOURS,NTILES)
67 INTEGER exch2_pj(2,MAX_NEIGHBOURS,NTILES)
68 INTEGER exch2_oi(MAX_NEIGHBOURS,NTILES)
69 INTEGER exch2_oj(MAX_NEIGHBOURS,NTILES)
70 INTEGER exch2_oi_f(MAX_NEIGHBOURS,NTILES)
71 INTEGER exch2_oj_f(MAX_NEIGHBOURS,NTILES)
72
73
74 C Exchange execution loop data structures
75 INTEGER exch2_itlo_c(MAX_NEIGHBOURS,NTILES)
76 INTEGER exch2_ithi_c(MAX_NEIGHBOURS,NTILES)
77 INTEGER exch2_jtlo_c(MAX_NEIGHBOURS,NTILES)
78 INTEGER exch2_jthi_c(MAX_NEIGHBOURS,NTILES)
79
80 COMMON /W2_EXCH2_TOPO_I/
81 & exch2_tnx, exch2_tny,
82 & exch2_tbasex,exch2_tbasey,
83 & exch2_txglobalo,exch2_tyglobalo,
84 & exch2_isWedge, exch2_isNedge,
85 & exch2_isEedge, exch2_isSedge,
86 & exch2_myFace, exch2_mydnx, exch2_mydny,
87 & exch2_nNeighbours,exch2_neighbourId,
88 & exch2_opposingSend_record,
89 & exch2_tProc,
90 & exch2_pi,exch2_pj,
91 & exch2_oi,exch2_oj,
92 & exch2_oi_f,exch2_oj_f
93
94 COMMON /W2_EXCH2_HALO_SPEC/
95 & exch2_itlo_c, exch2_ithi_c,
96 & exch2_jtlo_c, exch2_jthi_c
97 C *** THIS FILE IS AUTOMATICALLY GENERATED ***

  ViewVC Help
Powered by ViewVC 1.1.22