;;; -*- Mode:LISP; Package:LISP-INTERNALS; Base:10; Readtable:ZL -*-

((ASSOC)
 (MEMBER-EQUAL)
 (MEMBER)
 (LOWER-CASE-P)
 (CHAR-DOWNCASE)
 (CHAR-UPCASE)
 (BOTH-CASE-P)
 (COMPLEXP)
 (RATIONALP)
 (MEMBER-EQL)
 (ALPHANUMERICP)
 (UPPER-CASE-P)
 (ALPHA-CHAR-P)
 (INT-CHAR)
 (CHAR-INT)
 (ENDP)
 (CHARACTERP)
 (SIMPLE-BIT-VECTOR-P)
 (BIT-VECTOR-P)
 (SIMPLE-STRING-P)
 (SIMPLE-VECTOR-P)
 (VECTORP)
 (ARRAY-DIMENSION)
 (ARRAY-RANK)
 (ARRAY-HAS-FILL-POINTER-P)
 (VECTOR-PUSH)
 (EQUALP)
 (ASET)
 (AREF)
 (ASH)
 (ELT)
 (EQ)
 (ABS)
 (SYMBOL-FUNCTION)
 (BOUNDP)
 (STRINGP)
 (FBOUNDP)
 (ARRAYP)
 (SYMBOLP)
 (LISTP)
 (ARRAY-TOTAL-SIZE)
 (EQL)
 (DEPOSIT-FIELD)
 (MASK-FIELD)
 (LIST*)
 (LIST)
 (NTHCDR)
 (NTH)
 (BIND)
 (SYMBOL-VALUE)
 (CONS)
 (CONS-IN-AREA)
 (NCONS)
 (NCONS-IN-AREA)
 (XCONS)
 (XCONS-IN-AREA)
 (%SXHASH-STRING)
 (MINUSP)
 (PLUSP)
 (NUMBERP)
 (SYMBOL-NAME)
 (EVENP)
 (ODDP)
 (ATOM)
 (NULL)
 (NOT)
 (EQUAL)
 (FLOATP)
 (INTEGERP)
 (SET)
 (ZEROP)
 (RPLACD)
 (RPLACA)
 (1-)
 (1+)
 (LENGTH)
 (LAST)
 (DPB)
 (LDB)
 (%POINTER)
 (CDDDDR)
 (CDDDAR)
 (CDDADR)
 (CDDAAR)
 (CDADDR)
 (CDADAR)
 (CDAADR)
 (CDAAAR)
 (CADDDR)
 (CADDAR)
 (CADADR)
 (CADAAR)
 (CAADDR)
 (CAADAR)
 (CAAADR)
 (CAAAAR)
 (CDDDR)
 (CDDAR)
 (CDADR)
 (CDAAR)
 (CADDR)
 (CADAR)
 (CAADR)
 (CAAAR)
 (CDDR)
 (CDAR)
 (CADR)
 (CAAR)
 (CDR)
 (CAR)) 
si:       ;but actually in global:: at present  from file  k.math;cross-support.lisp
((*plus)
 (*times)
 (*dif)
 (*quo)
 (%div)
 (*logior)
 (*logand)
 (*logxor)
 (*min)     ;not used in cold load for lambda.
 (*max)
 (assq))
li:       ;but actually in global  at present  from file  k;k-uc-tv.lisp
((bitblt))