(K-LISP-INTERNALS::ERROR-NOT-A-SEQUENCE
  K-LISP-INTERNALS::TYPE-CANONICALIZE
  SI::FOO
  SI::SET-CDR
  SI::SET-CAR
  SI::SYMBOL?
  SI::CONTENTS-OFFSET
  K-LISP-INTERNALS::WALK-OBJECT
  K-LISP-INTERNALS::PUTHASH
  K-NEW-MATH::
  K-LISP-INTERNALS::WARN
  K-NEW-MATH::FIND-MAMTISSA-DOUBLE
  K-LISP-INTERNALS::NFRAME
  SYSTEM:PRINTING-RANDOM-OBJECT
  K-NEW-MATH::EVENP
  K-LISP-INTERNALS::NAME-CHAR
  K-LISP-INTERNALS::BIT
  K-LISP-INTERNALS::EVAL-SUBPROBLEM
  K-ARRAY::CAR
  K-ARRAY::CDR
  K-ARRAY::%VM-READ-32
  K-NEW-MATH::
  K-LISP-INTERNALS::GET-INDENTATION
  K-LISP-INTERNALS::BEGIN-READ
  K-LISP-INTERNALS::NEXT-READ-CLUSTER
  K-LISP-INTERNALS::DO-THE-READ
  #<NCOMPILED-FUNCTION
  (:INTERNAL K-LISP-INTERNALS::EVAL-SEQUENTIAL-LET K-LISP-INTERNALS::ESL-LOOP)
  74133276>
  IF
  K-LISP-INTERNALS::SETQ-GLOBALLY
  K-NEW-MATH::
  K-ARRAY::COPY-ARRAY-CONTENTS
  K-LISP-INTERNALS::
  K-ARRAY::DECODE-1D-DISPLACED-ARRAY
  K-LISP-INTERNALS::FUNCTIONP
  K-ARRAY::MAKE-STRING-WITH-INIT
  K-LISP-INTERNALS::SEQUENCE-LENGTH
  K-LISP-INTERNALS::ARRAY-TYPE
  K-USER::MOBY-PARSE-LAMBDA-LIST
  K-PRIMITIVES::FERROR
  K-USER::PARSE-OPTIONAL-PARAMETER
  K-USER::PARSE-KEY-PARAMETER
  K-USER::PARSE-AUX-PARAMETER
  K-LISP-INTERNALS::%SET-CDR
  K-LISP-INTERNALS::NCONS-IN-AREA
  K-LISP-INTERNALS::STRING-LENGTH
  K-LISP-INTERNALS::Y-OR-N-P
  K-LISP-INTERNALS::GENTEMP
  SI::GOBBLE-DECLARATIONS
  SI::XR-BQ-APPEND
  K-NUBUS-STUFF::DPB
  K-LISP-INTERNALS::INTERMEDIATE-EXPRESSION-ORIGINAL-FORM
  K-NUBUS-STUFF::FORMAT
  K-LISP-INTERNALS::DO-FOREVER
  K-LISP-INTERNALS::PRINT-REDUNDANTLY-VERBOSE-CHARACTER
  K-LISP-INTERNALS::PRINT-VERBOSE-CHARACTER
  K-LISP-INTERNALS::SUBTYPEP
  K-LISP-INTERNALS::PRINT-ORDINAL-NUMBER
  K-LISP-INTERNALS::PRINT-CARDINAL-NUMBER
  K-LISP-INTERNALS::PEEK-CHAR
  K-HARDWARE::DPB-MULTIPLE
  K-ARRAY::COPY-ARRAY-PORTION
  K-HARDWARE::32ARITHMETIC-SHIFT-UP
  K-LISP-INTERNALS::ARRAY-INITIALIZE
  K-LISP-INTERNALS::REHASH-SIZE
  K-NUBUS-STUFF::LDB-TEST
  FORMAT:TAB
  FORMAT:OPRINT
  FORMAT:OUTFMT
  K-LISP-INTERNALS::CERROR
  #<NCOMPILED-FUNCTION
  (:INTERNAL K-LISP-INTERNALS::REDUCE K-LISP-INTERNALS::REDUCE-LIST-BACKWARDS)
  -77446313>
  K-LISP-INTERNALS::FORMAT-@[
  K-LISP-INTERNALS::FORMAT-N[
  K-NEW-MATH::MAKE-DOUBLE-FLOAT
  K-NEW-MATH::MAKE-SINGLE-FLOAT
  K-LISP-INTERNALS::BEGIN-WRITE
  K-LISP-INTERNALS::NEXT-WRITE-CLUSTER
  K-LISP-INTERNALS::DO-THE-WRITE
  K-LISP-INTERNALS::ALLOCATE-QUANTUM
  NC::CHECK-TYPE-INTERNAL
  K-LISP-INTERNALS::COERCE
  K-LISP-INTERNALS::LOG
  K-LISP-INTERNALS::EXPT
  NC::NO-CASE-ERROR
  K-LISP-INTERNALS::TYPEP
  K-LISP-INTERNALS::TYPE-OF
  K-LISP-INTERNALS::COPY-STRUCTURE-OBJECT
  K-LISP-INTERNALS::ILLOP-FUNCTION
  K-LISP-INTERNALS::PKG-GOTO
  K-LISP-INTERNALS::REALPART
  K-LISP-INTERNALS::IMAGPART
  K-LISP-INTERNALS::NUMERATOR
  K-LISP-INTERNALS::DENOMINATOR
  K-TRAP::RESTORE-CALL-HARDWARE
  K-NEW-MATH::TRUNCATE-GENERIC
  K-LISP-INTERNALS::COPY-SEQ
  K-NEW-MATH::ABS
  )