C...Histogram information.
      COMMON/PYBINS/IHIST(4),INDX(1000),BIN(20000)
      integer IHIST,INDX
      double precision BIN