/[MITgcm]/MITgcm/pkg/exch2/W2_EXCH2_PARAMS.h
ViewVC logotype

Annotation of /MITgcm/pkg/exch2/W2_EXCH2_PARAMS.h

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

Revision 1.4 - (hide annotations) (download)
Tue Apr 6 00:25:56 2004 UTC (20 years, 2 months ago) by dimitri
Branch: MAIN
CVS Tags: checkpoint52n_post, checkpoint53d_post, checkpoint54a_pre, checkpoint55c_post, checkpoint54e_post, checkpoint54a_post, checkpoint53c_post, checkpoint57k_post, checkpoint55d_pre, checkpoint57d_post, checkpoint57g_post, checkpoint57b_post, checkpoint57c_pre, checkpoint55j_post, checkpoint56b_post, checkpoint57i_post, checkpoint57e_post, checkpoint55h_post, checkpoint53b_post, checkpoint57g_pre, checkpoint54b_post, checkpoint53b_pre, checkpoint55b_post, checkpoint54d_post, checkpoint56c_post, checkpoint52m_post, checkpoint55, checkpoint53a_post, checkpoint57f_pre, checkpoint57a_post, checkpoint54, checkpoint54f_post, checkpoint55g_post, checkpoint55f_post, checkpoint57a_pre, checkpoint55i_post, checkpoint57, checkpoint56, checkpoint53, eckpoint57e_pre, checkpoint57h_done, checkpoint53g_post, checkpoint57f_post, checkpoint57c_post, checkpoint55e_post, checkpoint53f_post, checkpoint55a_post, checkpoint53d_pre, checkpoint54c_post, checkpoint57j_post, checkpoint57h_pre, checkpoint57l_post, checkpoint57h_post, checkpoint56a_post, checkpoint55d_post
Changes since 1.3: +6 -3 lines
File MIME type: text/plain 
o extending useSingleCpuIO option to work with new exch2 I/O format
  - old-style, missing-tile I/O is still accessible by defining CPP
    option MISSING_TILE_IO in pkg/mdsio/MDSIO_OPTIONS.h
1 dimitri 1.4 C $Header: /u/gcmpack/MITgcm/pkg/exch2/W2_EXCH2_PARAMS.h,v 1.3 2004/04/02 15:33:58 cnh Exp $
2 afe 1.1 C
3     C /==========================================================\
4     C | W2_EXCH2_PARAMS.h Parameters for a WRAPPER2 topology |
5     C |==========================================================|
6     C | |
7     C \==========================================================/
8    
9     C W2 tile id variables (tile ids are no longer a function of
10     C process and subgrid indicies).
11 dimitri 1.4 C W2_myTileList :: list of tiles owned by this process
12     C W2_mpi_myTileList :: same as W2_myTileList, but contains
13     C information for all processes
14     INTEGER W2_myTileList(nSx), W2_mpi_myTileList(nPx*nPy,nSx)
15 afe 1.1 INTEGER E2_MSGHANDLES(2,MAX_NEIGHBOURS, nSx)
16 dimitri 1.4 COMMON /W2_EXCH2_PARAMS_I/ W2_myTileList, W2_mpi_myTileList
17 afe 1.1
18     CHARACTER W2_myCommFlag(MAX_NEIGHBOURS,nSx)
19     COMMON /W2_EXCH2_PARAMS_C/ W2_myCommFlag
20    
21     INTEGER e2BufrRecSize
22 cnh 1.2 PARAMETER (
23     & e2BufrRecSize = ( (sNx+2*OLx)*2*OLy+(sNy+2*OLy)*2*OLx)*Nr
24     &)
25 afe 1.1 _RL E2BUFR1_RL( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
26     _RL E2BUFR2_RL( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
27     _RL E2BUFR1_RS( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
28     _RL E2BUFR2_RS( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
29 cnh 1.3 _R4 E2BUFR1_R4( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
30     _R4 E2BUFR2_R4( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
31     _R8 E2BUFR1_R8( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
32     _R8 E2BUFR2_R8( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
33 afe 1.1 COMMON /W2_EXCH2_BUF_RL/ E2BUFR1_RL, E2BUFR2_RL
34     COMMON /W2_EXCH2_BUF_RS/ E2BUFR1_RS, E2BUFR2_RS
35 cnh 1.3 COMMON /W2_EXCH2_BUF_R4/ E2BUFR1_R4, E2BUFR2_R4
36     COMMON /W2_EXCH2_BUF_R8/ E2BUFR1_R8, E2BUFR2_R8
  ViewVC Help
Powered by ViewVC 1.1.22