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

Annotation of /MITgcm/model/inc/SOLVE_FOR_PRESSURE3D.h

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

Revision 1.1 - (hide annotations) (download)
Fri Jun 29 17:14:49 2001 UTC (22 years, 10 months ago) by adcroft
Branch: MAIN
CVS Tags: checkpoint40pre3, checkpoint40pre1, checkpoint40pre7, checkpoint40pre6, checkpoint40pre9, checkpoint40pre8, checkpoint40pre2, checkpoint40pre4, checkpoint40pre5, checkpoint40
File MIME type: text/plain 
Moved cg3d_x into DYNVARS.h and renamed it to phi_nh.
 - cg3d and cg2d now look more similar
 - output formatted to fit Chris's tastes (I think)
1 adcroft 1.1 C $Header: /u/gcmpack/models/MITgcmUV/model/inc/SOLVE_FOR_PRESSURE.h,v 1.2 2001/05/29 14:01:36 adcroft Exp $
2     C $Name: $
3     C
4     C /==========================================================\
5     C | SOLVE_FOR_PRESSURE3D.h |
6     C | o Globals used by Fortran 3d pressure solver routine |
7     C \==========================================================/
8    
9     #ifdef ALLOW_NONHYDROSTATIC
10     COMMON / SFP3D_COMMON_R8 / cg3d_x, cg3d_b
11     _RL cg3d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy)
12     _RL cg3d_b(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy)
13     #endif /* ALLOW_NONHYDROSTATIC */
  ViewVC Help
Powered by ViewVC 1.1.22