C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/inc/SOLVE_FOR_PRESSURE3D.h,v 1.1 2001/06/29 17:14:49 adcroft Exp $ C $Name: $ C C /==========================================================\ C | SOLVE_FOR_PRESSURE3D.h | C | o Globals used by Fortran 3d pressure solver routine | C \==========================================================/ #ifdef ALLOW_NONHYDROSTATIC COMMON / SFP3D_COMMON_R8 / cg3d_x, cg3d_b _RL cg3d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) _RL cg3d_b(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) #endif /* ALLOW_NONHYDROSTATIC */