[KLOE] [Offline Doc] [TRK Files] Track Reconstruction Library stumpcom.inc

C---------------------------------------------------------------------
C STUMPCOM Commmon - Store information for DFJOIN subroutine (ARGTRK)
C--------------------------------------------------------------------

	INTEGER MAXNUMNCOP   
	PARAMETER (MAXNUMNCOP=10)	
	
	INTEGER NCOP                   !Number of Couple of tracks

	INTEGER FIRSTUMP(MAXNUMNCOP)   !First Stump
	INTEGER SECSTUMP(MAXNUMNCOP)   !Second Stump
	INTEGER FHIT(MAXNUMNCOP)       !=1 If the Couple are joined in First hit
	INTEGER LHIT(MAXNUMNCOP)       !=1 If the Couple are joined in Last hit
	REAL    QF0(MAXNUMNCOP)        !Curvature normalized
	REAL    QF1(MAXNUMNCOP)	       !Z-Distance norm.
        REAL    QF2(MAXNUMNCOP)        !XY-Distance norm.
	REAL    QF3(MAXNUMNCOP)        !Psi-angle norm.
	REAL    QF4(MAXNUMNCOP)        !cosomeg norm. 
	INTEGER BNKS(MAXNUMNCOP)       !DTFS# of merged track

	INTEGER MAXNUMTRS               
	PARAMETER (MAXNUMTRS=100)  
	
	INTEGER NT		       !MUTE IND.	
	INTEGER NTI,NTJ		       !NUMBER OF TRKS (# of DTFS)
	INTEGER NHIT(MAXNUMTRS)        !# OF HITS 
	INTEGER FIRSTHIT(MAXNUMTRS)    !=1 if the trk is connected in f.h.
	INTEGER LASTHIT(MAXNUMTRS)     !=1 if the trk is connected in l.h.
	INTEGER COMP_F(MAXNUMTRS)      !  # of companion trk in f.h.		
	INTEGER COMP_L(MAXNUMTRS)      !  # of companion trk in l.h.		

	INTEGER MXNHIT
c	PARAMETER (MXNHIT=200)
	PARAMETER (MXNHIT=250)  ! per dedx 9/6/98
	INTEGER KDFS(MAXNUMTRS,MXNHIT)
	REAL    DFSS(MAXNUMTRS,MXNHIT)
	COMMON/COPCOM/NCOP,FIRSTUMP,SECSTUMP,FHIT,LHIT,QF0,QF1,QF2,
     & QF3,QF4,BNKS,KDFS,DFSS