interface_test/code/DXG_MACROS.h

C $Header: /u/gcmpack/MITgcm/model/inc/DXG_MACROS.h,v 1.4 2001/09/21 15:13:31 cnh Exp $
C $Name:  $
C
CBOP
C    !ROUTINE: DXG_MACROS.h
C    !INTERFACE:
C    include DXG_MACROS.h
C    !DESCRIPTION: \bv
C     *==========================================================*
C     | DXG_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     *==========================================================*
C     \ev
CEOP

#ifdef DXG_CONST
#define  _dxG(i,j,bi,bj) dxG(1,1,1,1)
#endif

#ifdef DXG_FX
#define  _dxG(i,j,bi,bj) dxG(i,1,bi,1)
#endif

#ifdef DXG_FY
#define  _dxG(i,j,bi,bj) dxG(1,j,1,bj)
#endif

#ifndef _dxG
#define  _dxG(i,j,bi,bj) dxG(i,j,bi,bj)
#endif
1	C $Header: /u/gcmpack/MITgcm/model/inc/DXG_MACROS.h,v 1.4 2001/09/21 15:13:31 cnh Exp $
2	C $Name: $
3	C
4	CBOP
5	C !ROUTINE: DXG_MACROS.h
6	C !INTERFACE:
7	C include DXG_MACROS.h
8	C !DESCRIPTION: \bv
9	C ==========================================================
10	C \| DXG_MACROS.h
11	C ==========================================================
12	C \| These macros are used to reduce memory requirement and/or
13	C \| memory references when variables are fixed along a given
14	C \| axis or axes.
15	C ==========================================================
16	C \ev
17	CEOP
18
19	#ifdef DXG_CONST
20	#define _dxG(i,j,bi,bj) dxG(1,1,1,1)
21	#endif
22
23	#ifdef DXG_FX
24	#define _dxG(i,j,bi,bj) dxG(i,1,bi,1)
25	#endif
26
27	#ifdef DXG_FY
28	#define _dxG(i,j,bi,bj) dxG(1,j,1,bj)
29	#endif
30
31	#ifndef _dxG
32	#define _dxG(i,j,bi,bj) dxG(i,j,bi,bj)
33	#endif