--- MITgcm/model/inc/SOLVE_FOR_PRESSURE.h	2001/05/29 14:01:36	1.2
+++ MITgcm/model/inc/SOLVE_FOR_PRESSURE.h	2001/09/21 15:13:31	1.3
@@ -1,10 +1,17 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/inc/SOLVE_FOR_PRESSURE.h,v 1.2 2001/05/29 14:01:36 adcroft Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/inc/SOLVE_FOR_PRESSURE.h,v 1.3 2001/09/21 15:13:31 cnh Exp $
 C $Name:  $
 C
-C     /==========================================================\
-C     | SOLVE_FOR_PRESSURE.h                                     |
-C     | o Globals used by Fortran pressure solver routine        |
-C     \==========================================================/
+CBOP
+C    !ROUTINE: SOLVE_FOR_PRESSURE.h
+C    !INTERFACE:
+C    include SOLVE_FOR_PRESSURE.h
+C    !DESCRIPTION: \bv
+C     *==========================================================*
+C     | SOLVE_FOR_PRESSURE.h                                      
+C     | o Globals used by Fortran pressure solver routine         
+C     *==========================================================*
+C     \ev
+CEOP
       COMMON / SFP_COMMON_R8 / cg2d_x, cg2d_b
       _RL cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
       _RL cg2d_b(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)