Warning, /include/kuip/kcesvr.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/03/08 15:32:58 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_KUIP_KCESVR_INC
0010 #define CERNLIB_KUIP_KCESVR_INC
0011 *
0012 *
0013 * kcesvr.inc
0014 *
0015 *-- when changing MAXSVR ajust also the size in /CKUIP/KUGSVR
0016 PARAMETER (MAXSVR =20)
0017 INTEGER NSVFIL, NSVCUR, IESADD
0018 LOGICAL SERVER
0019 COMMON /KCESVR/ NSVFIL, NSVCUR, IESADD, SERVER
0020
0021 CHARACTER*32 EDTFIL(MAXSVR)
0022 CHARACTER*32 EDTCMD(MAXSVR)
0023 COMMON /KCEFIL/ EDTFIL, EDTCMD
0024
0025
0026 #endif
