c
c=======================================================================
c  Include file "gradp.h"
c=======================================================================
c
#ifndef rmdocinc
c  DPDX    x-component of the horizontal pressure gradient.
c  DPDY    y-component of the horizontal pressure gradient.
c
c=======================================================================
c
#endif
      common /gradp/ dpdx,dpdy
      FLOAT
     *      dpdx(imt,km),dpdy(imt,km)