model/inc/DYG_MACROS.h

C $Header: /u/gcmpack/models/MITgcmUV/model/inc/DYG_MACROS.h,v 1.1 1998/05/27 05:57:02 cnh Exp $
C
C     /==========================================================\
C     | DYG_MACROS.h                                             |
C     |==========================================================|
C     | These macros are used to reduce memory requirement and/or|
C     | memory references when variables are fixed along a given |
C     | axis or axes.                                            |
C     \==========================================================/

#ifdef DYG_CONST
#define  _dyG(i,j,bi,bj) dyG(1,1,1,1)
#endif

#ifdef DYG_FX
#define  _dyG(i,j,bi,bj) dyG(i,1,bi,1)
#endif

#ifdef DYG_FY
#define  _dyG(i,j,bi,bj) dyG(1,j,1,bj)
#endif

#ifndef _dyG
#define  _dyG(i,j,bi,bj) dyG(i,j,bi,bj)
#endif
1	C $Header: /u/gcmpack/models/MITgcmUV/model/inc/DYG_MACROS.h,v 1.1 1998/05/27 05:57:02 cnh Exp $
2	C
3	C /==========================================================\
4	C \| DYG_MACROS.h \|
5	C \|==========================================================\|
6	C \| These macros are used to reduce memory requirement and/or\|
7	C \| memory references when variables are fixed along a given \|
8	C \| axis or axes. \|
9	C \==========================================================/
10
11	#ifdef DYG_CONST
12	#define _dyG(i,j,bi,bj) dyG(1,1,1,1)
13	#endif
14
15	#ifdef DYG_FX
16	#define _dyG(i,j,bi,bj) dyG(i,1,bi,1)
17	#endif
18
19	#ifdef DYG_FY
20	#define _dyG(i,j,bi,bj) dyG(1,j,1,bj)
21	#endif
22
23	#ifndef _dyG
24	#define _dyG(i,j,bi,bj) dyG(i,j,bi,bj)
25	#endif