**************************************************************************
*   ststuple.inc                                                       *
*                                                                        *
*  last modified on 27/11/2015  by I. Koenig                             *
*                                                                        *
**************************************************************************

#include "hgeantmaxtrk.h"

      INTEGER NTRK, NMAXMOD
      INTEGER STSTRK, STSPART, STSMOD, STSLAY, STSCELL
      INTEGER STSSUB
      REAL STSX, STSY, STSZ, STSPX, STSPY, STSPZ
      REAL STSTOF, STSLEN, STSE
      PARAMETER (NMAXMOD=2)
      COMMON /STSTUPLE/ NTRK, STSTRK(MAXTRKSTS),
     &       STSPART(MAXTRKSTS),
     &       STSMOD(MAXTRKSTS), STSLAY(MAXTRKSTS),
     &       STSCELL(MAXTRKSTS), STSSUB(MAXTRKSTS),
     &       STSX(MAXTRKSTS), STSY(MAXTRKSTS),
     &       STSZ(MAXTRKSTS), STSPX(MAXTRKSTS),
     &       STSPY(MAXTRKSTS), STSPZ(MAXTRKSTS),
     &       STSTOF(MAXTRKSTS), STSLEN(MAXTRKSTS),
     &       STSE(MAXTRKSTS)