--- MITgcm/model/inc/SURFACE.h	2002/02/09 23:38:55	1.6
+++ MITgcm/model/inc/SURFACE.h	2002/11/22 02:50:34	1.7
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/inc/SURFACE.h,v 1.6 2002/02/09 23:38:55 jmc Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/inc/SURFACE.h,v 1.7 2002/11/22 02:50:34 jmc Exp $
 C $Name:  $
 C
 CBOP
@@ -17,12 +17,14 @@
 C     \ev
 CEOP
 
-C--   COMMON /SOLVE_BAROT/  Barotropic variables common block
-C     Bo_surf  :: Boyancy|1/rho [ocean|atmos] at surface level [= g | alpha(p_o)]
-C     recip_Bo     ::  1/Bo_surf
-      COMMON /SOLVE_BAROT/ Bo_surf, recip_Bo
-      _RL  Bo_surf(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
+C--   COMMON /SURF_FIXED/  fixed surface arrays (Real)
+C     Bo_surf  :: Boyancy|1/rho [ocean|atmos] at surface level [=g|alpha(p_o)]
+C     recip_Bo :: 1/Bo_surf
+C     topoZ    :: topographic height [m] (used mainly for atmosphere)
+      COMMON /SURF_FIXED/ Bo_surf, recip_Bo, topoZ
+      _RL  Bo_surf (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
       _RL  recip_Bo(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
+      _RS  topoZ   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
 
 C--   COMMON /SURF_INDEX/ Common block for surface related index
 C     ksurfC ::  vertical index of the surface tracer cell