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

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

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

revision 1.1 by adcroft, Fri Jun 29 17:14:49 2001 UTC revision 1.2 by cnh, Fri Sep 21 15:13:31 2001 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2  C $Name$  C $Name$
3  C  C
4  C     /==========================================================\  CBOP
5  C     | SOLVE_FOR_PRESSURE3D.h                                   |  C    !ROUTINE: SOLVE_FOR_PRESSURE3D.h
6  C     | o Globals used by Fortran 3d pressure solver routine     |  C    !INTERFACE:
7  C     \==========================================================/  C    include SOLVE_FOR_PRESSURE3D.h
8    C    !DESCRIPTION: \bv
9    C     *==========================================================*
10    C     | SOLVE_FOR_PRESSURE3D.h                                    
11    C     | o Globals used by Fortran 3d pressure solver routine      
12    C     *==========================================================*
13    C     \ev
14    CEOP
15    
16  #ifdef ALLOW_NONHYDROSTATIC  #ifdef ALLOW_NONHYDROSTATIC
17        COMMON / SFP3D_COMMON_R8 / cg3d_x, cg3d_b        COMMON / SFP3D_COMMON_R8 / cg3d_x, cg3d_b
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22