Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/cojets/tabpsq.inc is written in an unsupported language. File is not indexed.

0001 *
0002 * $Id: tabpsq.inc,v 1.1.1.1 1996/01/11 14:14:56 mclareni Exp $
0003 *
0004 * $Log: tabpsq.inc,v $
0005 * Revision 1.1.1.1  1996/01/11 14:14:56  mclareni
0006 * Cojets
0007 *
0008 *
0009 #ifndef CERNLIB_COJETS_TABPSQ_INC
0010 #define CERNLIB_COJETS_TABPSQ_INC
0011 *
0012 *
0013 * tabpsq.inc
0014 *
0015       PARAMETER (MAXTAB=6)
0016       COMMON/TABPSQ/TABPSQ(MAXTAB,129),QSQMAX,ALMAX,ALMIN(7),DSTEP(7)
0017      1,NPREC,NTAB,KODTAB(7)
0018 
0019 #endif