C FORTRAN program to read "gaps.dat" in CDIAC's
C NDP048 
C
      INTEGER WMO
      CHARACTER GAP*17
      OPEN (UNIT=1, FILE='gaps.dat')
   10 READ (1,100,END=99)WMO, GAP
  100 FORMAT (I5, 3X, A17)
      GO TO 10
   99 STOP
      END