Warning, /include/paw/pclin1.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.2 1996/03/01 16:50:18 cernlib
0006 * All includes had picked up a completely wrong #if defined(CERNLIB_UNIX), ie.
0007 * the real commons/declarations were missing on non-unix.
0008 *
0009 * Revision 1.1.1.1 1996/03/01 11:38:50 mclareni
0010 * Paw
0011 *
0012 *
0013 #ifndef CERNLIB_PAW_PCLIN1_INC
0014 #define CERNLIB_PAW_PCLIN1_INC
0015 *
0016 *
0017 * pclin1.inc
0018 *
0019 *CMZ : 2.02/00 13/04/93 18.00.48 by Rene Brun
0020 *-- Author :
0021 PARAMETER (KNTMAX=20,KNTMA1=KNTMAX+1,KNTMA2=KNTMAX*KNTMAX)
0022 COMMON/PCLINT/AR(KNTMA2),DEIGVA(KNTMAX),DWORK(KNTMAX)
0023 + ,SS(KNTMAX),S(KNTMAX),XX(KNTMAX),XA(KNTMAX),AM(KNTMA2)
0024 + ,EIGVEC(KNTMA2),EIGVAL(KNTMA1),XSI(KNTMAX),R(KNTMAX)
0025
0026 #endif