/[MITgcm]/MITgcm/model/inc/TANPHIATU_MACROS.h
ViewVC logotype

Contents of /MITgcm/model/inc/TANPHIATU_MACROS.h

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

Revision 1.1 - (show annotations) (download)
Mon Jun 8 21:43:00 1998 UTC (27 years, 4 months ago) by cnh
Branch: MAIN
CVS Tags: checkpoint11, checkpoint10, checkpoint13, checkpoint15, checkpoint14, checkpoint17, checkpoint19, checkpoint18, checkpoint28, checkpoint29, checkpoint20, checkpoint21, checkpoint22, checkpoint23, checkpoint24, checkpoint25, checkpoint27, branch-atmos-merge-freeze, branch-atmos-merge-start, checkpoint7, checkpoint6, checkpoint9, checkpoint8, checkpoint26, checkpoint12, checkpoint16, branch-atmos-merge-shapiro, checkpoint33, checkpoint32, checkpoint31, checkpoint30, checkpoint34, branch-atmos-merge-zonalfilt, branch-point-rdot, branch-atmos-merge-phase5, branch-atmos-merge-phase4, branch-atmos-merge-phase7, branch-atmos-merge-phase6, branch-atmos-merge-phase1, branch-atmos-merge-phase3, branch-atmos-merge-phase2
Branch point for: checkpoint7-4degree-ref, branch-rdot, branch-atmos-merge
File MIME type: text/plain 
Merge of GM Redi and spherical polar and inplicit diffusion
and CD. Everything for a global run is now included, however,
still some discrepancies with GM Redi.
1 C $Header: /u/gcmpack/models/MITgcmUV/model/inc/RDXC_MACROS.h,v 1.1 1998/05/27 21:01:46 cnh Exp $
2 C
3 C /==========================================================\
4 C | TANPHIATU_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 TANPHIATU_CONST
12 #define _tanPhiAtU(i,j,bi,bj) tanPhiAtU(1,1,1,1)
13 #endif
14
15 #ifdef TANPHIATU_FX
16 #define _tanPhiAtU(i,j,bi,bj) tanPhiAtU(i,1,bi,1)
17 #endif
18
19 #ifdef TANPHIATU_FY
20 #define _tanPhiAtU(i,j,bi,bj) tanPhiAtU(1,j,1,bj)
21 #endif
22
23 #ifndef _tanPhiAtU
24 #define _tanPhiAtU(i,j,bi,bj) tanPhiAtU(i,j,bi,bj)
25 #endif
  ViewVC Help
Powered by ViewVC 1.1.22