c
c=======================================================================
c  Include file "moddat.h"
c=======================================================================
c
#ifndef rmdocinc
c  COORD    flag for type of horizontal coordinates.
c           [0] cartesian [1] spherical [2] rotated spherical
c  GRIDX    uniform grid spacing in the x-direction (cm | degrees).
c  GRIDY    uniform grid spacing in the x-direction (cm | degrees).
c  RLATD    transformation centroid longitude (degrees; south negative).
c  RLOND    transformation centroid latitude (degrees; west negative).
c  DELX     domain "longitudinal" shift.  (cm | degrees)
c  DELY     domain "latitudinal" shift.  (cm | degrees)
c  THETAD   domain rotation angle (degrees).
c  TLAT     latitude of tracer points (degrees; south negative).
c  TLON     longitude of tracer points (degrees; west negative).
c  VLAT     latitude of velocity points (degrees; south negative).
c  VLON     longitude of velocity points (degrees; west negative).
c
c=======================================================================
c
#endif
      common /imoddat/ coord
      integer coord
c
      common /fmoddat/ delx,dely,gridx,gridy,rlatd,rlngd,thetad,tlat,
     *                 tlon,vlat,vlon
      FLOAT
     *      delx,dely,gridx,gridy,rlatd,rlngd,thetad
      FLOAT 
     *      tlat(imt,jmt),tlon(imt,jmt),vlat(imt,jmt),vlon(imt,jmt)