--- MITgcm/model/src/ini_vertical_grid.F	1998/07/02 14:17:11	1.1
+++ MITgcm/model/src/ini_vertical_grid.F	1998/07/29 18:33:48	1.2
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/ini_vertical_grid.F,v 1.1 1998/07/02 14:17:11 adcroft Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/ini_vertical_grid.F,v 1.2 1998/07/29 18:33:48 adcroft Exp $
 
 #include "CPP_EEOPTIONS.h"
 
@@ -30,13 +30,13 @@
       zFace(1) = 0. _d 0
       DO K=1,Nz
        dzF(K)     = delZ(K)
-       zFace(K+1) = zFace(K)+delZ(K)
+       zFace(K+1) = zFace(K)-delZ(K)
       ENDDO
       dzC(1)      = delZ(1) * 0.5 _d 0
       zC(1)       = delZ(1) * 0.5 _d 0
       DO K=2,Nz
        dzC(K)     = 0.5 _d 0 *(delZ(K-1)+delZ(K))
-       zC(K)      = zC(K) + dzC(K)
+       zC(K)      = zC(K) - dzC(K)
       ENDDO
       DO K=1,Nz
        saFac(K)  = 1. D0