Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/sigma/sigc.inc is written in an unsupported language. File is not indexed.

0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1  1995/12/12 14:36:21  mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_SIGMA_SIGC_INC
0010 #define CERNLIB_SIGMA_SIGC_INC
0011 *
0012 *
0013 * sigc.inc
0014 *
0015 *CMZ :  1.10/00 26/10/93  12.21.28  by  Carlo E. Vandoni
0016 *-- Author :
0017 C---  SIGMA MAIN COMMON
0018       COMMON/SIGC/IPOINT,ISTAPO,LSTAPO,ITAM,MISIDX,ISTRI,ITYPE,KIT,
0019      , LENGTH,NDIM,IERR,IND,IT2NAM,KLASS,NPRINT,I8LEN,I8DGT,INAME(6),
0020      , LSTACK(6,128),MSTACK(2,128),IZAD(3),IZMOD(3),SITRAK(60),KTRL,
0021      , MAINKT(6),CPLA,CPLB,CPLX,IERRNO
0022       COMPLEX CPLA,CPLB,CPLX
0023       COMMON/SICPLX/CMPCOM(32),ICMPI
0024       INTEGER SITRAK
0025 
0026 #endif