c     This dataset contains the International Satellite Cloud
c     Climatology Project (ISCCP) D2  dataset. (ISCCP_D2)
c     The home page for ISCCP: http://isccp.giss.nasa.gov/
c     The time length: July 1983-September 2001. 219 months

        program readme
        parameter (lons=144,lats=72,mons=219,kvar=8)
        real*4 dd(lons,lats,kvar)

c     The following eight parameters are picked up from the
c     original data:
c     (for k=1,8)
c     cld     -- Mean cloud amount (%)
c     cldpres -- Mean cloud top pressure (millibar)
c     cldtmp  -- Mean cloud top temperature (K)
c     cldthkn -- Mean cloud optical thickness (none)
c     cldwp   -- Mean cloud water path (g/m**2)
c     cldlw   -- Mean low cloud amount (%)
c     cldmdd  -- Mean middle cloud amount (%)
c     cldhgh  -- Mean high cloud amount (%)

        open(22,file='data.dat',
     &  form='unformatted',access='sequential')


        do 120 kk=1,mons
        do 160 k=1,kvar
        read(22) ((dd(i,j,k), i=1,lons),j=1,lats)
 160    continue
 120    continue

c       Data arrangement:
c       dd(1,1,k) ==> 178.75W, 88.75S
c       dd(144,72,k) ==> 178.75E, 88.75N
C       grid: 2.5x2.5 degree

        stop
        end