c
c=======================================================================
c  Include file "extra.h"  use during construction ONLY
c=======================================================================
c
#ifndef rmdocinc
c  xzvqz      thickness at uv points j+1 slab
c  xvdepth    depth at uv center grid j+1 slab
c
c=======================================================================
c
#endif
      common /extra/ xzvqz,xvdepth
      FLOAT 
     *     xzvqz(imt,km),xvdepth(imt,km)