FAKE-WITHOUT-INTERRUPTSLISP-INTERNALS FAKE-WITHOUT-INTERRUPTSLISP-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CDRCONSj"@ CE%F PROGN PRIMITIVES REALLY-FAKE-WITHOUT-INTERRUPTSLISP-INTERNALS REALLY-FAKE-WITHOUT-INTERRUPTSLISP-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CDRCONSj"@ CE%F PROGN PRIMITIVES  *PACKAGE*LISP-INTERNALS UNBOUNDKEYWORDNThe current package, the default for most package operations including INTERN. *ALL-PACKAGES*LISP-INTERNALS List of all packages that exist. PKG-KEYWORD-PACKAGELISP-INTERNALS UNBOUNDKEYWORDThe Keyword package. PKG-USER-PACKAGELISP-INTERNALS UNBOUNDKEYWORD"The default package for user code. PKG-GLOBAL-PACKAGELISP-INTERNALS UNBOUNDKEYWORDThe Lisp package. PKG-LISP-PACKAGELISP-INTERNALS UNBOUNDKEYWORDThe Lisp package. PKG-SYSTEM-PACKAGELISP-INTERNALS UNBOUNDKEYWORDThe System package PKG-SYSTEM-INTERNALS-PACKAGELISP-INTERNALS UNBOUNDKEYWORDThe System-internals package PKG-COMPILER-PACKAGELISP-INTERNALS UNBOUNDKEYWORDThe Compiler package. PKG-AREALISP-INTERNALS UNBOUNDKEYWORD&The area which packages are consed in. LIST-ALL-PACKAGESLISP-INTERNALS LIST-ALL-PACKAGESLISP-INTERNALS  COPY-LISTLISP-INTERNALS  %SYMBOL-VALUESYMBOLA@B(AF *ALL-PACKAGES*LISP-INTERNALS PUT-GLOBAL-DECLARATIONNC QUOTE PRIMITIVES PACKAGELISP-INTERNALS QUOTE PRIMITIVES DEFSTRUCT-DESCRIPTORLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PKG-MAKE-PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS HASH-TABLE-CODESLISP-INTERNALS HASH-TABLE-SYMBOLSLISP-INTERNALS NUMBER-OF-SLOTSLISP-INTERNALS  REFNAME-ALISTLISP-INTERNALS  DOCUMENTATIONKEYWORDkAlist of local nicknames, available in this package, for other packages. Each element is (STRING . PACKAGE) NAMELISP-INTERNALS  DOCUMENTATIONKEYWORD)Official name for this package (a string)  NICKNAMESLISP-INTERNALS  DOCUMENTATIONKEYWORD,List of nicknames for this package (strings) USE-LISTLISP-INTERNALS  DOCUMENTATIONKEYWORD1List of packages this one has done USE-PACKAGE to  USED-BY-LISTLISP-INTERNALS  DOCUMENTATIONKEYWORD;List of packages that have done USE-PACKAGE to this package SHADOWING-SYMBOLSLISP-INTERNALS  DOCUMENTATIONKEYWORD3List of symbols explicitly shadowed in this package NUMBER-OF-SYMBOLSLISP-INTERNALS  DOCUMENTATIONKEYWORD)Current number of symbols in this package MAX-NUMBER-OF-SYMBOLSLISP-INTERNALS  DOCUMENTATIONKEYWORDHThreshold for rehashing. This is the specified size of the package array PLISTLISP-INTERNALS  DOCUMENTATIONKEYWORD8Random properties asscoiated with this package. Properties used include: SI:READ-LOCK (non-NIL means that READ will not attempt to intern new symbols in this package) :SOURCE-FILE-NAME NEW-SYMBOL-FUNCTIONLISP-INTERNALS  DOCUMENTATIONKEYWORDZFunction called to store a new symbol in this package. NIL means PKG-INTERN-STORE is used. SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-NEW-SYMBOL-FUNCTIONLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5713NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5713NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-NEW-SYMBOL-FUNCTIONLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-NEW-SYMBOL-FUNCTIONLISP-INTERNALS PKG-NEW-SYMBOL-FUNCTIONLISP-INTERNALS  NAMED-LAMBDANC PKG-NEW-SYMBOL-FUNCTIONLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-NEW-SYMBOL-FUNCTIONLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSE @!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES  PKG-PLISTLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5712NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5712NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES  PKG-PLISTLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES  PKG-PLISTLISP-INTERNALS  PKG-PLISTLISP-INTERNALS  NAMED-LAMBDANC  PKG-PLISTLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  PKG-PLISTLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSE @!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-MAX-NUMBER-OF-SYMBOLSLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5711NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5711NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-MAX-NUMBER-OF-SYMBOLSLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-MAX-NUMBER-OF-SYMBOLSLISP-INTERNALS PKG-MAX-NUMBER-OF-SYMBOLSLISP-INTERNALS  NAMED-LAMBDANC PKG-MAX-NUMBER-OF-SYMBOLSLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-MAX-NUMBER-OF-SYMBOLSLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSE @!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-NUMBER-OF-SYMBOLSLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5710NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5710NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-NUMBER-OF-SYMBOLSLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-NUMBER-OF-SYMBOLSLISP-INTERNALS PKG-NUMBER-OF-SYMBOLSLISP-INTERNALS  NAMED-LAMBDANC PKG-NUMBER-OF-SYMBOLSLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-NUMBER-OF-SYMBOLSLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSE~@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-SHADOWING-SYMBOLSLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5709NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5709NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-SHADOWING-SYMBOLSLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-SHADOWING-SYMBOLSLISP-INTERNALS PKG-SHADOWING-SYMBOLSLISP-INTERNALS  NAMED-LAMBDANC PKG-SHADOWING-SYMBOLSLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-SHADOWING-SYMBOLSLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSE|@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-USED-BY-LISTLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5708NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5708NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-USED-BY-LISTLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-USED-BY-LISTLISP-INTERNALS PKG-USED-BY-LISTLISP-INTERNALS  NAMED-LAMBDANC PKG-USED-BY-LISTLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-USED-BY-LISTLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSEz@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES  PKG-USE-LISTLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5707NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5707NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES  PKG-USE-LISTLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES  PKG-USE-LISTLISP-INTERNALS  PKG-USE-LISTLISP-INTERNALS  NAMED-LAMBDANC  PKG-USE-LISTLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  PKG-USE-LISTLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSEx@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES  PKG-NICKNAMESLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5706NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5706NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES  PKG-NICKNAMESLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES  PKG-NICKNAMESLISP-INTERNALS  PKG-NICKNAMESLISP-INTERNALS  NAMED-LAMBDANC  PKG-NICKNAMESLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  PKG-NICKNAMESLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSEv@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-NAMELISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5705NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5705NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-NAMELISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-NAMELISP-INTERNALS PKG-NAMELISP-INTERNALS  NAMED-LAMBDANC PKG-NAMELISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-NAMELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSEt@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-REFNAME-ALISTLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5704NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5704NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-REFNAME-ALISTLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-REFNAME-ALISTLISP-INTERNALS PKG-REFNAME-ALISTLISP-INTERNALS  NAMED-LAMBDANC PKG-REFNAME-ALISTLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-REFNAME-ALISTLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSEr@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-NUMBER-OF-SLOTSLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5703NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5703NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-NUMBER-OF-SLOTSLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-NUMBER-OF-SLOTSLISP-INTERNALS PKG-NUMBER-OF-SLOTSLISP-INTERNALS  NAMED-LAMBDANC PKG-NUMBER-OF-SLOTSLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-NUMBER-OF-SLOTSLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSEp@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-HASH-TABLE-SYMBOLSLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5702NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5702NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-HASH-TABLE-SYMBOLSLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-HASH-TABLE-SYMBOLSLISP-INTERNALS PKG-HASH-TABLE-SYMBOLSLISP-INTERNALS  NAMED-LAMBDANC PKG-HASH-TABLE-SYMBOLSLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-HASH-TABLE-SYMBOLSLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSEf@!F PACKAGELISP-INTERNALS SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES PKG-HASH-TABLE-CODESLISP-INTERNALS LAMBDA PRIMITIVES PACKAGELISP-INTERNALS LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF SINGLE-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF LISTLISP-INTERNALS PACKAGELISP-INTERNALS LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES DO5701NIL STOREVARSETF PACKAGELISP-INTERNALS NTHLISP-INTERNALS TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTE PRIMITIVES  STRUCTURE-SETLISP-INTERNALS QUOTE PRIMITIVES QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO5701NIL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES PKG-HASH-TABLE-CODESLISP-INTERNALS TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES PKG-HASH-TABLE-CODESLISP-INTERNALS PKG-HASH-TABLE-CODESLISP-INTERNALS  NAMED-LAMBDANC PKG-HASH-TABLE-CODESLISP-INTERNALS PACKAGELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-HASH-TABLE-CODESLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSEb@!F PACKAGELISP-INTERNALS PUT-GLOBAL-DECLARATIONNC QUOTE PRIMITIVES PACKAGELISP-INTERNALS QUOTE PRIMITIVES  TYPE-EXPANDERLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES QUOTE PRIMITIVES  SATISFIESLISP-INTERNALS  PACKAGE-PLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS  PACKAGE-PLISP-INTERNALS  NAMED-LAMBDANC  PACKAGE-PLISP-INTERNALS THINGLISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS THINGLISP-INTERNALS QUOTE PRIMITIVES PACKAGELISP-INTERNALS  PACKAGE-PLISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS E@AF PACKAGELISP-INTERNALS  COPY-PACKAGELISP-INTERNALS  COPY-PACKAGELISP-INTERNALS COPY-STRUCTURE-OBJECTLISP-INTERNALS!G PKG-MAKE-PACKAGELISP-INTERNALS PKG-MAKE-PACKAGELISP-INTERNALS TVOQJLEG@B;=6813,.')"$ STORE-CONTENTS-OFFSETCONS STORE-CONTENTS-OFFSETCONS| STORE-CONTENTS-OFFSETCONSy STORE-CONTENTS-OFFSETCONSv STORE-CONTENTS-OFFSETCONSs STORE-CONTENTS-OFFSETCONSp STORE-CONTENTS-OFFSETCONSm STORE-CONTENTS-OFFSETCONSj STORE-CONTENTS-OFFSETCONSg STORE-CONTENTS-OFFSETCONSd STORE-CONTENTS-OFFSETCONSa STORE-CONTENTS-OFFSETCONS^ STORE-CONTENTS-OFFSETCONS[ STORE-CONTENTS-OFFSETCONSW MAKE-STRUCTURELISP-INTERNALS MVBIND-NLISP-INTERNALS GET-KEYWORD-ARG-VALUESLISP-INTERNALS  CONS-RESTLISP-INTERNALS@h@@n@(j@<@<A@kB:A @AB`@9@b@7@d@5@f@3@h@1@j@/@l@-@n@+@p@)@r@'@t@%@v@#@B@@lB@A @Aj:@B@@dB@A @Aj8@B@@\B@A $@Aj6@B@@TB@A )@Aj4@B@@LB@A .@Aj2@B@@DB@A 3@Aj0@B@@  XR-BQ-LISTSYSTEM-INTERNALS;  XR-BQ-LISTSYSTEM-INTERNALS:  XR-BQ-LISTSYSTEM-INTERNALS7  XR-BQ-LISTSYSTEM-INTERNALS6  XR-BQ-LISTSYSTEM-INTERNALS5  XR-BQ-LISTSYSTEM-INTERNALS3  XR-BQ-LISTSYSTEM-INTERNALS2  XR-BQ-LISTSYSTEM-INTERNALS0  XR-BQ-LISTSYSTEM-INTERNALS.  XR-BQ-LISTSYSTEM-INTERNALS,  XR-BQ-LISTSYSTEM-INTERNALS+  XR-BQ-LISTSYSTEM-INTERNALS)  XR-BQ-LISTSYSTEM-INTERNALS(  XR-BQ-LIST*SYSTEM-INTERNALS%  XR-BQ-LISTSYSTEM-INTERNALS$  XR-BQ-LISTSYSTEM-INTERNALS"  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS CDRCONS CDRCONS CARCONS CDRCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CARCONS CDRCONS MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS LENGTHARRAYYj"@ C@g0@A@A Ab@jB C(@B(A B C(@B(@B(@ B C(@B(@B(@B(A B C(@ BA C@ CA C@ CA C@ CA5B($B(A$B(@%B(A*B+B&A@@BAB(A*B(2BA.B(.@`B(A+B()BA)B(,BAB(A.@,B(@BA(@/B(@AB(A(@/B(@@B(@&B@AB(A(@/B(6B(AB(@0B@AB@@B(@iB@AFW DO* PRIMITIVESU BLOCK PRIMITIVESS DO* PRIMITIVESQ WHEN PRIMITIVESO LET PRIMITIVESJ PKG-SLOT-SYMBOLLISP-INTERNALSH AND PRIMITIVESF OR PRIMITIVESD PKG-CODE-EXTERNAL-PLISP-INTERNALSA  PKG-SLOT-CODELISP-INTERNALS? PKG-CODE-VALID-PLISP-INTERNALS<  PKG-SLOT-CODELISP-INTERNALS8 = PRIMITIVES4 PKG-NUMBER-OF-SLOTSLISP-INTERNALS1 CARCONS- 1+ PRIMITIVES* NULL PRIMITIVES' T PRIMITIVES# CDRCONS! CONSCONS  PKG-USE-LISTLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS DO-LOCAL-SYMBOLSLISP-INTERNALS DO-LOCAL-SYMBOLSLISP-INTERNALSG;:F,E  XR-BQ-LISTSYSTEM-INTERNALSC  XR-BQ-LISTSYSTEM-INTERNALSA  XR-BQ-LIST*SYSTEM-INTERNALS?  XR-BQ-LISTSYSTEM-INTERNALS>  XR-BQ-LISTSYSTEM-INTERNALS=  XR-BQ-LISTSYSTEM-INTERNALS6  XR-BQ-LISTSYSTEM-INTERNALS5  XR-BQ-LISTSYSTEM-INTERNALS2  XR-BQ-LISTSYSTEM-INTERNALS0  XR-BQ-LISTSYSTEM-INTERNALS-  XR-BQ-LISTSYSTEM-INTERNALS,  XR-BQ-LISTSYSTEM-INTERNALS)  XR-BQ-LISTSYSTEM-INTERNALS(  XR-BQ-LISTSYSTEM-INTERNALS'  XR-BQ-LISTSYSTEM-INTERNALS%  XR-BQ-LISTSYSTEM-INTERNALS$  XR-BQ-LISTSYSTEM-INTERNALS"  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS CDRCONS CDRCONS CARCONS CDRCONS CDRCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CARCONS CDRCONS MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS LENGTHARRAYHj"@ C@g0@A@A Ab@jB C(@B(A B C(@B(@B(@ B C(@B(@B(@B(A B C(@B(@B(@B(@B(@ B C(A B@ CA C@ CA(B((@`B(A1B(%BA%B(&BAB(A(@&B(.BA$@)B(@AB(A$@)B(2B(@A,@@AF@AA$@)B-BAB(@*B@AB@AF,@;@A F IGNORE PRIMITIVESD DO* PRIMITIVESB WHEN PRIMITIVES@ LET PRIMITIVES;  PKG-SLOT-CODELISP-INTERNALS3 PKG-SLOT-SYMBOLLISP-INTERNALS1 PKG-CODE-VALID-PLISP-INTERNALS.  PKG-SLOT-CODELISP-INTERNALS* = PRIMITIVES& PKG-NUMBER-OF-SLOTSLISP-INTERNALS#  FIND-PACKAGELISP-INTERNALS 1+ PRIMITIVES DO-EXTERNAL-SYMBOLSLISP-INTERNALS DO-EXTERNAL-SYMBOLSLISP-INTERNALS3P  ONCE-ONLYLISP-INTERNALSO  XR-BQ-LISTSYSTEM-INTERNALSM  XR-BQ-LISTSYSTEM-INTERNALSK  XR-BQ-LISTSYSTEM-INTERNALSI  XR-BQ-LISTSYSTEM-INTERNALSG  XR-BQ-LIST*SYSTEM-INTERNALSE  XR-BQ-LISTSYSTEM-INTERNALSD  XR-BQ-LISTSYSTEM-INTERNALSC  XR-BQ-LISTSYSTEM-INTERNALS@  XR-BQ-LISTSYSTEM-INTERNALS>  XR-BQ-LISTSYSTEM-INTERNALS<  XR-BQ-LISTSYSTEM-INTERNALS9  XR-BQ-LISTSYSTEM-INTERNALS7  XR-BQ-LISTSYSTEM-INTERNALS4  XR-BQ-LISTSYSTEM-INTERNALS3  XR-BQ-LISTSYSTEM-INTERNALS0  XR-BQ-LISTSYSTEM-INTERNALS/  XR-BQ-LISTSYSTEM-INTERNALS.  XR-BQ-LISTSYSTEM-INTERNALS,  XR-BQ-LISTSYSTEM-INTERNALS+  XR-BQ-LISTSYSTEM-INTERNALS)  XR-BQ-LISTSYSTEM-INTERNALS'  XR-BQ-LISTSYSTEM-INTERNALS%  XR-BQ-LISTSYSTEM-INTERNALS$  XR-BQ-LISTSYSTEM-INTERNALS"  XR-BQ-LISTSYSTEM-INTERNALS!  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS PKGLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS CDRCONS CDRCONS CARCONS CDRCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CARCONS CDRCONS MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS LENGTHARRAYQj"@ C@g0@A@A Ab@jB C(@B(A B C(@B(@B(@ B C(@B(@B(@B(A B C(@ BA C@ CA C@ C@C(A0B(@1B(A&B&B(AB(A&B(.BA*B(*@`B(A'B(%BA%B((BAB(A*@(B(@BA$@+B(@AB(A$@+B(@@B@AB(A$@+B(2B(AB(@,B@AB@@B(@iB@ABAFN DO PRIMITIVESL BLOCK PRIMITIVESJ DO* PRIMITIVESH WHEN PRIMITIVESF LET PRIMITIVESA PKG-SLOT-SYMBOLLISP-INTERNALS? AND PRIMITIVES= PKG-CODE-EXTERNAL-PLISP-INTERNALS:  PKG-SLOT-CODELISP-INTERNALS8 PKG-CODE-VALID-PLISP-INTERNALS5  PKG-SLOT-CODELISP-INTERNALS1 = PRIMITIVES- PKG-NUMBER-OF-SLOTSLISP-INTERNALS* CARCONS& 1+ PRIMITIVES# NULL PRIMITIVES CDRCONS CONSCONS  PKG-USE-LISTLISP-INTERNALS DO-ALL-SYMBOLSLISP-INTERNALS DO-ALL-SYMBOLSLISP-INTERNALS'@  XR-BQ-LISTSYSTEM-INTERNALS>  XR-BQ-LISTSYSTEM-INTERNALS<  XR-BQ-LISTSYSTEM-INTERNALS:  XR-BQ-LISTSYSTEM-INTERNALS8  XR-BQ-LIST*SYSTEM-INTERNALS6  XR-BQ-LISTSYSTEM-INTERNALS5  XR-BQ-LISTSYSTEM-INTERNALS4  XR-BQ-LISTSYSTEM-INTERNALS1  XR-BQ-LISTSYSTEM-INTERNALS/  XR-BQ-LISTSYSTEM-INTERNALS,  XR-BQ-LISTSYSTEM-INTERNALS+  XR-BQ-LISTSYSTEM-INTERNALS(  XR-BQ-LISTSYSTEM-INTERNALS'  XR-BQ-LISTSYSTEM-INTERNALS&  XR-BQ-LISTSYSTEM-INTERNALS$  XR-BQ-LISTSYSTEM-INTERNALS#  XR-BQ-LISTSYSTEM-INTERNALS!  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS CDRCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CARCONS CDRCONS MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS LENGTHARRAYAj"@ C@g0@A@A Ab@jB C(@B(@ B C(@B(@B(A B C(@ BA C@ CA C@ CA&B(&@@@B(AB(A&B(.BA*B(*@`B(A'B(%BA%B((BAB(A*@(B(@BA$@+B(@AB(A$@+B(0B(AB(@,B@AB@@B(@iB@AF? DO PRIMITIVES= BLOCK PRIMITIVES; DO* PRIMITIVES9 WHEN PRIMITIVES7 LET PRIMITIVES2 PKG-SLOT-SYMBOLLISP-INTERNALS0 PKG-CODE-VALID-PLISP-INTERNALS-  PKG-SLOT-CODELISP-INTERNALS) = PRIMITIVES% PKG-NUMBER-OF-SLOTSLISP-INTERNALS" CARCONS 1+ PRIMITIVES NULL PRIMITIVES *ALL-PACKAGES*LISP-INTERNALS CDRCONS  PACKAGE-NAMELISP-INTERNALS  PACKAGE-NAMELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  A@@BD@@A @A CEt@!F PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGE-NICKNAMESLISP-INTERNALS PACKAGE-NICKNAMESLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  A@@BD@@A @A CEv@!F PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGE-USE-LISTLISP-INTERNALS PACKAGE-USE-LISTLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  A@@BD@@A @A CEx@!F PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGE-USED-BY-LISTLISP-INTERNALS PACKAGE-USED-BY-LISTLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  A@@BD@@A @A CEz@!F PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGE-SHADOWING-SYMBOLSLISP-INTERNALS PACKAGE-SHADOWING-SYMBOLSLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  A@@BD@@A @A CE|@!F PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS DO-LOCAL-EXTERNAL-SYMBOLSLISP-INTERNALS DO-LOCAL-EXTERNAL-SYMBOLSLISP-INTERNALS'>  XR-BQ-LISTSYSTEM-INTERNALS<  XR-BQ-LISTSYSTEM-INTERNALS:  XR-BQ-LIST*SYSTEM-INTERNALS8  XR-BQ-LISTSYSTEM-INTERNALS7  XR-BQ-LISTSYSTEM-INTERNALS6  XR-BQ-LISTSYSTEM-INTERNALS3  XR-BQ-LISTSYSTEM-INTERNALS1  XR-BQ-LISTSYSTEM-INTERNALS/  XR-BQ-LISTSYSTEM-INTERNALS,  XR-BQ-LISTSYSTEM-INTERNALS*  XR-BQ-LISTSYSTEM-INTERNALS'  XR-BQ-LISTSYSTEM-INTERNALS&  XR-BQ-LISTSYSTEM-INTERNALS#  XR-BQ-LISTSYSTEM-INTERNALS"  XR-BQ-LISTSYSTEM-INTERNALS!  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS GENSYMLISP-INTERNALS CDRCONS CDRCONS CARCONS CDRCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CDRCONS CARCONS CARCONS CDRCONS MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS LENGTHARRAY?j"@ C@g0@A@A Ab@jB C(@B(@ B C(@B(@B(A B C(@B(@B(@B(@ B C(A B@ CA C@ CA(B((@`B(A/B(%BA%B(&BAB(A(@&B(,BA$@)B(@AB(A$@)B(@@B@AB(A$@)B(0B(AB(@*B@AB@AF = DO* PRIMITIVES; WHEN PRIMITIVES9 LET PRIMITIVES4 PKG-SLOT-SYMBOLLISP-INTERNALS2 AND PRIMITIVES0 PKG-CODE-EXTERNAL-PLISP-INTERNALS-  PKG-SLOT-CODELISP-INTERNALS+ PKG-CODE-VALID-PLISP-INTERNALS(  PKG-SLOT-CODELISP-INTERNALS$ = PRIMITIVES PKG-NUMBER-OF-SLOTSLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS 1+ PRIMITIVES PKG-SHORTEST-NAMELISP-INTERNALS PKG-SHORTEST-NAMELISP-INTERNALS.+-&--/  - CDRCONS(  STRING-LENGTHLISP-INTERNALS'  STRING-LENGTHLISP-INTERNALS# ASSOCLISP-INTERNALS %SYMBOL-FUNCTIONSYMBOL  STRUCTURE-REFLISP-INTERNALS EQUALLISP-INTERNALS CARCONS  STRUCTURE-REFLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL0AAB@A  A@@BD@@A  @A CAt@! BAv@ Bj&@(@@A/@A) C&A@@BD@@A -@A@AAr@#BAAB&@@@BD@@A -@A& C*C@D0@A-@A&*@( C@A *D" TESTKEYWORD EQUALLISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS  FIND-PACKAGELISP-INTERNALS  FIND-PACKAGELISP-INTERNALSg\aO^`[bQhJLF6E<DA?D:E4F0F%, &,&, G f  MEMBER-EQUALLISP-INTERNALSe  STRUCTURE-REFLISP-INTERNALSb STRINGLISP-INTERNALS` CDRCONSX EQUALLISP-INTERNALSW STRINGLISP-INTERNALSV  STRUCTURE-REFLISP-INTERNALSR CARCONSM  %SYMBOL-VALUESYMBOLK SYMBOLPVINCULUMG STRINGPARRAYC  MAKE-PACKAGELISP-INTERNALSA CADDRCONS< CADDRCONS; CADRCONS7 CADRCONS6 CADRCONS1 CADRCONS- CADRCONS, CARCONS+ APPLY-INTERNALLISP-INTERNALS' %SYMBOL-FUNCTIONSYMBOL"  FIND-PACKAGELISP-INTERNALS! CADRCONS SYMBOLPVINCULUM CADRCONS CADRCONS CDDDRCONS CDDRCONS  FIND-PACKAGELISP-INTERNALS CARCONS TYPEP-STRUCTURELISP-INTERNALSi A@@BD@@A@A DFsb @A G@A C(A B*@@A@A*D CD@@A,@A CD@@A &@A CFsc @A,@A C(@BD@@A&@A C(@BD@@A ,@AA@BD@h@@f@ @j@AG C( CD@@AF@A CFsc @AF@A@ C CFsc @A E@A C CD@@AD@A @ C@AFAj @ <j@ 6j@ C(@@A L@A CAA Bj$@&@@Ah@A& C@AAt@$B!CAB"@@Ab@A"@@A`@A$D' CO@A C(Av@%BAB\@A jDc PACKAGELISP-INTERNALST PACKAGELISP-INTERNALSL *ALL-PACKAGES*LISP-INTERNALSB USEKEYWORD@ SIZEKEYWORD5 SUPERKEYWORD&  MAKE-PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS 13%' ,   2  %MAKE-PACKAGELISP-INTERNALS.  MEMBER-EQLLISP-INTERNALS+ PKG-FIND-PACKAGELISP-INTERNALS) ERRORLISP-INTERNALS&  %MAKE-PACKAGELISP-INTERNALS" Y-OR-N-PLISP-INTERNALS ERRORLISP-INTERNALS  MEMBER-EQLLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS4j"@  A@@BD@@A @A @@A @A D C$@@A@A$DB@@ B@A @AjD"A@@BD@@A@AE!FB@@ B@A ,@AA@BD@@A'@A!GA@ B E#F"A@@BD@@A3@A!GjD - T PRIMITIVES(1Please load package ~A declaration then continue.'Continue!$~&Package ~A not found. Create it?  ASKKEYWORDNo package named ~a found ERRORKEYWORD FINDKEYWORD PACKAGELISP-INTERNALS  MAKE-PACKAGELISP-INTERNALS  MAKE-PACKAGELISP-INTERNALS   %MAKE-PACKAGELISP-INTERNALS MVBIND-3LISP-INTERNALS GET-KEYWORD-ARG-VALUESLISP-INTERNALS  CONS-RESTLISP-INTERNALS~@h@@n@(j@(@(A@k B' C`@%@b@#@B@@B@A @Aj&@B@@B@A @A$@B@@ B@A @A"@ E@&@@$@ @# F SIZEKEYWORD USEKEYWORD  NICKNAMESKEYWORD KEYWORD-GARBAGELISP-INTERNALSLISP KEYWORD-GARBAGELISP-INTERNALS KEYWORD-GARBAGELISP-INTERNALS  NICKNAMESKEYWORD USEKEYWORD SIZEKEYWORD  %MAKE-PACKAGELISP-INTERNALS  %MAKE-PACKAGELISP-INTERNALS Y]FCE8@F:G2'.1)3"% [  USE-PACKAGELISP-INTERNALSV SETSYMBOLT CONSCONSS  %SYMBOL-VALUESYMBOLQ PKG-MAKE-PACKAGELISP-INTERNALSD CDRCONSB RPLACDCONS= CONSCONS< STRINGLISP-INTERNALS; CARCONS5  MAKE-VECTORARRAY4  MAKE-VECTORARRAY3 STRINGLISP-INTERNALS1 CDRCONS0 ERRORLISP-INTERNALS+  FIND-PACKAGELISP-INTERNALS* CARCONS$ ERRORLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS  PKG-GOOD-SIZELISP-INTERNALS LISTLISP-INTERNALS LISTPVINCULUM MVBIND-3LISP-INTERNALS GET-KEYWORD-ARG-VALUESLISP-INTERNALS  CONS-RESTLISP-INTERNALS~^@h@@n@(j@6@6A@j B4 C`@3@b@1@B@@TB@A @Aj4@B@@LB@A @Aj2@B@@DB@A @A0@4CD@@A @A4 C0 Cj*@ CD@@A%@AA B4.@j(@.@@A3@A. C(CD@@A1@AA(B/ C'@A !C(-C-Cj@j&@4@@AG@A4C(@B(j B&@@AF@A&A$B$&@4 C8@A C$@ @@@ @@`@@,@@@A BAAB(+BA"B2@@A]@A2A*B@A*DU *ALL-PACKAGES*LISP-INTERNALSR *ALL-PACKAGES*LISP-INTERNALSO MAX-NUMBER-OF-SYMBOLSKEYWORDM NUMBER-OF-SLOTSKEYWORDK NUMBER-OF-SYMBOLSKEYWORDJ  NICKNAMESKEYWORDI HASH-TABLE-SYMBOLSKEYWORDH HASH-TABLE-CODESKEYWORDG NAMEKEYWORD/"A package named ~A already exists.#"A package named ~A already exists. KEYWORD-GARBAGELISP-INTERNALS KEYWORD-GARBAGELISP-INTERNALS KEYWORD-GARBAGELISP-INTERNALS  NICKNAMESKEYWORD USEKEYWORD SIZEKEYWORD PKG-GOOD-SIZESLISP-INTERNALSCISaq#3A_o{ %3=Qg1Ig #Ae%Oo;_mGq?Y=k']QS_a5wAK k G   Y ? 7 % s c O 7 5113?ASCcACIQ[c 5m/c "#%C&(O* ,.U0 2I47A9;>@WCFMHKKAN RUX[^a ehlo  PKG-GOOD-SIZELISP-INTERNALS  PKG-GOOD-SIZELISP-INTERNALS 97919+9%9 99  4 REMNEW-MATH. REMNEW-MATH( REMNEW-MATH" REMNEW-MATH REMNEW-MATH REMNEW-MATH REMNEW-MATH CDRCONS CARCONS  %SYMBOL-VALUESYMBOL TRUNCATENEW-MATH MULTIPLY-GENERICNEW-MATH: AtB(s BA@ Bj&@(@@A@A) C@*0@A@A&@@A@A&D( C@A 0)*$x*AfB D"x"ApBEp@A9@A"AtBEp@A9@A"AxBEp@A9@A"A @@BEp@A9@A"A @@BEp@A9@A"A@@BEp@A9@A"Dp ""x  PKG-GOOD-SIZESLISP-INTERNALS  PKG-REHASHLISP-INTERNALS  PKG-REHASHLISP-INTERNALS* *+:  STRUCTURE-SETLISP-INTERNALS6  STRUCTURE-SETLISP-INTERNALS2  STRUCTURE-SETLISP-INTERNALS.  STRUCTURE-SETLISP-INTERNALS) REHASH-INTERN-STORELISP-INTERNALS# %SXHASH-STRINGLISP-INTERNALS STRINGLISP-INTERNALS SVREFARRAY  STRUCTURE-REFLISP-INTERNALS SVREFARRAY  STRUCTURE-REFLISP-INTERNALS NUMBERPVINCULUM SVREFARRAY  STRUCTURE-REFLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS  MAKE-VECTORARRAY  MAKE-VECTORARRAY  PKG-GOOD-SIZELISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS;A @ BE"x "C9 C8 C`2@ C0.@Ap@0 BpK,0@A+@AAb@.B(3 B*CD@@A*@AAf@.B(2 BAb@.B(2B) C&A@@B a$@$A(@8@6@4B 0I22x Ab@ @6BAf@ @4BAp@ @8BE @ @#F 7 PACKAGELISP-INTERNALS3 PACKAGELISP-INTERNALS/ PACKAGELISP-INTERNALS+ PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS REHASH-INTERN-STORELISP-INTERNALS REHASH-INTERN-STORELISP-INTERNALS   SVSETARRAY SVSETARRAY REMNEW-MATH NUMBERPVINCULUM SVREFARRAY REMNEW-MATHj.@ A$ B&A- B*CD@@A @A01,y$ B@A ,.@&A,@ B(E,@#F RENAME-PACKAGELISP-INTERNALS RENAME-PACKAGELISP-INTERNALSF9+5828-:&)#) D E LISTLISP-INTERNALSD STRINGLISP-INTERNALSA  STRUCTURE-SETLISP-INTERNALS=  STRUCTURE-SETLISP-INTERNALS8 CDRCONS7 ERRORLISP-INTERNALS/  FIND-PACKAGELISP-INTERNALS. CARCONS( ERRORLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS STRINGLISP-INTERNALS CDRCONS RPLACDCONS CONSCONS STRINGLISP-INTERNALS CARCONS LISTPVINCULUM PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALSGj$@  A@@BD@@A  @A AjB$CD@@AD@Aj0@j.@$@@A@A$C(@B(j B.@@A@A.A,B,.@$ C@A ,0@ 0$@#C# C*@@A)@A@, @A)@AA"B$2@j(@2@@A:@A2 C) C&@@A8@A@ @A8@AA(B3 C+@A At@ @"BAv@ @$B@A D$C(@ B@A > PACKAGELISP-INTERNALS: PACKAGELISP-INTERNALS6"A package named ~A already exists.'"A package named ~A already exists. PACKAGELISP-INTERNALS  KILL-PACKAGELISP-INTERNALS  KILL-PACKAGELISP-INTERNALS;,:< A SETSYMBOL?  DELETE-EQLISP-INTERNALS>  %SYMBOL-VALUESYMBOL: CDRCONS9  STRUCTURE-SETLISP-INTERNALS5 DELETELISP-INTERNALS2 %SYMBOL-FUNCTIONSYMBOL0  STRUCTURE-REFLISP-INTERNALS) RASSOCLISP-INTERNALS& %SYMBOL-FUNCTIONSYMBOL$  STRUCTURE-REFLISP-INTERNALS CARCONS  %SYMBOL-VALUESYMBOL CDRCONS UNUSE-PACKAGE-1LISP-INTERNALS CARCONS  STRUCTURE-REFLISP-INTERNALS CDRCONS UNUSE-PACKAGE-1LISP-INTERNALS CARCONS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALSB AjBAx@! Bj0@2@@A@A2 C0A B3 C@A Az@! Bj,@.@@A@A. C A,B/ C@A AA Bj(@*@@A<@A* C@AAr@)BAAB @@@ B$@@A:@A(&AAr@'BAAB$@@ABAr@(@"B+ C@A @AAAB!B(@AF @ *ALL-PACKAGES*LISP-INTERNALS= *ALL-PACKAGES*LISP-INTERNALS6 PACKAGELISP-INTERNALS4 TESTKEYWORD1 EQUALLISP-INTERNALS. PACKAGELISP-INTERNALS( TESTKEYWORD% EQ PRIMITIVES" PACKAGELISP-INTERNALS *ALL-PACKAGES*LISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS EXPORT PRIMITIVES EXPORT PRIMITIVES%n@hMeALfHfCi>m:&+;;$u o9en]nU^Q^M^If@n;p);5 #Q8c|L=1'; ;m LISTLISP-INTERNALSg  INTERN-LOCALLISP-INTERNALSd CDRCONSc SVSETARRAY^ SVREFARRAY]  STRUCTURE-REFLISP-INTERNALSZ  STRUCTURE-REFLISP-INTERNALSV MVBIND-2LISP-INTERNALSU PKG-INTERN-INTERNALLISP-INTERNALSS %SXHASH-STRINGLISP-INTERNALSP  SYMBOL-NAMESYMBOLO  SYMBOL-NAMESYMBOLN IMPORT PRIMITIVESI SYMBOL-PACKAGESYMBOLE SYMBOLPVINCULUMD CARCONS; LISTPVINCULUM6 CDRCONS2 REMOBLISP-INTERNALS1 CDRCONS0 CARCONS/ CARCONS$ ERRORLISP-INTERNALS ERRORLISP-INTERNALS  CDRCONS CONSCONS LIST*LISP-INTERNALS} CADRCONSy CARCONSn CDRCONSj CONSCONSb CONSCONSZ CONSCONSR  SYMBOL-PLISTSYMBOLN FBOUNDPSYMBOLJ BOUNDPSYMBOLE MVBIND-2LISP-INTERNALSD INTERN-LOCAL-SOFTLISP-INTERNALSC CDRCONSA CARCONS= CDRCONS< CARCONS7 CDDRCONS- CARCONS LISTLISP-INTERNALS CDRCONS CDRCONSy CONSCONSo LIST*LISP-INTERNALSZ CHECK-FOR-NAME-CONFLICTLISP-INTERNALSP  SYMBOL-NAMESYMBOLI SYMBOLPVINCULUMA CARCONS. LISTPVINCULUM* CARCONS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOLo @@ aC`@AAB@A @@ aC`@ j$@ @@ aC`@"A@@BaCP@@^@aCb@@AT@@A @A"AkB$@@A ;AAPaCP@j^@Az@"BaCP@@^@B@` aCP@j^@aCb@@AT@@A@AaCbA@ATBB@` aCP@@^@ CD@@A@AB@` aCP@ ^@B@` aCP@j^@@@`aCb@@AT@@A@A@A`aCb@@ATBB@` aCP@@^@@A@A`aCb@@ATBD@@A@A@A`aCb@@ATB@@`aCb@@AT@j@@@`aCb@@AT@"BB@` aCP@@^@@@`aCb@@AT@@A|@A@A`aCb@@AT@@@`aCb@@AT@@@`aCb@@ATB B@` aCP@@^@ @A`aCb@@AT@PaCb@@ATBPaCP@@^@@A`aCb@@ATBB@` aCP@@^@8@A @@`aCb@@AQT@ aCbA@ATBaCP@@^@#@A CB@` aCP@5@^@ PaCb@@AT@@A;AA B@` aCP@j^@ B@` aCP@j^@PaCb@@A@@`aCZ@ B@` aCP@j^@@@`aCb@@AT@@AAA@A`aCb@@ATB B@` aCP@@^@ B@` aCP@j^@ @A`aCb@@AUBj<@>@@Ap@A>C=C@l"@An@A<Cj6@=C(8B8C`@7@6@@Af@A8CD@@A ^@A8CD@@A ^@A8CD@@A ^@A<A @@`aCb@@ATB B@` aCP@n@^@ <A @@`aCb@@ATB B@` aCP@n@^@ <A @@`aCb@@ATB B@` aCP@@^@?C9@A @@`aCb@@AT@@A AA @A`aCb@@ATB( @A`aCb@@AUB @@`aCb@@AT B4A @@`aCb@@ATB B@` aCP@@^@@A`aCb@@ATBB@` aCP@@^@$@A @@`aCb@@AT@@AAAjA@"@PaCb@@ATB;AA A@ @@`aCb@@ATBj2@ @@`aCb@@AT@@A;AA @A`aCb@@AU B2C(3C@B @A`aCb@@ATB B@` aCP@@^@&AA CD@@AmAA 0@j.@0@@AiAA1 C.CD@@AfAA.C@#@A fAA.A"B.C(. C,A@@B a@"B@C`@+@Ab@" BAb@"B(*B aD@a"E&@(A*@&B0 CAAA .A# BMAA h @ @@`aC`@ D C@AA [ PACKAGELISP-INTERNALSX PACKAGELISP-INTERNALS ?This export causes name conflicts; however, none of the conflicting symbols have values, function definitions, or properties. It is probably safe to remove them. The conflicting symbols are:Remove offending symbols.ZName conflicts created by EXPORT in package ~A: ~:{~S causes a conflict in package ~A.~%~} PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS UNEXPORTLISP-INTERNALS UNEXPORTLISP-INTERNALS G E?@!2A#FGG D ERRORLISP-INTERNALS? CDRCONS> SVSETARRAY9 SVREFARRAY8  STRUCTURE-REFLISP-INTERNALS5  STRUCTURE-REFLISP-INTERNALS. MVBIND-2LISP-INTERNALS- PKG-INTERN-INTERNALLISP-INTERNALS+ %SXHASH-STRINGLISP-INTERNALS(  SYMBOL-NAMESYMBOL'  SYMBOL-NAMESYMBOL& IMPORT PRIMITIVES$ CARCONS LISTLISP-INTERNALS SYMBOLPVINCULUM ERRORLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOLHAAB@A j$@ "A@A B2@@A  @A"AkBAz@"BD@@A@A$@@A @AA@"B @@AG@A CD@@AG@A Cj.@0@@AF@A1 C.A"B.C(. C,A@@B a@"B@C`@+@*@@AA@AAb@" BAb@"B(*B aD@a"E&@(A*@&B0 C!@A A@.@"B?@A hD  0@ B'Symbol ~S is not present in package ~A.A Ignore it6 PACKAGELISP-INTERNALS3 PACKAGELISP-INTERNALS%Package ~A is USEd by other packages.Unexport the symbol(s) anyway PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS IMPORT PRIMITIVES IMPORT PRIMITIVES .+$(!(,- - LISTLISP-INTERNALS* CDRCONS)  INTERN-SYMBOLLISP-INTERNALS' ERRORLISP-INTERNALS%  SYMBOL-NAMESYMBOL MVBIND-2LISP-INTERNALS  INTERN-SOFTLISP-INTERNALS  SYMBOL-NAMESYMBOL ERRORLISP-INTERNALS SYMBOLPVINCULUM CARCONS LISTPVINCULUM PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL/AAB@A "A@@ B,@@A  @A"AkB CD@@A-@A *@j(@*@@A,@A* C(CD@@A @AA(B(C(# B' C`@%@$@@A(@A@(@A(@A)C(@"B(A"B+ C@A hD! C@A &6A symbol named ~S is already accessible in package ~A.*The argument ~S to IMPORT was not a symbol PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS SHADOWING-IMPORTLISP-INTERNALS SHADOWING-IMPORTLISP-INTERNALS/, +-. . LISTLISP-INTERNALS+ CDRCONS*  STRUCTURE-SETLISP-INTERNALS& CONSCONS%  STRUCTURE-REFLISP-INTERNALS  MEMBER-EQLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS  INTERN-LOCALLISP-INTERNALS UNINTERNLISP-INTERNALS  SYMBOL-NAMESYMBOL CARCONS LISTPVINCULUM PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL0AAB@A "A@A B*@@A  @A"AkB CD@@A.@A (@j&@(@@A-@A) C&C("B&A"B@AA|@#B&BD@@A +@A@A",@A|@-B& BA|@"@$B( C@A hD C@A ' PACKAGELISP-INTERNALS# PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS SHADOWLISP-INTERNALS SHADOWLISP-INTERNALS 30*)+12 2 LISTLISP-INTERNALS/  MEMBER-EQLISP-INTERNALS.  STRUCTURE-REFLISP-INTERNALS) CDRCONS(  STRUCTURE-SETLISP-INTERNALS$ CONSCONS#  STRUCTURE-REFLISP-INTERNALS MVBIND-2LISP-INTERNALS  INTERN-LOCALLISP-INTERNALS STRINGLISP-INTERNALS CARCONS LISTPVINCULUM PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL4AAB@A "A@@ B0@@A  @A"AkB CD@@A2@A .@j,@.@@A1@A. C- C*A" B( C`@'@&@@A+@A&@@A )@A"2AA|@3B( BA|@"@$B/ C@A @AA|@#B) B@A hD! C@A , PACKAGELISP-INTERNALS% PACKAGELISP-INTERNALS! PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS  USE-PACKAGELISP-INTERNALS  USE-PACKAGELISP-INTERNALS  USE-PACKAGE-1LISP-INTERNALS  %SYMBOL-VALUESYMBOLAAB@A  E#F  *PACKAGE*LISP-INTERNALS  USE-PACKAGE-1LISP-INTERNALS  USE-PACKAGE-1LISP-INTERNALS N _`od^ X_R LJ<J,J%JKM Mt<(Tt~gjXM2F;E*G!N  B LISTLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS  ERRORLISP-INTERNALS CDRCONS  STRUCTURE-SETLISP-INTERNALS{ CONSCONSz  STRUCTURE-REFLISP-INTERNALSw  STRUCTURE-SETLISP-INTERNALSs CONSCONSr  STRUCTURE-REFLISP-INTERNALSl  MEMBER-EQLISP-INTERNALSk  STRUCTURE-REFLISP-INTERNALSg CARCONSK CDRCONSF CONSCONSA CONSCONS? CONSCONS= NBUTLASTLISP-INTERNALS8 CHECK-FOR-NAME-CONFLICTLISP-INTERNALS1  SYMBOL-NAMESYMBOL0 SVREFARRAY/  STRUCTURE-REFLISP-INTERNALS) SVREFARRAY(  STRUCTURE-REFLISP-INTERNALS" NUMBERPVINCULUM! SVREFARRAY   STRUCTURE-REFLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS CARCONS  STRUCTURE-REFLISP-INTERNALS   STRUCTURE-REFLISP-INTERNALS| CONSCONSk DELETELISP-INTERNALSd %SYMBOL-FUNCTIONSYMBOL^ CHECK-FOR-NAME-CONFLICTLISP-INTERNALSW  SYMBOL-NAMESYMBOLS SVREFARRAYO  STRUCTURE-REFLISP-INTERNALSF SVREFARRAYB  STRUCTURE-REFLISP-INTERNALS9 NUMBERPVINCULUM2 SVREFARRAY.  STRUCTURE-REFLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS CDRCONS{  REMOVE-EQLISP-INTERNALSq  MEMBER-EQLISP-INTERNALSm  STRUCTURE-REFLISP-INTERNALSi ERRORLISP-INTERNALS`  %SYMBOL-VALUESYMBOL[ CARCONSJ PKG-FIND-PACKAGELISP-INTERNALSE CDRCONSB CONSCONS8  MEMBER-EQLISP-INTERNALS. PKG-FIND-PACKAGELISP-INTERNALS- CADRCONS' LISTPVINCULUM" CARCONS LISTPVINCULUM PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL BOUNDPSYMBOL@@ aC`@aCP@j^@A@BD@@A @AA@B"A@@BB@` aCP@@^@@@`aCb@@AT@@A @A"AkB CD@@A AAaCP@j^@ @@AN@A CaCP@@^@aCbA@ATBD@@AG@AaCbA@ATB(jBB@` aCP@@^@@A`aCb@@AT@aCb@@ATBD@@A E@A@A`aCb@@AT@aCb@@ATBaCP@@^@ C@A aCbA@AT@jBB@` aCP@2@^@ aCb@@APaCZ@B@` aCP@j^@PaCb@@AT@@A@APaCbA@ATBB@` aCP@@^@A@B@@`aCb@@AT@@@E@A j@AA@B@AAx@#B@@`aCb@@ATBD@@A~@A@A`aCb@@AT@aCb@@ATBaCP@@^@PaCbA@ATBPaCP@@^@T@A B@` aCP@j^@B@` aCP@j^@ B@` aCP@`^@"C B@` aCP@@^@ @@`aCb@@A @@`aCZ@Ap@ @@`aCb@@ATB B@` aCP@@^@ @@`aCb@@AT@@ B@` aCb@@ApU0@AAAAb@ @@`aCb@@ATB( @@`aCb@@ATB B@` aCP@@^@ @A`aCb@@ATBD@@AAAAf@ @@`aCb@@ATB( @@`aCb@@ATBB@` aCP@@^@Ab@ @@`aCb@@ATB( @@`aCb@@ATB@A`aCb@@ATB("@j@j@j@aCb@@AT BB@` aCP@@^@@AAAB"@@@`aCb@@AT@@@BB@` aCP@@^@@@`aCb@@AT@@AAA@A`aCb@@AT@@@`aCb@@ATBB@` aCP@@^@ B@` aCb@@A0U@x B@` aCP@@^@ A~@"BEp@AMAAAx@#Bj<@>@@AMAA>C`:@<C86@Ap@8 Bpk40@AKAAAb@6B(; B2CD@@AJAAAb@6B(:BEp@AJAAAf@6B(: B0C("@h@j@j@aCb@@AU B.,@.@@AJAA, C0A= B*A, B,A@@`aCb@@ATBB@` aCP@@^@1i::x ?CAA @@`aCb@@AT@@A  AA@@`aCb@@AT@@A_AA@@`aCb@@AT@@A  AAj(@aCb@@AT@@AAAaCbA@AT B@AAx@#B(BD@@A AAAz@)B(# BAz@(@&BAx@#B(( BAx@"@$BaCbA@ATBaCP@@^@`AA h @@@`aC`@ DA@B_AA  AjB(@BaCP@N@^@  $USE-PACKAGE name conflict of symbols| PACKAGELISP-INTERNALSx PACKAGELISP-INTERNALSt PACKAGELISP-INTERNALSp PACKAGELISP-INTERNALSi PACKAGELISP-INTERNALS- PACKAGELISP-INTERNALS& PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  PACKAGELISP-INTERNALS PACKAGELISP-INTERNALSj KEYKEYWORDc CDRCONSJ PACKAGELISP-INTERNALS= PACKAGELISP-INTERNALS) PACKAGELISP-INTERNALS PACKAGELISP-INTERNALSk PACKAGELISP-INTERNALSh+Attempt to USE-PACKAGE the Keyword package._ PKG-KEYWORD-PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS  *PACKAGE*LISP-INTERNALS  UNUSE-PACKAGELISP-INTERNALS  UNUSE-PACKAGELISP-INTERNALS 5(0)+1'$&!'(2 4 LISTLISP-INTERNALS3 PKG-FIND-PACKAGELISP-INTERNALS/ CDRCONS. UNUSE-PACKAGE-1LISP-INTERNALS, CARCONS% CDRCONS# RPLACDCONS CONSCONS PKG-FIND-PACKAGELISP-INTERNALS CARCONS LISTPVINCULUM PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL BOUNDPSYMBOL  %SYMBOL-VALUESYMBOL6AAB@A j*@A@BD@@A @AA@B"A@@ B,@@A @A"AkB CD@@A2@Aj*@j(@ @@A(@A C(@B(k B(@@A'@A(A&B&(@ C@A $&*@ j$@*@@A1@A* C$A"B+ C)@A hD AjB(A B(@A  PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS  *PACKAGE*LISP-INTERNALS  *PACKAGE*LISP-INTERNALS UNUSE-PACKAGE-1LISP-INTERNALS UNUSE-PACKAGE-1LISP-INTERNALS  STRUCTURE-SETLISP-INTERNALS  DELETE-EQLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS  STRUCTURE-SETLISP-INTERNALS  DELETE-EQLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALSAz@!B(# BAz@ @&BAx@#B( BEx@"@%F PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  IN-PACKAGE PRIMITIVES  IN-PACKAGE PRIMITIVES)"   ( APPLY-INTERNALLISP-INTERNALS$ %SYMBOL-FUNCTIONSYMBOL PKG-GOTOLISP-INTERNALS PKG-ADD-NICKNAMESLISP-INTERNALS  USE-PACKAGELISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS MVBIND-2LISP-INTERNALS GET-KEYWORD-ARG-VALUESLISP-INTERNALS  CONS-RESTLISP-INTERNALS~*@h@@n@(j@(@(A@k B' C`@%@B@@B@A  @Aj&@B@@B@A @Aj$@ AkB"@@A @A(@@A @A&A"B"A$B"EkF"@@A @AA@BD@h@@f@(@j@!C@A #  MAKE-PACKAGELISP-INTERNALS KEYWORD-GARBAGELISP-INTERNALS KEYWORD-GARBAGELISP-INTERNALS USEKEYWORD  NICKNAMESKEYWORD PKG-ADD-NICKNAMESLISP-INTERNALS PKG-ADD-NICKNAMESLISP-INTERNALS   STRUCTURE-SETLISP-INTERNALS CONSCONS  STRUCTURE-REFLISP-INTERNALS STRINGLISP-INTERNALS CDRCONS ERRORLISP-INTERNALS  FIND-PACKAGELISP-INTERNALS CARCONSj*@"@@A@A# C* C(@@A@A@$ @A@AA@B#C@A + CAv@!B(& BAv@ @$B@A jD PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS $There is already a package named ~A.  INTERN-SYMBOLLISP-INTERNALS  INTERN-SYMBOLLISP-INTERNALSfc_$\$Y]8N0N,m*z(*+$ $$+o-h5fhaYW`TbGb@b<i!V` d*] STRINGLISP-INTERNALSZ  SYMBOL-NAMESYMBOLV SYMBOLPVINCULUMR PKG-INTERN-STORELISP-INTERNALSM SVSETARRAYH SVREFARRAYG  STRUCTURE-REFLISP-INTERNALSD  STRUCTURE-REFLISP-INTERNALS@ MVBIND-4LISP-INTERNALS? PKG-INTERN-STORELISP-INTERNALS: SETSYMBOL5  %SYMBOL-VALUESYMBOL3 SET-SYMBOL-PACKAGESYMBOL1  MAKE-SYMBOLSYMBOL- SYMBOLPVINCULUM+ CDRCONS EQUALLISP-INTERNALS  SYMBOL-NAMESYMBOL SVREFARRAY  STRUCTURE-REFLISP-INTERNALS NUMBERPVINCULUM} SVREFARRAY|  STRUCTURE-REFLISP-INTERNALSy MOD PRIMITIVESs  STRUCTURE-REFLISP-INTERNALSp CARCONSk  STRUCTURE-REFLISP-INTERNALSQ EQUALLISP-INTERNALSN  SYMBOL-NAMESYMBOLM SVREFARRAYL  STRUCTURE-REFLISP-INTERNALS= NUMBERPVINCULUM8 SVREFARRAY7  STRUCTURE-REFLISP-INTERNALS4 MOD PRIMITIVES.  STRUCTURE-REFLISP-INTERNALS( %SXHASH-STRINGLISP-INTERNALS STRINGPARRAY PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL BOUNDPSYMBOLg@@ aC`@j"@ @@ aC`@aCP@j^@PaCP@j^@A@BD@@Ad@AA@BB@` aCP@@^@"@@A`@A"A@@BD@@A @A"AkB CD@@AV@APaCP@ ^@PaCbA@AT@@@B a@@aCP@@^@Ap@#Bj<@j:@aCbA@AT@>BAb@"B(8B<D@D@@Ai@A<CD@@Ab@A w`D@aCb@@AT@@pE0@A b@A@A@AAf@"B(9B;BPaCb@@ATBD@@Ab@Ap<p@A`@A6@`@6@a@"@c@: @@@`aC`@ D6@Y@A 0a88x8D@p?0@A h@A`8@5@A Ax@" Bj2@4@@A-@A5 CAp@2 Bj.@j,@aCbA@AT@1 BAb@2B(+ B.D@D@@A+@A.CD@@A$@A ?`D@aCb@@AT@@pE0@A $@A@A@AAf@2B(* B-BPaCb@@ATBD@@A$@A8.p@A+@A`@@a@2@c@, @@@`aC`@ D0)**x*D@p10@A *@A`*@z@A 4 Cm@A CD@@A N@A C A"BA@B@ D@A N@A A BaCbA@AT@ @"B@Cd@)@Ab@# BAb@"B((B aD@a"E$@&A(@$BaCbA@AT@ @"B@@`aC`@ D CD@@A]@A CPaCP@$@^@ CPaCP@$@^@ @@`aCb@@AT"@ B@` aCP@j^@ E PACKAGELISP-INTERNALSB PACKAGELISP-INTERNALS4 PKG-KEYWORD-PACKAGELISP-INTERNALS  INHERITEDKEYWORD PACKAGELISP-INTERNALSz PACKAGELISP-INTERNALSq PACKAGELISP-INTERNALSi PACKAGELISP-INTERNALS` INTERNALKEYWORDX EXTERNALKEYWORDJ PACKAGELISP-INTERNALS5 PACKAGELISP-INTERNALS, PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS  *PACKAGE*LISP-INTERNALS INTERNLISP-INTERNALS INTERNLISP-INTERNALS[XT$4J,m*z(*+$ $$+o-h5fhaYW`TbGb@b<i!RU Y'S ERRORLISP-INTERNALSN PKG-INTERN-STORELISP-INTERNALSI SVSETARRAYD SVREFARRAYC  STRUCTURE-REFLISP-INTERNALS@  STRUCTURE-REFLISP-INTERNALS< MVBIND-4LISP-INTERNALS; PKG-INTERN-STORELISP-INTERNALS6 SETSYMBOL1  %SYMBOL-VALUESYMBOL/ SET-SYMBOL-PACKAGESYMBOL-  MAKE-SYMBOLSYMBOL+ CDRCONS EQUALLISP-INTERNALS  SYMBOL-NAMESYMBOL SVREFARRAY  STRUCTURE-REFLISP-INTERNALS NUMBERPVINCULUM} SVREFARRAY|  STRUCTURE-REFLISP-INTERNALSy MOD PRIMITIVESs  STRUCTURE-REFLISP-INTERNALSp CARCONSk  STRUCTURE-REFLISP-INTERNALSQ EQUALLISP-INTERNALSN  SYMBOL-NAMESYMBOLM SVREFARRAYL  STRUCTURE-REFLISP-INTERNALS= NUMBERPVINCULUM8 SVREFARRAY7  STRUCTURE-REFLISP-INTERNALS4 MOD PRIMITIVES.  STRUCTURE-REFLISP-INTERNALS( %SXHASH-STRINGLISP-INTERNALS STRINGPARRAY PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL BOUNDPSYMBOL\@@ aC`@j"@ @@ aC`@aCP@j^@PaCP@j^@A@BD@@AY@AA@BB@` aCP@@^@"@@AU@A"A@@BD@@A @A"AkB CD@@AR@APaCP@ ^@PaCbA@AT@@@B a@@aCP@@^@Ap@#Bj<@j:@aCbA@AT@>BAb@"B(8B<D@D@@Ai@A<CD@@Ab@A w`D@aCb@@AT@@pE0@A b@A@A@AAf@"B(9B;BPaCb@@ATBD@@Ab@Ap<p@A`@A6@`@6@a@"@c@: @@@`aC`@ D6@Y@A 0a88x8D@p?0@A h@A`8@5@A Ax@" Bj2@4@@A-@A5 CAp@2 Bj.@j,@aCbA@AT@1 BAb@2B(+ B.D@D@@A+@A.CD@@A$@A ?`D@aCb@@AT@@pE0@A $@A@A@AAf@2B(* B-BPaCb@@ATBD@@A$@A8.p@A+@A`@@a@2@c@, @@@`aC`@ D0)**x*D@p10@A *@A`*@z@A 4 Cm@A C A"BA@B@ D@A J@A A BaCbA@AT@ @"B@Cd@)@Ab@# BAb@"B((B aD@a"E$@&A(@$BaCbA@AT@ @"B@@`aC`@ DA B$@A @@`aCb@@AT"@ B@` aCP@j^@ RINTERN only handles strings!A PACKAGELISP-INTERNALS> PACKAGELISP-INTERNALS0 PKG-KEYWORD-PACKAGELISP-INTERNALS  INHERITEDKEYWORD PACKAGELISP-INTERNALSz PACKAGELISP-INTERNALSq PACKAGELISP-INTERNALSi PACKAGELISP-INTERNALS` INTERNALKEYWORDX EXTERNALKEYWORDJ PACKAGELISP-INTERNALS5 PACKAGELISP-INTERNALS, PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS  *PACKAGE*LISP-INTERNALS  INTERN-SOFTLISP-INTERNALS  INTERN-SOFTLISP-INTERNALS  U`} zokg W P%NPIDBH?J4J0J,Q   STRINGLISP-INTERNALS  SYMBOL-NAMESYMBOL SYMBOLPVINCULUM CDRCONSw EQUALLISP-INTERNALSv  SYMBOL-NAMESYMBOLu SVREFARRAYt  STRUCTURE-REFLISP-INTERNALSh NUMBERPVINCULUMc SVREFARRAYb  STRUCTURE-REFLISP-INTERNALS_ REMNEW-MATH[  STRUCTURE-REFLISP-INTERNALSX CARCONSS  STRUCTURE-REFLISP-INTERNALS< EQUALLISP-INTERNALS;  SYMBOL-NAMESYMBOL: SVREFARRAY9  STRUCTURE-REFLISP-INTERNALS- NUMBERPVINCULUM( SVREFARRAY'  STRUCTURE-REFLISP-INTERNALS$ MOD PRIMITIVES  STRUCTURE-REFLISP-INTERNALS %SXHASH-STRINGLISP-INTERNALS STRINGPARRAY PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL BOUNDPSYMBOLj"@ j>@j<@A@BD@@A@AAAB"@@A@A"A@@BD@@A @A"AkB CD@@A @A <@<A@@B a>@Ap@"Bj6@j4@>A9 BAb@"B(3 B6D@D@@AQ@A6CD@@AJ@A _`D@p{D0@A J@A@A@AAf@"B(2 B5B<BD@@AJ@AX6p@AH@A0@`@0@a@"@c@4D0@D@A 0I22x2D@p90@A P@A`2@%@A Ax@# Bj,@.@@A @A. CAp@- Bj(@j&@>A* BAb@,B($ B(D@D@@A @A(CD@@A@A '`D@p{D0@A @A@A@AAf@,B(% B'B<BD@@A@A (p@A @A`@@a@,@c@&D0$$x$D@p+0@A @A`$@`@A / CU@A jD CD@@A@A C@A C@A :"@ j:@   INHERITEDKEYWORDr PACKAGELISP-INTERNALS` PACKAGELISP-INTERNALSY PACKAGELISP-INTERNALSQ PACKAGELISP-INTERNALSH INTERNALKEYWORDC EXTERNALKEYWORD7 PACKAGELISP-INTERNALS% PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS  *PACKAGE*LISP-INTERNALS  FIND-SYMBOLLISP-INTERNALS  FIND-SYMBOLLISP-INTERNALS  INTERN-SOFTLISP-INTERNALS E#F  INTERN-LOCALLISP-INTERNALS  INTERN-LOCALLISP-INTERNALSca_b[TSYLNHFHA<:@7B,B(B$I\ b STRINGLISP-INTERNALS`  SYMBOL-NAMESYMBOL\ SYMBOLPVINCULUMZ %SYMBOL-FUNCTIONSYMBOLX FUNCALL-INTERNALLISP-INTERNALSP  STRUCTURE-REFLISP-INTERNALSM  MAKE-SYMBOLSYMBOLI SYMBOLPVINCULUM4 EQUALLISP-INTERNALS3  SYMBOL-NAMESYMBOL2 SVREFARRAY1  STRUCTURE-REFLISP-INTERNALS% NUMBERPVINCULUM SVREFARRAY  STRUCTURE-REFLISP-INTERNALS REMNEW-MATH  STRUCTURE-REFLISP-INTERNALS %SXHASH-STRINGLISP-INTERNALS STRINGPARRAY PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOLdAAB@A j2@j0@"A@@BD@@A  @A"AkB CD@@A\@A 0@0A@@B a2@Ap@# Bj,@j*@2A. BAb@"B(( B,D@D@@AI@A,CD@@AB@A 7`D@pKD0@A B@A@A@AAf@"B() B+B0BD@@AB@A0,p@A@@A&@`@&@a@"@c@*D&@<@A 0!((x(D@p/0@A H@A`(@@A CD@@A N@A CA @" B$@@AY@A$@h@@f@2E @#FA@ BT@A CD@@Ab@A C@A C@A Y PKG-INTERN-STORELISP-INTERNALSN PACKAGELISP-INTERNALS@ INTERNALKEYWORD; EXTERNALKEYWORD/ PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS INTERN-LOCAL-SOFTLISP-INTERNALS INTERN-LOCAL-SOFTLISP-INTERNALS  MVBIND-2LISP-INTERNALS PKG-INTERN-INTERNALLISP-INTERNALS %SXHASH-STRINGLISP-INTERNALS STRINGLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOL!AAB@A j,@j*@j(@j&@"A@@BD@@A @A#C! C&$@$A@@B a,@&A,@# B+ C`@)@(@@A @A`@ @a@"@c@*DjD PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS PKG-INTERN-INTERNALLISP-INTERNALS PKG-INTERN-INTERNALLISP-INTERNALS*(* $$$+  EQUALLISP-INTERNALS  SYMBOL-NAMESYMBOL SVREFARRAY  STRUCTURE-REFLISP-INTERNALS NUMBERPVINCULUM SVREFARRAY  STRUCTURE-REFLISP-INTERNALS REMNEW-MATH  STRUCTURE-REFLISP-INTERNALS,Ap@$ Bj*@j(@"A- BAb@$B(' B*D@D@@A+@A*CD@@A$@A /`D@p D0@A $@A@AAf@$B(& B)B( BD@@A$@A`@&@a@(D0&&x&D@p-0@A *@A`&@@A jD PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-INTERN-EXTERNALLISP-INTERNALS PKG-INTERN-EXTERNALLISP-INTERNALS-+-#''''. EQUALLISP-INTERNALS  SYMBOL-NAMESYMBOL SVREFARRAY  STRUCTURE-REFLISP-INTERNALS NUMBERPVINCULUM SVREFARRAY  STRUCTURE-REFLISP-INTERNALS REMNEW-MATH  STRUCTURE-REFLISP-INTERNALS/Ap@$ Bj*@j(@"A- BAb@$B(' B*D@D@@A.@A*CD@@A'@A /`D@p D0@A '@A(*p@A'@A@AAf@$B(& B)B( BD@@A'@A`@&@a@(D0&&x&D@p-0@A -@A`&@@A jD PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PKG-INTERN-STORELISP-INTERNALS PKG-INTERN-STORELISP-INTERNALS-42 MVBIND-2LISP-INTERNALS1 PKG-INTERN-INTERNALLISP-INTERNALS/  SYMBOL-NAMESYMBOL.  PKG-REHASHLISP-INTERNALS*  STRUCTURE-REFLISP-INTERNALS'  STRUCTURE-SETLISP-INTERNALS"  STRUCTURE-REFLISP-INTERNALS SVSETARRAY  STRUCTURE-REFLISP-INTERNALS SVSETARRAY  STRUCTURE-REFLISP-INTERNALS REMNEW-MATH NUMBERPVINCULUM SVREFARRAY  STRUCTURE-REFLISP-INTERNALS REMNEW-MATH  STRUCTURE-REFLISP-INTERNALS9j6@j4@j2@Ap@% B A6 BAb@$B(1 B.CD@@A@A0A0y6 B@A 04@Ab@$ B,A0@ BAf@% B*A0@"BA~@$B0E(xA~@$@) BA @$B@D0@A4@A$C"C( @% B3 C`@5@`@@a@$@c@4@e@"D( PACKAGELISP-INTERNALS$ PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS UNINTERNLISP-INTERNALS UNINTERNLISP-INTERNALS03,K LH  STRUCTURE-SETLISP-INTERNALSD  DELETE-EQLISP-INTERNALSC  STRUCTURE-REFLISP-INTERNALS> SVSETARRAY;  STRUCTURE-REFLISP-INTERNALS8 SVSETARRAY5  STRUCTURE-REFLISP-INTERNALS2 SET-SYMBOL-PACKAGESYMBOL- SYMBOL-PACKAGESYMBOL( MVBIND-2LISP-INTERNALS' PKG-INTERN-INTERNALLISP-INTERNALS# %SXHASH-STRINGLISP-INTERNALS STRINGLISP-INTERNALS CHECK-FOR-NAME-CONFLICTLISP-INTERNALS STRINGLISP-INTERNALS  MEMBER-EQLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS PKG-FIND-PACKAGELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS  %SYMBOL-VALUESYMBOLMAAB@A j$@ j4@j2@j0@"@@AL@A"A@A B.@@A @A#C$@@A @A@AA|@#B BD@@A@A C("@hB C0,@,A@@B a4@0A4@"B C`@3@2@@AK@A C@#@A 3@A AjBAb@# B*A2@hBAf@" B(A2@jB@A"6@A|@7B! BA|@"@&B@AhDjDjDE PACKAGELISP-INTERNALSA PACKAGELISP-INTERNALS9 PACKAGELISP-INTERNALS3 PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS PACKAGELISP-INTERNALS  *PACKAGE*LISP-INTERNALS REMOBLISP-INTERNALS REMOBLISP-INTERNALS UNINTERNLISP-INTERNALS SYMBOL-PACKAGESYMBOL!C@A j$@  E"@%F CHECK-FOR-NAME-CONFLICTLISP-INTERNALS CHECK-FOR-NAME-CONFLICTLISP-INTERNALSkre:[JUdN\Ed<f8|( 1) 19fO`uSgHu05"FF   h CDRCONSd CDRCONSa CONSCONS] CONSCONSX CDRCONSR CARCONSQ CARCONS@ MVBIND-2LISP-INTERNALS? INTERN-LOCAL-SOFTLISP-INTERNALS= CARCONS4 CDRCONS. CONSCONS* CONSCONS$ CDRCONS CARCONS CARCONS MVBIND-2LISP-INTERNALS INTERN-LOCAL-SOFTLISP-INTERNALS CARCONSw  STRUCTURE-REFLISP-INTERNALSr CONSCONSh CONSCONSc CDRCONS] CARCONSV CARCONSC CONSCONS9 CONSCONS- MEMBERLISP-INTERNALS' %SYMBOL-FUNCTIONSYMBOL%  STRUCTURE-REFLISP-INTERNALS MVBIND-2LISP-INTERNALS INTERN-LOCAL-SOFTLISP-INTERNALS  v @@ aC`@j$@ @@ aC`@j&@ @@ aC`@ j(@ @@ aC`@j*@ @@ aC`@aCP@j^@$@@A F@A A"BB@` aCP@@^@@A`aCb@@ATBB@` aCP@@^@`@G@F@@AF@AA|@#B(AAB@@`aCb@@AT@@@BD@@A5@Aj @ @@`aC`@ D@A`aCb@@AT@"BB@` aCP@@^@@A`aCb@@AT@aCb@@ATBaCP@@^@&@@Au@AaCb@@APaCZ@B@` aCP@j^@PaCb@@AT@@Ag@APaCbA@ATBB@` aCP@@^@@A`aCb@@ATB@'@Au@APaCbA@ATBPaCP@@^@O@A &A(BB@` aCP@@^@@A`aCb@@AT@aCb@@ATBaCP@@^@Ax@"B B@` aCP@@^@j>@ @@`aCb@@AT@@A9@A @A`aCb@@AUB A>B<C`@;@B@@lB@A 1@AaCb@@A@@`aCZ@j8@@@`aCb@@AT@@A)@A@A`aCb@@ATB8C@=@A1@A@A`aCb@@ATBB@` aCP@@^@@A <A? B6AaCb@@ATBaCP@@^@ @A`aCb@@ATB B@` aCP@@^@|@A j4@*@@Af@A* C A5 B3 C`@1@B@@DB@A d@AaCb@@AaCZ@j.@aCb@@AT@@A\@AaCbA@AU B.C@3@Ad@AaCbA@ATBaCP@@^@J@A 2A4 B,AaCb@@ATBaCP@@^@+ C:@A aCbA@ATBD@@Ar@AaCb@@AT @ @@`aC`@ Dj @ @@`aC`@ DB EXTERNALKEYWORD EXTERNALKEYWORDu PACKAGELISP-INTERNALS, TESTKEYWORD&  STRING-EQUALLISP-INTERNALS# PACKAGELISP-INTERNALS PKG-GOTO-GLOBALLYLISP-INTERNALS PKG-GOTO-GLOBALLYLISP-INTERNALS  SETQ-GLOBALLYLISP-INTERNALS  %SYMBOL-VALUESYMBOL UNBIND-1LISP-INTERNALS PKG-GOTOLISP-INTERNALS BINDLISP-INTERNALS  %SYMBOL-VALUESYMBOL  %SYMBOL-VALUESYMBOL A@B@A AABA"B C@CA@B(!F  *PACKAGE*LISP-INTERNALS  *PACKAGE*LISP-INTERNALS  *PACKAGE*LISP-INTERNALS PKG-USER-PACKAGELISP-INTERNALS