      PROGRAM DIFMAP
      EXTERNAL CDIFMAP
      INTEGER CDIFMAP
      INTEGER DUMMY
      DUMMY = CDIFMAP()
      END

      
