C**************************************************************    
C*                                                            *
C*                K I N F I T . C D E                         *
C*                                                            *    
C**************************************************************    
C---             
C--- Common block containing informations about kinematic fit
C---
C---    for the n-th kind of fit:
C---
C--- KFT_NCEQ(n)             # of kinematic constraints
C--- KFT_NDOF(n)             # of degrees of freedom
C--- KFT_NPRT(N)             # of particles entering the fit
C--- KFT_NIT(n)              # of iterations (negative if no convergence has been
C---                                            found)
C--- KFT_PROB(n)            Probability of the fit
C--- KFT_CHI2(n)            Chi2
C--- KFT_CEQ(i,n)           Values of constraint equations for fit n
C---             MEASURED values
C--- KFT_INP(1,j,n)          Momentum of j-th particle
C---         2,j,n           Theta
C---         3,j,n           Phi
C---         4,j,n           Dp        (=0 if considered unknown)
C---         5,j,n           Dtheta      "      "         "
C---         6,j,n           Dphi        "      "         "
C---         7,j,n           Mass
C---         8,j,n           Pointer to trackass
C---              INITIAL Values
C--- KFT_INI(1,j,n)          Momentum
C---         2,j,n           Theta
C---         3,j,n           Phi
C---              FITTED  values
C--- KFT_OUT(1,j,n)          Momentum of j-th particle
C---         2,j,n           Theta
C---         3,j,n           Phi
C---         4,j,n           Sigma(pp)     
C---         5,j,n           sigma(th,th)  
C---         6,j,n           sigma(ph,ph)    
C---         7,j,n           Mass
C---         8,j,n           Pointer to trackass
C---
C---                        
      INTEGER NMXKFT
      PARAMETER (NMXKFT=20)
      INTEGER KFT_NIT(NMXKFT), KFT_NCEQ(NMXKFT), KFT_NDOF(NMXKFT), 
     +        KFT_NPRT(NMXKFT)
      REAL KFT_INP(8,8,NMXKFT), KFT_OUT(8,8,NMXKFT)
      REAL KFT_INI(3,8,NMXKFT)
      REAL KFT_PROB(NMXKFT), KFT_CHI2(NMXKFT)
      REAL KFT_CEQ(10,NMXKFT)
C     
      COMMON /KINEFIT/ KFT_NIT,KFT_NDOF,KFT_NPRT
     +,                KFT_NCEQ,KFT_PROB,KFT_CHI2
     +,                KFT_CEQ,KFT_INP,KFT_INI,KFT_OUT
      
C==============================================================================