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

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

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

revision 1.2 by cnh, Sun Feb 4 14:38:44 2001 UTC revision 1.3 by adcroft, Tue May 29 14:01:36 2001 UTC
# Line 11  C     \================================= Line 11  C     \=================================
11    
12  #ifdef FCORI_CONST  #ifdef FCORI_CONST
13  #define  _fCori(i,j,bi,bj) fCori(1,1,1,1)  #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  #endif
16    
17  #ifdef FCORI_FX  #ifdef FCORI_FX
18  #define  _fCori(i,j,bi,bj) fCori(i,1,bi,1)  #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  #endif
21    
22  #ifdef FCORI_FY  #ifdef FCORI_FY
23  #define  _fCori(i,j,bi,bj) fCori(1,j,1,bj)  #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  #endif
26    
27  #ifndef _fCori  #ifndef _fCori
28  #define  _fCori(i,j,bi,bj) fCori(i,j,bi,bj)  #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  #endif
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22