| 1 | heimbach | 1.4 | C $Header: /u/gcmpack/MITgcm/model/inc/RECIP_HFACW_MACROS.h,v 1.3 2001/09/21 15:13:31 cnh Exp $ | 
| 2 | cnh | 1.3 | C $Name:  $ | 
| 3 | cnh | 1.1 | C | 
| 4 | cnh | 1.3 | CBOP | 
| 5 |  |  | C    !ROUTINE: RECIP_HFACW_MACROS.h | 
| 6 |  |  | C    !INTERFACE: | 
| 7 |  |  | C    include RECIP_HFACW_MACROS.h | 
| 8 |  |  | C    !DESCRIPTION: \bv | 
| 9 |  |  | C     *==========================================================* | 
| 10 |  |  | C     | RECIP_HFACW_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 | cnh | 1.1 |  | 
| 19 |  |  | #ifdef RECIP_HFACW_CONST | 
| 20 |  |  | #define  _recip_hFacW(i,j,k,bi,bj) recip_hFacW(1,1,1,1,1) | 
| 21 |  |  | #endif | 
| 22 |  |  |  | 
| 23 |  |  | #ifdef RECIP_HFACW_FX | 
| 24 |  |  | #define  _recip_hFacW(i,j,k,bi,bj) recip_hFacW(i,1,1,bi,1) | 
| 25 |  |  | #endif | 
| 26 |  |  |  | 
| 27 |  |  | #ifdef RECIP_HFACW_FY | 
| 28 |  |  | #define  _recip_hFacW(i,j,k,bi,bj) recip_hFacW(1,j,1,1,bj) | 
| 29 |  |  | #endif | 
| 30 |  |  |  | 
| 31 |  |  | #ifdef RECIP_HFACW_FXY | 
| 32 |  |  | #define  _recip_hFacW(i,j,k,bi,bj) recip_hFacW(i,j,1,bi,bj) | 
| 33 |  |  | #endif | 
| 34 |  |  |  | 
| 35 | heimbach | 1.4 | #ifdef ALLOW_DEPTH_CONTROL | 
| 36 |  |  | # define _recip_hFacW(i,j,k,bi,bj) recip_hFacW(i,j,k,bi,bj)*maskW(i,j,k,bi,bj) | 
| 37 |  |  | #endif | 
| 38 |  |  |  | 
| 39 | cnh | 1.1 | #ifndef _recip_hFacW | 
| 40 |  |  | #define  _recip_hFacW(i,j,k,bi,bj) recip_hFacW(i,j,k,bi,bj) | 
| 41 |  |  | #endif |