C @(#)	 mapping.h	4.8 3/28/94>

      integer ieast(LEN)
      integer iwest(LEN)
      integer inorth(LEN)
      integer isouth(LEN)
      common /OMAP/ ieast,iwest,inorth,isouth
     
      integer gridi(LEN)
      integer gridj(LEN)
      integer mapi(LEN)
      integer nwater
      integer nland
      
      common /OGIJ/ gridi,gridj,mapi,nwater,nland

      real    cos_chi(LEN)
      real    sin_chi(LEN)
      common /COS_ANGLES/ cos_chi, sin_chi