*
* $Id: evint.inc,v 1.1.1.1 1996/01/11 14:14:47 mclareni Exp $
*
* $Log: evint.inc,v $
* Revision 1.1.1.1  1996/01/11 14:14:47  mclareni
* Cojets
*
*
#ifndef CERNLIB_COJETS_EVINT_INC
#define CERNLIB_COJETS_EVINT_INC
*
*
* evint.inc
*
      PARAMETER (MAXMP=11)
      COMMON/EVINT/LEVTYP,NMULP
     1,XINGV(2,MAXMP),PXINGV(2,MAXMP),PYINGV(2,MAXMP),IFINGV(2,MAXMP)
     2,XACTV(2,MAXMP),PXACTV(2,MAXMP),PYACTV(2,MAXMP),IFACTV(2,MAXMP)
     3,LEV(MAXMP),LINV(MAXMP),LFINV(MAXMP),SHV(MAXMP),QSQV(MAXMP)
     4,THV(MAXMP),COSCMV(MAXMP),PHIV(MAXMP),PCMV(MAXMP),AMV(2,MAXMP)
     5,IFLFV(2,MAXMP),P4LABV(4,MAXMP),PFLABV(4,2,MAXMP)
      REAL XINGV,PXINGV,PYINGV,XACTV,PXACTV,PYACTV,SHV,QSQV,THV
     1,COSCMV,PHIV,PCMV,AMV,P4LABV,PFLABV

#endif
