C...Total cross sections.
      COMMON/PYINT7/SIGT(0:6,0:6,0:5)
      double precision SIGT