**************************************************************************
*   ststuple.inc                                                         *
*                                                                        *
*  last modified on 27/11/2015  by I. Koenig                             *
*  last modified on 12/12/2023  by R. Lalik                              *
*                                                                        *
**************************************************************************

#include "hgeantmaxtrk.h"

      INTEGER NTRK, NMAXMOD
      INTEGER STSTRK, STSPART, STSMOD, STSLAY, STSCELL
      INTEGER STSSUB
      REAL STSX, STSY, STSZ, STSDR
      REAL STSPX, STSPY, STSPZ, 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),
     &       STSDR(MAXTRKSTS),
     &       STSPX(MAXTRKSTS), STSPY(MAXTRKSTS), STSPZ(MAXTRKSTS),
     &       STSTOF(MAXTRKSTS), STSLEN(MAXTRKSTS),
     &       STSE(MAXTRKSTS)