*
* $Id: kcgen2.inc,v 1.1.1.1 1996/03/08 15:32:59 mclareni Exp $
*
* $Log: kcgen2.inc,v $
* Revision 1.1.1.1  1996/03/08 15:32:59  mclareni
* Kuip
*
*
#ifndef CERNLIB_KUIP_KCGEN2_INC
#define CERNLIB_KUIP_KCGEN2_INC
*
*
* kcgen2.inc
*
      PARAMETER (MAXLVA=16)
      COMMON /KCVADD/
     +  LVADDR(MAXLVA)

      COMMON /KCFORM/ IOCEL,IONAME,IOPAR,IOPARV,IOVEC,IOVECN

      COMMON /KCSPR/ SPRMPT
      CHARACTER*64 SPRMPT

      COMMON /KCAPPL/ APPLIC,APEXIT
      CHARACTER*64 APPLIC
      CHARACTER*32 APEXIT

      COMMON /KCAPPM/ APPMAC,APPMEX
      CHARACTER*64 APPMAC
      CHARACTER*32 APPMEX

      COMMON /KCROOT/ CHROOT
      CHARACTER*64 CHROOT

      COMMON /KCUSER/ LAPPLI,LUNAPP

      COMMON /KCEXEL/    EXELIN
      CHARACTER*(MAXCMD) EXELIN

      COMMON /KCEXIT/ IEXADD,IUSADD,NEXADD,IUTADD,IQUADD,IBRADD
     +       ,LICALL,LICAL2,LICAL3
      LOGICAL LICALL,LICAL2,LICAL3


#endif
