c
c=======================================================================
c  Include file "vertical.h"
c=======================================================================
#ifndef rmdocinc
c
#ifndef gridold
c  DZT   Thicknesses of the tracer vertical boxes.           (real; cm)
c  DZV   Thicknesses of the velocity vertical boxes.         (real; cm)
#endif
c  HTZ   Depth at the bottom of the velocity vertical boxes. (real; cm)
c  HVZ   Depth at the bottom of the tracer vertical boxes.   (real; cm)
c
c=======================================================================
#endif
c
      FLOAT 
     *                  htz(imt,km,jmt),hvz(imt,km,jmt)
#ifndef gridold
     *                  ,dzt(imt,jmt,km),dzv(imt,jmt,km)
#endif
      common /vertical/ htz,hvz
#ifndef gridold
     *                  ,dzt,dzv
#endif