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

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

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

Revision 1.3 - (show annotations) (download)
Tue May 29 14:01:36 2001 UTC (22 years, 11 months ago) by adcroft
Branch: MAIN
CVS Tags: checkpoint40pre3, checkpoint40pre1, checkpoint40pre7, checkpoint40pre6, checkpoint40pre9, checkpoint40pre8, checkpoint40pre2, checkpoint40pre4, checkpoint40pre5, checkpoint40
Changes since 1.2: +6 -2 lines
File MIME type: text/plain 
Merge from branch pre38:
 o essential mods for cubed sphere
 o debugged atmosphere, dynamcis + physics (aim)
 o new packages (mom_vecinv, mom_fluxform, ...)
1 C $Header: /u/gcmpack/models/MITgcmUV/model/inc/FCORI_MACROS.h,v 1.2.2.1 2001/04/02 16:37:20 adcroft Exp $
2 C $Name: $
3 C
4 C /==========================================================\
5 C | FCORI_MACROS.h |
6 C |==========================================================|
7 C | These macros are used to reduce memory requirement and/or|
8 C | memory references when variables are fixed along a given |
9 C | axis or axes. |
10 C \==========================================================/
11
12 #ifdef FCORI_CONST
13 #define _fCori(i,j,bi,bj) fCori(1,1,1,1)
14 #define _fCoriG(i,j,bi,bj) fCoriG(1,1,1,1)
15 #endif
16
17 #ifdef FCORI_FX
18 #define _fCori(i,j,bi,bj) fCori(i,1,bi,1)
19 #define _fCoriG(i,j,bi,bj) fCoriG(i,1,bi,1)
20 #endif
21
22 #ifdef FCORI_FY
23 #define _fCori(i,j,bi,bj) fCori(1,j,1,bj)
24 #define _fCoriG(i,j,bi,bj) fCoriG(1,j,1,bj)
25 #endif
26
27 #ifndef _fCori
28 #define _fCori(i,j,bi,bj) fCori(i,j,bi,bj)
29 #define _fCoriG(i,j,bi,bj) fCoriG(i,j,bi,bj)
30 #endif
  ViewVC Help
Powered by ViewVC 1.1.22