MAKE-STRUCTURELISP-INTERNALS MAKE-STRUCTURELISP-INTERNALS ALLOCATE-STRUCTURECONS0 }/@@F#!@`@@AF  STRUCTURE-REFLISP-INTERNALS  STRUCTURE-REFLISP-INTERNALS  ERRORLISP-INTERNALS STRUCTURE-REF-WRONG-TYPELISP-INTERNALSn b`""p@ T bb@AT&@0 $b@&@A  @ATD E"@$@'FE$@#F(The structure ~a does not have a slot ~a STRUCTURE-REF-WRONG-TYPELISP-INTERNALS STRUCTURE-REF-WRONG-TYPELISP-INTERNALS   ERRORLISP-INTERNALS  MEMBER-EQLISP-INTERNALSFsb @A  @A A&BD@@A @A0 "Dx %b@ATDE$@!F "The structure ~a is not of type ~a  STRUCTURE-SETLISP-INTERNALS  STRUCTURE-SETLISP-INTERNALS  ERRORLISP-INTERNALS STRUCTURE-SET-WRONG-TYPELISP-INTERNALSn b`""p@ T bb@AT(@0 $f@@AT@&^@&D@&@A @ATD E"@$@&@)FE$@#F(The structure ~a does not have a slot ~a STRUCTURE-SET-WRONG-TYPELISP-INTERNALS STRUCTURE-SET-WRONG-TYPELISP-INTERNALS   ERRORLISP-INTERNALS STORE-CONTENTS-OFFSETCONS  MEMBER-EQLISP-INTERNALSFs'b @A  @A A(BD@@A @A0 "}$@'FE$@!F "The structure ~a is not of type ~a MAKE-STRUCTURE-OBJECTLISP-INTERNALS MAKE-STRUCTURE-OBJECTLISP-INTERNALS/,.)/03  XR-BQ-LIST*SYSTEM-INTERNALS1  XR-BQ-APPENDSYSTEM-INTERNALS0  XR-BQ-LISTSYSTEM-INTERNALS- CDRCONS+ RPLACDCONS& CONSCONS%  XR-BQ-LISTSYSTEM-INTERNALS CARCONS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS LENGTHARRAY GENSYMLISP-INTERNALS CDRCONS CDRCONS CARCONS CDRCONS MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS LENGTHARRAY4j"@ C@g0@A@A Ab@jB C(@ B C(A BA@ B@A.C0Ex@AB(,B(AB(A,@b@0Bb*Aj@j(@.@@A0@A@A/ C0)**y*@@,@&Bj B(@@A/@A(A$B$(@/ C@A ,$@ -CAB@AF2 LET PRIMITIVES# STORE-CONTENTS-OFFSETCONS STORE-CONTENTS-OFFSETCONS MAKE-STRUCTURELISP-INTERNALS STRUCTLISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS TYPEP-STRUCTURELISP-INTERNALS    MEMBER-EQLISP-INTERNALSFsG! @A @A !b@AT$@@"@A  @AhDFsb @A @A"E%FjDjD