(APPLY-FOR-DEFEVALUATOR)
(GEN-EVAL)
(EVAL-LIST-KWOTE-LST)
(TRUE-LIST-FIX-EV-LST)
(EV-COMMUTES-CAR)
(EV-LST-COMMUTES-CDR)
(GEN-EVAL-OF-FNCALL-ARGS)
(GEN-EVAL-OF-VARIABLE)
(GEN-EVAL-OF-QUOTE)
(GEN-EVAL-OF-LAMBDA)
(GEN-EVAL-LST-OF-ATOM)
(GEN-EVAL-LST-OF-CONS)
(GEN-EVAL-OF-NONSYMBOL-ATOM)
(GEN-EVAL-OF-BAD-FNCALL)
(GEN-EVAL-OF-IF-CALL)
(GEN-EVAL-DISJOIN-CONS)
(GEN-EVAL-DISJOIN-WHEN-CONSP)
(GEN-EVAL-DISJOIN-ATOM
 (1 1 (:REWRITE GEN-EVAL-OF-IF-CALL))
 )
(GEN-EVAL-DISJOIN-APPEND
 (23 23 (:REWRITE GEN-EVAL-OF-QUOTE))
 (23 23 (:REWRITE GEN-EVAL-OF-IF-CALL))
 )
(GEN-EVAL-CONJOIN-CONS)
(GEN-EVAL-CONJOIN-WHEN-CONSP)
(GEN-EVAL-CONJOIN-ATOM
 (1 1 (:REWRITE GEN-EVAL-OF-IF-CALL))
 )
(GEN-EVAL-CONJOIN-APPEND
 (23 23 (:REWRITE GEN-EVAL-OF-QUOTE))
 (23 23 (:REWRITE GEN-EVAL-OF-IF-CALL))
 )
(GEN-EVAL-CONJOIN-CLAUSES-CONS
 (100 50 (:DEFINITION DISJOIN))
 (50 50 (:DEFINITION DISJOIN2))
 (7 7 (:REWRITE GEN-EVAL-DISJOIN-ATOM))
 (5 5 (:REWRITE GEN-EVAL-CONJOIN-ATOM))
 )
(GEN-EVAL-CONJOIN-CLAUSES-WHEN-CONSP
 (24 24 (:REWRITE GEN-EVAL-OF-QUOTE))
 (24 24 (:REWRITE GEN-EVAL-OF-IF-CALL))
 (18 9 (:DEFINITION DISJOIN))
 (9 9 (:REWRITE GEN-EVAL-DISJOIN-ATOM))
 (9 9 (:DEFINITION DISJOIN2))
 )
(GEN-EVAL-CONJOIN-CLAUSES-ATOM
 (1 1 (:REWRITE GEN-EVAL-OF-IF-CALL))
 )
(GEN-EVAL-CONJOIN-CLAUSES-APPEND
 (65 65 (:REWRITE GEN-EVAL-OF-QUOTE))
 (65 65 (:REWRITE GEN-EVAL-OF-IF-CALL))
 (24 12 (:DEFINITION DISJOIN))
 (12 12 (:REWRITE GEN-EVAL-DISJOIN-ATOM))
 (12 12 (:DEFINITION DISJOIN2))
 )
(REPLACE-ALIST-TO-BINDINGS
 (3 3 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE DEFAULT-CAR))
 )
(ALISTP-OF-REPLACE-ALIST-TO-BINDINGS
 (12 11 (:REWRITE DEFAULT-CAR))
 (11 10 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE GEN-EVAL-OF-VARIABLE))
 (1 1 (:REWRITE GEN-EVAL-OF-QUOTE))
 (1 1 (:REWRITE GEN-EVAL-OF-LAMBDA))
 (1 1 (:REWRITE GEN-EVAL-OF-IF-CALL))
 )
(ASSOC-EQUAL-REPLACE-ALIST-TO-BINDINGS
 (35 32 (:REWRITE DEFAULT-CAR))
 (26 23 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE GEN-EVAL-OF-VARIABLE))
 (3 3 (:REWRITE GEN-EVAL-OF-QUOTE))
 (3 3 (:REWRITE GEN-EVAL-OF-LAMBDA))
 (3 3 (:REWRITE GEN-EVAL-OF-IF-CALL))
 )
(ASSOC-IN-REPLACE-ALIST-TO-BINDINGS
 (106 19 (:DEFINITION MEMBER-EQUAL))
 (21 21 (:REWRITE GEN-EVAL-OF-QUOTE))
 (21 21 (:REWRITE GEN-EVAL-OF-LAMBDA))
 (21 21 (:REWRITE GEN-EVAL-OF-IF-CALL))
 )
(MEMBER-OF-UNION
 (165 160 (:REWRITE DEFAULT-CAR))
 (131 127 (:REWRITE DEFAULT-CDR))
 (64 64 (:TYPE-PRESCRIPTION UNION-EQUAL))
 )
(INTERSECTP-OF-UNION
 (99 99 (:REWRITE DEFAULT-CAR))
 (90 10 (:DEFINITION UNION-EQUAL))
 (84 84 (:REWRITE DEFAULT-CDR))
 )
(INTERSECTP-EQUAL-OF-COMPONENTS-OF-SIMPLE-TERM-VARS-1
 (15 3 (:DEFINITION MEMBER-EQUAL))
 (13 1 (:DEFINITION UNION-EQUAL))
 (8 8 (:REWRITE DEFAULT-CDR))
 (8 8 (:REWRITE DEFAULT-CAR))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (2 2 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 )
(INTERSECTP-EQUAL-OF-COMPONENTS-OF-SIMPLE-TERM-VARS-2
 (13 1 (:DEFINITION UNION-EQUAL))
 (10 2 (:DEFINITION MEMBER-EQUAL))
 (6 6 (:REWRITE DEFAULT-CDR))
 (6 6 (:REWRITE DEFAULT-CAR))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (2 2 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (2 2 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 )
(INTERSECTP-EQUAL-OF-COMPONENTS-OF-SIMPLE-TERM-VARS-3
 (27 2 (:REWRITE INTERSECTP-EQUAL-OF-COMPONENTS-OF-SIMPLE-TERM-VARS-2))
 (15 2 (:DEFINITION MEMBER-EQUAL))
 (6 6 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (6 6 (:REWRITE DEFAULT-CDR))
 (6 6 (:REWRITE DEFAULT-CAR))
 (4 4 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 )
(SIMPLE-TERM-VARS-OF-VARIABLE)
(INTERSECTP-EQUAL-WITH-SINGLETON
 (40 40 (:REWRITE DEFAULT-CAR))
 (18 18 (:REWRITE DEFAULT-CDR))
 )
(ASSOC-EQUAL-OF-APPEND
 (124 112 (:REWRITE DEFAULT-CAR))
 (42 21 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (40 34 (:REWRITE DEFAULT-CDR))
 (21 21 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (21 21 (:TYPE-PRESCRIPTION BINARY-APPEND))
 )
(SYMBOLP-ASSOC-EQUAL
 (36 33 (:REWRITE DEFAULT-CAR))
 (28 25 (:REWRITE DEFAULT-CDR))
 )
(NONNIL-VALUES-IMPLIES-CDR
 (57 54 (:REWRITE DEFAULT-CAR))
 (32 29 (:REWRITE DEFAULT-CDR))
 )
(REPLACE-SUBTERMS
 (447 3 (:DEFINITION PSEUDO-TERMP))
 (144 23 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (107 11 (:REWRITE PSEUDO-TERMP-CAR))
 (80 5 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (72 72 (:REWRITE DEFAULT-CAR))
 (67 67 (:REWRITE DEFAULT-CDR))
 (60 12 (:DEFINITION LEN))
 (50 50 (:TYPE-PRESCRIPTION LEN))
 (45 45 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (43 20 (:REWRITE PSEUDO-TERMP-OPENER))
 (42 42 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (24 12 (:REWRITE DEFAULT-+-2))
 (18 18 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (18 4 (:DEFINITION SYMBOL-LISTP))
 (14 4 (:DEFINITION TRUE-LISTP))
 (12 12 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (12 12 (:REWRITE DEFAULT-+-1))
 (8 8 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (5 1 (:DEFINITION ASSOC-EQUAL))
 )
(REPLACE-SUBTERMS-FLAG
 (4 2 (:TYPE-PRESCRIPTION RETURN-LAST))
 (2 2 (:TYPE-PRESCRIPTION THROW-NONEXEC-ERROR))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(REPLACE-SUBTERMS-FLAG-EQUIVALENCES)
(FLAG-LEMMA-FOR-RETURN-TYPE-OF-REPLACE-SUBTERMS.XX
 (15915 679 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (5737 5727 (:REWRITE DEFAULT-CDR))
 (5605 5594 (:REWRITE DEFAULT-CAR))
 (2768 1384 (:REWRITE DEFAULT-+-2))
 (2387 2387 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (1384 1384 (:REWRITE DEFAULT-+-1))
 (1381 1381 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (69 69 (:REWRITE PSEUDO-TERM-VAL-ALISTP-OF-ATOM))
 )
(RETURN-TYPE-OF-REPLACE-SUBTERMS.XX)
(RETURN-TYPE-OF-REPLACE-SUBTERMS-LIST.XX)
(FLAG-LEMMA-FOR-REPLACE-SUBTERMS-IDENTITY
 (388 386 (:REWRITE DEFAULT-CDR))
 (373 355 (:REWRITE DEFAULT-CAR))
 (320 80 (:DEFINITION STRIP-CDRS))
 (166 16 (:DEFINITION INTERSECTP-EQUAL))
 (110 22 (:DEFINITION BINARY-APPEND))
 (65 36 (:REWRITE GEN-EVAL-OF-IF-CALL))
 (63 34 (:REWRITE GEN-EVAL-OF-LAMBDA))
 (44 44 (:TYPE-PRESCRIPTION REPLACE-ALIST-TO-BINDINGS))
 (26 26 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (14 14 (:TYPE-PRESCRIPTION KWOTE-LST))
 (8 2 (:DEFINITION KWOTE-LST))
 (2 2 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (2 2 (:DEFINITION KWOTE))
 )
(REPLACE-SUBTERMS-IDENTITY)
(REPLACE-SUBTERMS-LIST-IDENTITY)
(DISJOIN-REPLACE-SUBTERMS-LIST
 (544 19 (:DEFINITION INTERSECTP-EQUAL))
 (494 38 (:DEFINITION UNION-EQUAL))
 (366 364 (:REWRITE DEFAULT-CDR))
 (348 12 (:REWRITE INTERSECTP-EQUAL-OF-COMPONENTS-OF-SIMPLE-TERM-VARS-1))
 (328 325 (:REWRITE DEFAULT-CAR))
 (144 36 (:DEFINITION STRIP-CDRS))
 (106 106 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (98 98 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (70 14 (:DEFINITION BINARY-APPEND))
 (38 38 (:REWRITE SIMPLE-TERM-VARS-OF-VARIABLE))
 (31 31 (:REWRITE GEN-EVAL-OF-LAMBDA))
 (31 31 (:REWRITE GEN-EVAL-OF-IF-CALL))
 (30 30 (:REWRITE GEN-EVAL-OF-VARIABLE))
 (30 3 (:DEFINITION REPLACE-SUBTERMS))
 (28 28 (:TYPE-PRESCRIPTION REPLACE-ALIST-TO-BINDINGS))
 (24 13 (:REWRITE INTERSECTP-EQUAL-OF-COMPONENTS-OF-SIMPLE-TERM-VARS-3))
 (15 3 (:DEFINITION ASSOC-EQUAL))
 )
(CONSP-REPLACE-SUBTERMS-LIST
 (18 18 (:REWRITE DEFAULT-CDR))
 (14 14 (:REWRITE DEFAULT-CAR))
 (10 1 (:DEFINITION REPLACE-SUBTERMS))
 (5 1 (:DEFINITION ASSOC-EQUAL))
 )
(SIMPLE-GENERALIZE-CP)
(ALIST-FOR-SIMPLE-GENERALIZE-CP)
(SIMPLE-GENERALIZE-CP-CORRECT
 (54 2 (:DEFINITION PSEUDO-TERM-LISTP))
 (42 42 (:REWRITE DEFAULT-CDR))
 (39 9 (:DEFINITION MEMBER-EQUAL))
 (35 35 (:REWRITE DEFAULT-CAR))
 (33 3 (:DEFINITION INTERSECTP-EQUAL))
 (30 3 (:DEFINITION NO-DUPLICATESP-EQUAL))
 (24 6 (:DEFINITION STRIP-CDRS))
 (15 5 (:DEFINITION ALISTP))
 (15 3 (:DEFINITION SYMBOL-LISTP))
 (14 2 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (12 2 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (12 2 (:REWRITE PSEUDO-TERMP-CAR))
 (10 2 (:DEFINITION BINARY-APPEND))
 (8 8 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (8 8 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (8 8 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (8 8 (:REWRITE GEN-EVAL-OF-VARIABLE))
 (8 8 (:REWRITE GEN-EVAL-OF-QUOTE))
 (8 8 (:REWRITE GEN-EVAL-OF-LAMBDA))
 (8 8 (:REWRITE GEN-EVAL-OF-IF-CALL))
 (7 7 (:REWRITE GEN-EVAL-DISJOIN-ATOM))
 (6 6 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (6 4 (:REWRITE PSEUDO-TERMP-OPENER))
 (6 1 (:REWRITE GEN-EVAL-CONJOIN-CLAUSES-ATOM))
 (4 4 (:TYPE-PRESCRIPTION REPLACE-ALIST-TO-BINDINGS))
 (4 4 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (3 3 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 )
(CHAR-OF-DIGIT
 (9 9 (:REWRITE DEFAULT-<-2))
 (9 9 (:REWRITE DEFAULT-<-1))
 (9 9 (:META CANCEL_PLUS-LESSP-CORRECT))
 (3 3 (:REWRITE DEFAULT-+-2))
 (3 3 (:REWRITE DEFAULT-+-1))
 (1 1 (:REWRITE NATP-RW))
 )
(CHARACTERP-OF-CHAR-OF-DIGIT)
(CHAR-OF-DIGIT-UNIQUE
 (76 38 (:REWRITE DEFAULT-<-1))
 (62 31 (:REWRITE DEFAULT-+-2))
 (38 38 (:REWRITE DEFAULT-<-2))
 (38 38 (:META CANCEL_PLUS-LESSP-CORRECT))
 (31 31 (:REWRITE DEFAULT-+-1))
 (20 10 (:REWRITE DEFAULT-CHAR-CODE))
 (13 13 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (4 4 (:REWRITE EQUAL-CONSTANT-+))
 )
(CHAR-OF-DIGIT-EQUALS-CONST
 (84 5 (:REWRITE DEFAULT-CODE-CHAR))
 (28 15 (:REWRITE DEFAULT-<-1))
 (17 11 (:REWRITE DEFAULT-+-2))
 (15 15 (:REWRITE DEFAULT-<-2))
 (15 15 (:META CANCEL_PLUS-LESSP-CORRECT))
 (14 11 (:REWRITE DEFAULT-CHAR-CODE))
 (11 11 (:REWRITE DEFAULT-+-1))
 (6 6 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (6 6 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (3 3 (:REWRITE EQUAL-CONSTANT-+))
 )
(CHAR-OF-DIGIT-MEMBERS
 (4 4 (:TYPE-PRESCRIPTION |x < y  =>  0 < -x+y|))
 )
(CHAR-OF-DIGIT-MEMBERS-N
 (864 178 (:REWRITE DEFAULT-CODE-CHAR))
 (258 258 (:META CANCEL_PLUS-LESSP-CORRECT))
 (242 242 (:REWRITE DEFAULT-<-2))
 (242 242 (:REWRITE DEFAULT-<-1))
 (233 217 (:REWRITE DEFAULT-+-2))
 (217 217 (:REWRITE DEFAULT-+-1))
 (146 146 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (146 146 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(CHAR-OF-DIGIT-MEMBER-OF-DIGIT-CHARS)
(NAT-TO-CHARLIST1
 (116 116 (:TYPE-PRESCRIPTION FLOOR-TYPE-3 . 2))
 (116 116 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 2))
 (116 116 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 1))
 (98 73 (:REWRITE DEFAULT-*-2))
 (93 73 (:REWRITE DEFAULT-*-1))
 (68 13 (:REWRITE FLOOR-=-X/Y . 3))
 (68 13 (:REWRITE FLOOR-=-X/Y . 2))
 (52 13 (:REWRITE FLOOR-TYPE-3 . 2))
 (47 47 (:TYPE-PRESCRIPTION MOD-TYPE . 3))
 (47 47 (:TYPE-PRESCRIPTION MOD-TYPE . 2))
 (47 47 (:TYPE-PRESCRIPTION MOD-TYPE . 1))
 (32 7 (:REWRITE DEFAULT-+-2))
 (31 25 (:REWRITE DEFAULT-<-1))
 (30 25 (:REWRITE DEFAULT-<-2))
 (30 5 (:REWRITE DEFAULT-UNARY-MINUS))
 (26 26 (:META CANCEL_PLUS-LESSP-CORRECT))
 (24 4 (:REWRITE MOD-=-0 . 2))
 (24 1 (:REWRITE <-+-NEGATIVE-0-2))
 (16 4 (:REWRITE MOD-X-Y-=-X-FOR-RATIONALS . 2))
 (13 13 (:REWRITE FLOOR-TYPE-4 . 3))
 (13 13 (:REWRITE FLOOR-TYPE-4 . 2))
 (13 13 (:REWRITE FLOOR-TYPE-3 . 3))
 (7 7 (:REWRITE DEFAULT-+-1))
 (6 6 (:REWRITE ZP-OPEN))
 (6 1 (:LINEAR MOD-TYPE . 2))
 (4 4 (:REWRITE MOD-X-Y-=-X-FOR-RATIONALS . 3))
 (4 4 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 3))
 (4 4 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 2))
 (3 3 (:LINEAR FLOOR-TYPE-2 . 2))
 (3 3 (:LINEAR FLOOR-TYPE-1 . 2))
 (3 3 (:LINEAR FLOOR-TYPE-1 . 1))
 (1 1 (:LINEAR MOD-TYPE . 3))
 (1 1 (:LINEAR MOD-TYPE . 1))
 )
(CHARACTER-LISTP-OF-NAT-TO-CHARLIST1
 (17 12 (:REWRITE DEFAULT-*-2))
 (17 12 (:REWRITE DEFAULT-*-1))
 (12 2 (:REWRITE FLOOR-=-X/Y . 3))
 (12 2 (:REWRITE FLOOR-=-X/Y . 2))
 (9 8 (:REWRITE DEFAULT-CDR))
 (9 8 (:REWRITE DEFAULT-CAR))
 (8 2 (:REWRITE FLOOR-TYPE-3 . 2))
 (6 6 (:REWRITE ZP-OPEN))
 (6 1 (:REWRITE MOD-=-0 . 2))
 (6 1 (:REWRITE DEFAULT-UNARY-MINUS))
 (6 1 (:REWRITE DEFAULT-+-2))
 (4 4 (:TYPE-PRESCRIPTION FLOOR-TYPE-3 . 2))
 (4 4 (:TYPE-PRESCRIPTION FLOOR-TYPE-3 . 1))
 (4 4 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 2))
 (4 4 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 1))
 (4 4 (:TYPE-PRESCRIPTION FLOOR))
 (4 1 (:REWRITE MOD-X-Y-=-X-FOR-RATIONALS . 2))
 (3 3 (:REWRITE DEFAULT-<-2))
 (3 3 (:REWRITE DEFAULT-<-1))
 (3 3 (:META CANCEL_PLUS-LESSP-CORRECT))
 (2 2 (:REWRITE FLOOR-TYPE-4 . 3))
 (2 2 (:REWRITE FLOOR-TYPE-4 . 2))
 (2 2 (:REWRITE FLOOR-TYPE-3 . 3))
 (1 1 (:REWRITE MOD-X-Y-=-X-FOR-RATIONALS . 3))
 (1 1 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 3))
 (1 1 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 2))
 (1 1 (:REWRITE DEFAULT-+-1))
 )
(N2CU-IND
 (11 11 (:TYPE-PRESCRIPTION FLOOR-TYPE-3 . 2))
 (11 11 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 2))
 (11 11 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 1))
 (6 2 (:REWRITE COMMUTATIVITY-OF-*))
 (6 1 (:REWRITE FLOOR-=-X/Y . 3))
 (6 1 (:REWRITE FLOOR-=-X/Y . 2))
 (4 4 (:REWRITE DEFAULT-<-2))
 (4 4 (:REWRITE DEFAULT-<-1))
 (4 4 (:REWRITE DEFAULT-*-2))
 (4 4 (:REWRITE DEFAULT-*-1))
 (4 4 (:META CANCEL_PLUS-LESSP-CORRECT))
 (4 1 (:REWRITE FLOOR-TYPE-3 . 2))
 (2 2 (:REWRITE ZP-OPEN))
 (1 1 (:REWRITE FLOOR-TYPE-4 . 3))
 (1 1 (:REWRITE FLOOR-TYPE-4 . 2))
 (1 1 (:REWRITE FLOOR-TYPE-3 . 3))
 )
(NAT-TO-CHARLIST1-UNIQUE
 (1005 790 (:REWRITE DEFAULT-*-2))
 (942 22 (:REWRITE MOD-X-Y-=-X-FOR-RATIONALS . 3))
 (935 790 (:REWRITE DEFAULT-*-1))
 (931 9 (:REWRITE FLOOR-=-X/Y . 4))
 (860 150 (:REWRITE FLOOR-=-X/Y . 3))
 (860 150 (:REWRITE FLOOR-=-X/Y . 2))
 (818 818 (:TYPE-PRESCRIPTION FLOOR-TYPE-3 . 2))
 (818 818 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 2))
 (818 818 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 1))
 (580 37 (:LINEAR FLOOR-TYPE-2 . 1))
 (479 4 (:REWRITE EQUAL-*-/-1))
 (408 150 (:REWRITE FLOOR-TYPE-3 . 2))
 (326 22 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 2))
 (326 21 (:REWRITE MOD-=-0 . 2))
 (320 16 (:REWRITE FLOOR-FLOOR-INTEGER))
 (304 220 (:REWRITE DEFAULT-<-1))
 (260 220 (:REWRITE DEFAULT-<-2))
 (260 28 (:REWRITE ZP-OPEN))
 (226 226 (:META CANCEL_PLUS-LESSP-CORRECT))
 (224 16 (:REWRITE FLOOR-TYPE-2))
 (203 58 (:REWRITE DEFAULT-+-2))
 (174 29 (:REWRITE DEFAULT-UNARY-MINUS))
 (150 150 (:REWRITE FLOOR-TYPE-4 . 3))
 (150 150 (:REWRITE FLOOR-TYPE-4 . 2))
 (150 150 (:REWRITE FLOOR-TYPE-3 . 3))
 (98 58 (:REWRITE DEFAULT-+-1))
 (62 22 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 3))
 (37 37 (:LINEAR FLOOR-TYPE-2 . 2))
 (34 34 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (34 34 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (29 29 (:LINEAR FLOOR-TYPE-1 . 2))
 (29 29 (:LINEAR FLOOR-TYPE-1 . 1))
 (8 4 (:REWRITE DEFAULT-CDR))
 (8 4 (:REWRITE DEFAULT-CAR))
 (4 4 (:REWRITE CHAR-OF-DIGIT-EQUALS-CONST))
 (2 2 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 )
(NAT-TO-CHARLIST1-INTERSECT-DIGIT-CHARS
 (3459 33 (:DEFINITION MEMBER-EQUAL))
 (745 530 (:REWRITE DEFAULT-*-2))
 (745 530 (:REWRITE DEFAULT-*-1))
 (530 90 (:REWRITE FLOOR-=-X/Y . 3))
 (530 90 (:REWRITE FLOOR-=-X/Y . 2))
 (360 90 (:REWRITE FLOOR-TYPE-3 . 2))
 (259 44 (:REWRITE DEFAULT-+-2))
 (258 43 (:REWRITE MOD-=-0 . 2))
 (258 43 (:REWRITE DEFAULT-UNARY-MINUS))
 (197 197 (:TYPE-PRESCRIPTION FLOOR-TYPE-3 . 2))
 (197 197 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 2))
 (197 197 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 1))
 (140 140 (:REWRITE DEFAULT-<-2))
 (140 140 (:REWRITE DEFAULT-<-1))
 (140 140 (:META CANCEL_PLUS-LESSP-CORRECT))
 (90 90 (:REWRITE FLOOR-TYPE-4 . 3))
 (90 90 (:REWRITE FLOOR-TYPE-4 . 2))
 (90 90 (:REWRITE FLOOR-TYPE-3 . 3))
 (67 65 (:REWRITE DEFAULT-CAR))
 (63 63 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (63 63 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (44 44 (:REWRITE MOD-X-Y-=-X-FOR-RATIONALS . 3))
 (44 44 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 3))
 (44 44 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 2))
 (44 44 (:REWRITE DEFAULT-+-1))
 (3 3 (:REWRITE DEFAULT-CDR))
 (2 2 (:LINEAR FLOOR-TYPE-2 . 2))
 (2 2 (:LINEAR FLOOR-TYPE-1 . 2))
 (2 2 (:LINEAR FLOOR-TYPE-1 . 1))
 )
(NAT-TO-CHARLIST1-NOT-SINGLE-0
 (566 476 (:REWRITE DEFAULT-*-2))
 (551 476 (:REWRITE DEFAULT-*-1))
 (486 14 (:REWRITE MOD-X-Y-=-X-FOR-RATIONALS . 3))
 (390 65 (:REWRITE FLOOR-=-X/Y . 3))
 (390 65 (:REWRITE FLOOR-=-X/Y . 2))
 (325 325 (:TYPE-PRESCRIPTION FLOOR-TYPE-3 . 2))
 (325 325 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 2))
 (325 325 (:TYPE-PRESCRIPTION FLOOR-TYPE-1 . 1))
 (282 178 (:REWRITE DEFAULT-<-1))
 (280 16 (:LINEAR FLOOR-TYPE-2 . 1))
 (233 163 (:REWRITE DEFAULT-+-2))
 (198 178 (:REWRITE DEFAULT-<-2))
 (183 163 (:REWRITE DEFAULT-+-1))
 (166 14 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 2))
 (166 11 (:REWRITE MOD-=-0 . 2))
 (84 14 (:REWRITE DEFAULT-UNARY-MINUS))
 (66 66 (:REWRITE FLOOR-TYPE-4 . 3))
 (66 66 (:REWRITE FLOOR-TYPE-4 . 2))
 (66 66 (:REWRITE FLOOR-TYPE-3 . 3))
 (36 4 (:REWRITE <-+-NEGATIVE-0-2))
 (34 14 (:REWRITE MOD-X-Y-=-X+Y-FOR-RATIONALS . 3))
 (31 31 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (16 16 (:LINEAR FLOOR-TYPE-2 . 2))
 (12 12 (:LINEAR FLOOR-TYPE-1 . 2))
 (12 12 (:LINEAR FLOOR-TYPE-1 . 1))
 (5 5 (:REWRITE FOLD-CONSTS-IN-+))
 (3 3 (:TYPE-PRESCRIPTION MOD-TYPE . 3))
 (3 3 (:TYPE-PRESCRIPTION MOD-TYPE . 2))
 (3 3 (:TYPE-PRESCRIPTION MOD-TYPE . 1))
 (3 2 (:REWRITE DEFAULT-CDR))
 (3 2 (:REWRITE DEFAULT-CAR))
 (2 2 (:REWRITE NATP-RW))
 (2 2 (:LINEAR X*Y>1-POSITIVE))
 )
(NAT-TO-CHARLIST)
(CHARACTER-LISTP-OF-NAT-TO-CHARLIST)
(NAT-TO-CHARLIST-UNIQUE
 (4 4 (:REWRITE ZP-OPEN))
 (4 4 (:REWRITE DEFAULT-<-2))
 (4 4 (:REWRITE DEFAULT-<-1))
 (4 4 (:META CANCEL_PLUS-LESSP-CORRECT))
 (2 2 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (2 2 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(RCU-IND
 (1260 607 (:REWRITE DEFAULT-+-2))
 (860 607 (:REWRITE DEFAULT-+-1))
 (630 126 (:DEFINITION INTEGER-ABS))
 (504 63 (:DEFINITION LENGTH))
 (315 63 (:DEFINITION LEN))
 (162 138 (:REWRITE DEFAULT-<-2))
 (154 138 (:REWRITE DEFAULT-<-1))
 (126 126 (:REWRITE DEFAULT-UNARY-MINUS))
 (89 89 (:REWRITE DEFAULT-CAR))
 (63 63 (:TYPE-PRESCRIPTION LEN))
 (63 63 (:REWRITE NUMERATOR-WHEN-INTEGERP))
 (63 63 (:REWRITE INTEGERP==>DENOMINATOR=1))
 (63 63 (:REWRITE DEFAULT-REALPART))
 (63 63 (:REWRITE DEFAULT-NUMERATOR))
 (63 63 (:REWRITE DEFAULT-IMAGPART))
 (63 63 (:REWRITE DEFAULT-DENOMINATOR))
 (63 63 (:REWRITE DEFAULT-COERCE-2))
 (63 63 (:REWRITE DEFAULT-COERCE-1))
 )
(LEN-REVAPPEND
 (54 26 (:REWRITE DEFAULT-+-2))
 (34 26 (:REWRITE DEFAULT-+-1))
 (21 15 (:REWRITE DEFAULT-CDR))
 (4 4 (:REWRITE FOLD-CONSTS-IN-+))
 (3 3 (:REWRITE EQUAL-CONSTANT-+))
 (3 3 (:REWRITE DEFAULT-CAR))
 (3 3 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (3 3 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(REVAPPEND-CHARLISTS-UNIQUE
 (341 329 (:REWRITE DEFAULT-CDR))
 (263 251 (:REWRITE DEFAULT-CAR))
 (254 125 (:REWRITE DEFAULT-+-2))
 (138 125 (:REWRITE DEFAULT-+-1))
 (58 58 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (2 2 (:REWRITE EQUAL-CONSTANT-+))
 )
(REVERSE-CHARLISTS-UNIQUE
 (6 2 (:DEFINITION REVAPPEND))
 (6 2 (:DEFINITION CHARACTER-LISTP))
 (4 4 (:REWRITE DEFAULT-CDR))
 (4 4 (:REWRITE DEFAULT-CAR))
 (3 3 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (3 3 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(CHARACTER-LISTP-REVERSE
 (3 3 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE DEFAULT-CAR))
 (3 1 (:DEFINITION REVAPPEND))
 )
(INTERSECTP-REVAPPEND1
 (62 10 (:DEFINITION MEMBER-EQUAL))
 (29 23 (:REWRITE DEFAULT-CAR))
 (28 22 (:REWRITE DEFAULT-CDR))
 (10 10 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (10 10 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(INTERSECTP-REVAPPEND
 (106 97 (:REWRITE DEFAULT-CAR))
 (97 88 (:REWRITE DEFAULT-CDR))
 (49 49 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (49 49 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(INTERSECTP-REVERSE
 (30 6 (:DEFINITION MEMBER-EQUAL))
 (16 16 (:REWRITE DEFAULT-CDR))
 (16 16 (:REWRITE DEFAULT-CAR))
 (14 2 (:REWRITE DEFAULT-COERCE-3))
 (12 4 (:DEFINITION REVAPPEND))
 (7 7 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (7 7 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (4 4 (:REWRITE DEFAULT-COERCE-2))
 (2 2 (:REWRITE DEFAULT-COERCE-1))
 )
(INTERSECTP-APPEND
 (85 76 (:REWRITE DEFAULT-CAR))
 (70 64 (:REWRITE DEFAULT-CDR))
 (48 24 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (37 37 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (37 37 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (24 24 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (24 24 (:TYPE-PRESCRIPTION BINARY-APPEND))
 )
(COERCE-UNIQUE-1
 (8 8 (:REWRITE DEFAULT-COERCE-2))
 (5 5 (:REWRITE DEFAULT-COERCE-3))
 (4 4 (:REWRITE DEFAULT-CDR))
 (4 4 (:REWRITE DEFAULT-CAR))
 (4 4 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (4 4 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (3 3 (:REWRITE DEFAULT-COERCE-1))
 )
(COERCE-UNIQUE-2
 (8 8 (:REWRITE DEFAULT-COERCE-2))
 (5 5 (:REWRITE DEFAULT-COERCE-1))
 (4 4 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (4 4 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (3 3 (:REWRITE DEFAULT-COERCE-3))
 )
(NAT-TO-STR)
(STRINGP-OF-NAT-TO-STR
 (14 2 (:REWRITE DEFAULT-COERCE-3))
 (5 1 (:DEFINITION REVAPPEND))
 (3 3 (:REWRITE DEFAULT-COERCE-2))
 (2 1 (:REWRITE DEFAULT-COERCE-1))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(NAT-TO-STR-UNIQUE
 (28 4 (:REWRITE DEFAULT-COERCE-3))
 (10 2 (:DEFINITION REVAPPEND))
 (6 6 (:REWRITE DEFAULT-COERCE-2))
 (4 4 (:REWRITE DEFAULT-<-2))
 (4 4 (:REWRITE DEFAULT-<-1))
 (4 4 (:META CANCEL_PLUS-LESSP-CORRECT))
 (4 2 (:REWRITE DEFAULT-COERCE-1))
 (3 3 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (3 3 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 2 (:REWRITE DEFAULT-CAR))
 )
(NAT-TO-STR-COERCE-INTERSECTP
 (722 2 (:DEFINITION INTERSECTP-EQUAL))
 (712 22 (:DEFINITION MEMBER-EQUAL))
 (184 23 (:DEFINITION CHARACTER-LISTP))
 (124 43 (:REWRITE DEFAULT-COERCE-3))
 (88 43 (:REWRITE DEFAULT-COERCE-1))
 (86 86 (:REWRITE DEFAULT-COERCE-2))
 (66 66 (:REWRITE DEFAULT-CAR))
 (42 42 (:REWRITE ZP-OPEN))
 (42 42 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (42 42 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (26 26 (:REWRITE DEFAULT-CDR))
 (8 4 (:TYPE-PRESCRIPTION TRUE-LISTP-REVAPPEND-TYPE-PRESCRIPTION))
 (5 1 (:DEFINITION REVAPPEND))
 (4 4 (:TYPE-PRESCRIPTION REVAPPEND))
 )
(SYMBOL-N)
(APPEND-UNIQUE
 (636 318 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (318 318 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (318 318 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (18 12 (:REWRITE DEFAULT-CAR))
 (16 10 (:REWRITE DEFAULT-CDR))
 (10 10 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (10 10 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(INTERN-IN-PACKAGE-OF-SYMBOL-UNIQUE
 (36 6 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (12 12 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (12 6 (:REWRITE DEFAULT-PKG-IMPORTS))
 (8 4 (:REWRITE DEFAULT-SYMBOL-NAME))
 (6 6 (:TYPE-PRESCRIPTION STRINGP-SYMBOL-PACKAGE-NAME))
 (6 6 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (6 6 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (5 5 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (5 5 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(SYMBOL-N-UNIQUE-N
 (90 12 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (68 8 (:REWRITE DEFAULT-COERCE-3))
 (48 12 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (38 14 (:REWRITE DEFAULT-COERCE-1))
 (24 24 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (22 22 (:REWRITE DEFAULT-COERCE-2))
 (12 6 (:REWRITE DEFAULT-PKG-IMPORTS))
 (6 6 (:TYPE-PRESCRIPTION STRINGP-SYMBOL-PACKAGE-NAME))
 (6 6 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (6 6 (:REWRITE DEFAULT-CDR))
 (6 6 (:REWRITE DEFAULT-CAR))
 (2 2 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (2 2 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(COERCE-SYMBOL-N-INTERSECTP-EQUAL
 (1292 2 (:DEFINITION INTERSECTP-EQUAL))
 (1286 22 (:DEFINITION MEMBER-EQUAL))
 (330 44 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (224 23 (:REWRITE DEFAULT-COERCE-3))
 (176 44 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (163 88 (:REWRITE DEFAULT-COERCE-1))
 (111 111 (:REWRITE DEFAULT-COERCE-2))
 (88 88 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (64 64 (:REWRITE DEFAULT-CAR))
 (44 44 (:TYPE-PRESCRIPTION SYMBOLP-INTERN-IN-PACKAGE-OF-SYMBOL))
 (44 22 (:REWRITE DEFAULT-PKG-IMPORTS))
 (42 42 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (42 42 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (24 24 (:REWRITE DEFAULT-CDR))
 (22 22 (:TYPE-PRESCRIPTION STRINGP-SYMBOL-PACKAGE-NAME))
 (22 22 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 )
(SYMBOL-N-NONNIL
 (1156 1 (:DEFINITION INTERSECTP-EQUAL))
 (1153 11 (:DEFINITION MEMBER-EQUAL))
 (345 46 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (238 25 (:REWRITE DEFAULT-COERCE-3))
 (184 46 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (144 69 (:REWRITE DEFAULT-COERCE-1))
 (94 94 (:REWRITE DEFAULT-COERCE-2))
 (92 92 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (46 23 (:REWRITE DEFAULT-PKG-IMPORTS))
 (44 44 (:REWRITE DEFAULT-CAR))
 (24 24 (:REWRITE DEFAULT-CDR))
 (23 23 (:TYPE-PRESCRIPTION STRINGP-SYMBOL-PACKAGE-NAME))
 (23 23 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (21 21 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (21 21 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(NFIX-WHEN-NATP
 (1 1 (:REWRITE NATP-RW))
 (1 1 (:REWRITE DEFAULT-<-2))
 (1 1 (:REWRITE DEFAULT-<-1))
 (1 1 (:META CANCEL_PLUS-LESSP-CORRECT))
 )
(NEW-SYMBOL1-MEASURE
 (326 169 (:REWRITE DEFAULT-+-2))
 (323 317 (:REWRITE DEFAULT-CDR))
 (205 205 (:REWRITE DEFAULT-CAR))
 (169 169 (:REWRITE DEFAULT-+-1))
 (161 88 (:REWRITE DEFAULT-<-1))
 (136 88 (:REWRITE DEFAULT-<-2))
 (112 112 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (112 112 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (13 13 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 (1 1 (:TYPE-PRESCRIPTION NATP))
 )
(MEMBER-REMOVE
 (119 114 (:REWRITE DEFAULT-CAR))
 (84 80 (:REWRITE DEFAULT-CDR))
 (69 69 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (69 69 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(REMOVE-PREV-IND
 (1002 978 (:REWRITE DEFAULT-CDR))
 (743 385 (:REWRITE DEFAULT-+-2))
 (716 704 (:REWRITE DEFAULT-CAR))
 (385 385 (:REWRITE DEFAULT-+-1))
 (374 374 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (374 374 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (355 196 (:REWRITE DEFAULT-<-1))
 (307 196 (:REWRITE DEFAULT-<-2))
 (27 27 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 )
(REMOVE-COMMUTE
 (111 106 (:REWRITE DEFAULT-CAR))
 (95 91 (:REWRITE DEFAULT-CDR))
 (53 53 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (53 53 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(NEW-SYMBOL1-MEASURE-OF-REMOVE-PREV
 (320 32 (:DEFINITION REMOVE-EQUAL))
 (76 76 (:REWRITE DEFAULT-CDR))
 (76 76 (:REWRITE DEFAULT-CAR))
 (74 60 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (60 60 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (42 32 (:REWRITE DEFAULT-+-2))
 (41 41 (:TYPE-PRESCRIPTION NATP))
 (32 32 (:TYPE-PRESCRIPTION REMOVE-EQUAL))
 (32 32 (:REWRITE DEFAULT-+-1))
 (18 6 (:REWRITE FOLD-CONSTS-IN-+))
 (6 3 (:REWRITE DEFAULT-<-1))
 (5 3 (:REWRITE DEFAULT-<-2))
 (4 4 (:REWRITE EQUAL-CONSTANT-+))
 (3 3 (:TYPE-PRESCRIPTION REMOVE-PREV-IND))
 )
(NEW-SYMBOL1-MEASURE-DECR-WITH-INCREASING-N
 (36 4 (:DEFINITION REMOVE-EQUAL))
 (22 11 (:REWRITE DEFAULT-+-2))
 (13 13 (:REWRITE DEFAULT-CDR))
 (13 13 (:REWRITE DEFAULT-CAR))
 (11 11 (:REWRITE DEFAULT-+-1))
 (9 9 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (9 9 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (8 2 (:REWRITE FOLD-CONSTS-IN-+))
 (5 5 (:TYPE-PRESCRIPTION NATP))
 )
(NEW-SYMBOL1
 (35 5 (:DEFINITION MEMBER-EQUAL))
 (7 7 (:REWRITE DEFAULT-CDR))
 (7 7 (:REWRITE DEFAULT-CAR))
 (5 5 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (5 5 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (5 3 (:REWRITE DEFAULT-+-2))
 (3 3 (:REWRITE DEFAULT-+-1))
 (2 1 (:REWRITE DEFAULT-<-2))
 (2 1 (:REWRITE DEFAULT-<-1))
 (1 1 (:REWRITE NATP-RW))
 (1 1 (:META CANCEL_PLUS-LESSP-CORRECT))
 )
(NATP-OF-NEW-SYMBOL1.NN
 (36 36 (:REWRITE NATP-RW))
 (29 29 (:REWRITE DEFAULT-CDR))
 (29 29 (:REWRITE DEFAULT-CAR))
 (29 29 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (29 29 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (26 19 (:REWRITE DEFAULT-<-1))
 (19 19 (:REWRITE DEFAULT-<-2))
 (19 19 (:META CANCEL_PLUS-LESSP-CORRECT))
 (7 7 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 (4 4 (:REWRITE DEFAULT-+-2))
 (4 4 (:REWRITE DEFAULT-+-1))
 )
(SYMBOLP-OF-NEW-SYMBOL1.NEW
 (29 29 (:REWRITE DEFAULT-CDR))
 (29 29 (:REWRITE DEFAULT-CAR))
 (29 29 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (29 29 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (26 19 (:REWRITE DEFAULT-<-1))
 (19 19 (:REWRITE DEFAULT-<-2))
 (19 19 (:META CANCEL_PLUS-LESSP-CORRECT))
 (7 7 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 (4 4 (:REWRITE DEFAULT-+-2))
 (4 4 (:REWRITE DEFAULT-+-1))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 )
(NEW-SYMBOL1-RETVAL
 (45 45 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (45 45 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (36 36 (:REWRITE DEFAULT-CDR))
 (36 36 (:REWRITE DEFAULT-CAR))
 (19 19 (:REWRITE DEFAULT-+-2))
 (19 19 (:REWRITE DEFAULT-+-1))
 (16 15 (:REWRITE DEFAULT-<-1))
 (15 15 (:REWRITE DEFAULT-<-2))
 (15 15 (:META CANCEL_PLUS-LESSP-CORRECT))
 (12 4 (:REWRITE FOLD-CONSTS-IN-+))
 (7 7 (:TYPE-PRESCRIPTION NATP))
 (1 1 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 )
(NEW-SYMBOL1-UNIQUE
 (36 36 (:REWRITE DEFAULT-CDR))
 (36 36 (:REWRITE DEFAULT-CAR))
 (36 36 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (36 36 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (11 10 (:REWRITE DEFAULT-<-1))
 (10 10 (:REWRITE DEFAULT-<-2))
 (10 10 (:REWRITE DEFAULT-+-2))
 (10 10 (:REWRITE DEFAULT-+-1))
 (10 10 (:META CANCEL_PLUS-LESSP-CORRECT))
 (6 2 (:REWRITE FOLD-CONSTS-IN-+))
 (5 5 (:TYPE-PRESCRIPTION NATP))
 (1 1 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 )
(NEW-SYMBOL1-IDX-INCR
 (22 15 (:REWRITE DEFAULT-<-1))
 (15 15 (:REWRITE DEFAULT-<-2))
 (15 15 (:REWRITE DEFAULT-+-2))
 (15 15 (:REWRITE DEFAULT-+-1))
 (15 15 (:META CANCEL_PLUS-LESSP-CORRECT))
 (12 12 (:REWRITE DEFAULT-CDR))
 (12 12 (:REWRITE DEFAULT-CAR))
 (12 12 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (12 12 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (9 3 (:REWRITE FOLD-CONSTS-IN-+))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 )
(NEW-SYMBOL)
(RETURN-TYPE-OF-NEW-SYMBOL
 (5 1 (:DEFINITION MEMBER-EQUAL))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 (1 1 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (1 1 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(NEW-SYMBOL-UNIQUE
 (18 2 (:DEFINITION MEMBER-EQUAL))
 (6 6 (:TYPE-PRESCRIPTION SYMBOL-N))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 2 (:REWRITE DEFAULT-CAR))
 (2 2 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (2 2 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(MAKE-N-VARS
 (18 18 (:TYPE-PRESCRIPTION |x < y  =>  0 < -x+y|))
 (5 5 (:REWRITE ZP-OPEN))
 (3 3 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE DEFAULT-CAR))
 (3 2 (:REWRITE DEFAULT-+-2))
 (2 2 (:REWRITE NATP-RW))
 (2 2 (:REWRITE DEFAULT-<-2))
 (2 2 (:REWRITE DEFAULT-<-1))
 (2 2 (:REWRITE DEFAULT-+-1))
 )
(SYMBOL-LISTP-OF-MAKE-N-VARS
 (12 8 (:REWRITE DEFAULT-+-2))
 (11 10 (:REWRITE DEFAULT-CDR))
 (11 10 (:REWRITE DEFAULT-CAR))
 (8 8 (:REWRITE DEFAULT-+-1))
 (7 7 (:REWRITE ZP-OPEN))
 (4 4 (:TYPE-PRESCRIPTION NATP-OF-NEW-SYMBOL1.NN))
 )
(MAKE-N-VARS-LEN
 (64 39 (:REWRITE DEFAULT-+-2))
 (61 61 (:TYPE-PRESCRIPTION |x < y  =>  0 < -x+y|))
 (39 39 (:REWRITE DEFAULT-+-1))
 (37 9 (:REWRITE ZP-OPEN))
 (16 4 (:REWRITE <-0-+-NEGATIVE-1))
 (14 14 (:META CANCEL_PLUS-LESSP-CORRECT))
 (12 12 (:TYPE-PRESCRIPTION NATP-OF-NEW-SYMBOL1.NN))
 (12 4 (:REWRITE FOLD-CONSTS-IN-+))
 (11 10 (:REWRITE DEFAULT-<-1))
 (10 10 (:REWRITE DEFAULT-<-2))
 (9 8 (:REWRITE DEFAULT-CDR))
 (6 6 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (6 6 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (3 3 (:REWRITE EQUAL-CONSTANT-+))
 (2 1 (:REWRITE NFIX-WHEN-NATP))
 (1 1 (:TYPE-PRESCRIPTION NATP))
 (1 1 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 )
(INTERSECTP-EQUAL-CONS-2
 (71 71 (:REWRITE DEFAULT-CAR))
 (41 41 (:REWRITE DEFAULT-CDR))
 (35 35 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (35 35 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(MAKE-N-VARS-NOT-IN-AVOID
 (34 6 (:DEFINITION MEMBER-EQUAL))
 (33 21 (:REWRITE DEFAULT-+-2))
 (29 8 (:REWRITE ZP-OPEN))
 (21 21 (:REWRITE DEFAULT-+-1))
 (13 12 (:REWRITE DEFAULT-CDR))
 (13 12 (:REWRITE DEFAULT-CAR))
 (12 3 (:REWRITE <-0-+-NEGATIVE-1))
 (9 9 (:TYPE-PRESCRIPTION |x < y  =>  0 < -x+y|))
 (9 9 (:TYPE-PRESCRIPTION NATP-OF-NEW-SYMBOL1.NN))
 (9 3 (:REWRITE FOLD-CONSTS-IN-+))
 (6 6 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (6 6 (:META CANCEL_PLUS-LESSP-CORRECT))
 (6 6 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (3 3 (:REWRITE DEFAULT-<-2))
 (3 3 (:REWRITE DEFAULT-<-1))
 (2 2 (:TYPE-PRESCRIPTION SYMBOL-N))
 )
(MAKE-N-VARS-MEMBER-LEMMA
 (211 141 (:REWRITE DEFAULT-+-2))
 (198 37 (:REWRITE ZP-OPEN))
 (141 141 (:REWRITE DEFAULT-+-1))
 (92 23 (:REWRITE <-0-+-NEGATIVE-1))
 (80 80 (:META CANCEL_PLUS-LESSP-CORRECT))
 (69 69 (:TYPE-PRESCRIPTION |x < y  =>  0 < -x+y|))
 (69 23 (:REWRITE FOLD-CONSTS-IN-+))
 (59 57 (:REWRITE DEFAULT-<-2))
 (59 57 (:REWRITE DEFAULT-<-1))
 (31 31 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (31 31 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (31 25 (:REWRITE DEFAULT-CDR))
 (31 25 (:REWRITE DEFAULT-CAR))
 (10 10 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 )
(NOT-MEMBER-MAKE-N-VARS-WHEN-IN-AVOID-LST
 (49 31 (:REWRITE DEFAULT-+-2))
 (47 12 (:REWRITE ZP-OPEN))
 (31 31 (:REWRITE DEFAULT-+-1))
 (20 5 (:REWRITE <-0-+-NEGATIVE-1))
 (15 15 (:TYPE-PRESCRIPTION |x < y  =>  0 < -x+y|))
 (15 5 (:REWRITE FOLD-CONSTS-IN-+))
 (12 12 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (12 12 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (12 11 (:REWRITE DEFAULT-CDR))
 (12 11 (:REWRITE DEFAULT-CAR))
 (10 10 (:META CANCEL_PLUS-LESSP-CORRECT))
 (5 5 (:REWRITE DEFAULT-<-2))
 (5 5 (:REWRITE DEFAULT-<-1))
 )
(MAKE-N-VARS-NO-DUPSP
 (33 21 (:REWRITE DEFAULT-+-2))
 (29 8 (:REWRITE ZP-OPEN))
 (21 21 (:REWRITE DEFAULT-+-1))
 (19 17 (:REWRITE DEFAULT-CDR))
 (13 12 (:REWRITE DEFAULT-CAR))
 (12 3 (:REWRITE <-0-+-NEGATIVE-1))
 (9 9 (:TYPE-PRESCRIPTION |x < y  =>  0 < -x+y|))
 (9 9 (:TYPE-PRESCRIPTION NATP-OF-NEW-SYMBOL1.NN))
 (9 3 (:REWRITE FOLD-CONSTS-IN-+))
 (6 6 (:META CANCEL_PLUS-LESSP-CORRECT))
 (5 5 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (5 5 (:META CANCEL_PLUS-EQUAL-CORRECT))
 (3 3 (:REWRITE DEFAULT-<-2))
 (3 3 (:REWRITE DEFAULT-<-1))
 )
(MAKE-N-VARS-NOT-NIL
 (80 6 (:REWRITE NOT-MEMBER-MAKE-N-VARS-WHEN-IN-AVOID-LST))
 (33 21 (:REWRITE DEFAULT-+-2))
 (29 8 (:REWRITE ZP-OPEN))
 (21 21 (:REWRITE DEFAULT-+-1))
 (15 14 (:REWRITE DEFAULT-CDR))
 (15 14 (:REWRITE DEFAULT-CAR))
 (12 3 (:REWRITE <-0-+-NEGATIVE-1))
 (9 9 (:TYPE-PRESCRIPTION |x < y  =>  0 < -x+y|))
 (9 9 (:TYPE-PRESCRIPTION NATP-OF-NEW-SYMBOL1.NN))
 (9 3 (:REWRITE FOLD-CONSTS-IN-+))
 (6 6 (:META CANCEL_PLUS-LESSP-CORRECT))
 (3 3 (:REWRITE DEFAULT-<-2))
 (3 3 (:REWRITE DEFAULT-<-1))
 (2 2 (:TYPE-PRESCRIPTION SYMBOLP-OF-NEW-SYMBOL1.NEW))
 )
(SYMBOL-LISTP-MAKE-N-VARS)
(NEW-SYMBOLS-FROM-BASE)
(NEW-SYMBOLS-FROM-BASE-LEN)
(NOT-MEMBER-NEW-SYMBOLS-FROM-BASE-WHEN-IN-AVOID-LST
 (5 1 (:DEFINITION MEMBER-EQUAL))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 (1 1 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (1 1 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(NEW-SYMBOLS-FROM-BASE-NOT-IN-AVOID)
(NEW-SYMBOLS-FROM-BASE-NO-DUPSP)
(NEW-SYMBOLS-FROM-BASE-NOT-NIL)
(SYMBOL-LISTP-NEW-SYMBOLS-FROM-BASE)
(NEW-SYMBOLS
 (12 12 (:REWRITE DEFAULT-CAR))
 (10 10 (:REWRITE DEFAULT-CDR))
 )
(NEW-SYMBOLS-LEN
 (14 7 (:REWRITE DEFAULT-+-2))
 (9 8 (:REWRITE DEFAULT-CDR))
 (7 7 (:REWRITE DEFAULT-+-1))
 (3 3 (:REWRITE DEFAULT-CAR))
 (3 3 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (3 3 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(NOT-MEMBER-NEW-SYMBOLS-WHEN-IN-AVOID-LST
 (19 18 (:REWRITE DEFAULT-CAR))
 (15 14 (:REWRITE DEFAULT-CDR))
 (10 10 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (10 10 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(NEW-SYMBOLS-NOT-IN-AVOID
 (109 108 (:REWRITE DEFAULT-CAR))
 (79 78 (:REWRITE DEFAULT-CDR))
 (37 37 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (37 37 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(NEW-SYMBOLS-NO-DUPSP
 (15 13 (:REWRITE DEFAULT-CDR))
 (12 11 (:REWRITE DEFAULT-CAR))
 (3 3 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (3 3 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(NEW-SYMBOLS-NOT-NIL
 (39 4 (:REWRITE NOT-MEMBER-NEW-SYMBOLS-WHEN-IN-AVOID-LST))
 (12 11 (:REWRITE DEFAULT-CAR))
 (11 10 (:REWRITE DEFAULT-CDR))
 )
(SYMBOL-LISTP-NEW-SYMBOLS
 (8 7 (:REWRITE DEFAULT-CAR))
 (7 6 (:REWRITE DEFAULT-CDR))
 )
(ALISTP-PAIRLIS$
 (11 10 (:REWRITE DEFAULT-CAR))
 (9 8 (:REWRITE DEFAULT-CDR))
 )
(STRIP-CDRS-OF-PAIRLIS
 (23 12 (:REWRITE DEFAULT-+-2))
 (20 19 (:REWRITE DEFAULT-CDR))
 (12 12 (:REWRITE DEFAULT-+-1))
 (11 10 (:REWRITE DEFAULT-CAR))
 (9 9 (:META CANCEL_TIMES-EQUAL-CORRECT))
 )
(LEN-OF-STRIP-CDRS
 (24 12 (:REWRITE DEFAULT-+-2))
 (19 17 (:REWRITE DEFAULT-CDR))
 (12 12 (:REWRITE DEFAULT-+-1))
 (9 9 (:REWRITE DEFAULT-CAR))
 (3 3 (:META CANCEL_TIMES-EQUAL-CORRECT))
 (3 3 (:META CANCEL_PLUS-EQUAL-CORRECT))
 )
(GENERALIZE-TERMLIST-CP
 (59 5 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (57 54 (:REWRITE DEFAULT-CDR))
 (40 20 (:REWRITE DEFAULT-+-2))
 (26 26 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (26 26 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (25 22 (:REWRITE DEFAULT-CAR))
 (20 20 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (20 20 (:REWRITE DEFAULT-+-1))
 (15 10 (:REWRITE PSEUDO-TERMP-OPENER))
 (11 1 (:DEFINITION PAIRLIS$))
 (10 10 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (10 5 (:REWRITE DEFAULT-<-2))
 (5 5 (:REWRITE DEFAULT-<-1))
 (5 5 (:META CANCEL_PLUS-LESSP-CORRECT))
 (1 1 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 )
(GENERALIZE-TERMLIST-ALIST)
(GENERALIZE-TERMLIST-CP-CORRECT
 (213 7 (:DEFINITION PSEUDO-TERM-LISTP))
 (84 66 (:REWRITE DEFAULT-CDR))
 (75 57 (:REWRITE DEFAULT-CAR))
 (73 7 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (66 11 (:REWRITE PSEUDO-TERMP-CAR))
 (44 22 (:REWRITE DEFAULT-+-2))
 (42 7 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (32 32 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (32 32 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (28 28 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (22 22 (:REWRITE DEFAULT-+-1))
 (21 14 (:REWRITE PSEUDO-TERMP-OPENER))
 (20 4 (:DEFINITION BINARY-APPEND))
 (14 14 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (11 11 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (10 10 (:REWRITE GEN-EVAL-OF-VARIABLE))
 (10 10 (:REWRITE GEN-EVAL-OF-QUOTE))
 (10 10 (:REWRITE GEN-EVAL-OF-LAMBDA))
 (10 10 (:REWRITE GEN-EVAL-OF-IF-CALL))
 (9 9 (:REWRITE GEN-EVAL-DISJOIN-ATOM))
 (9 3 (:DEFINITION ALISTP))
 (8 8 (:TYPE-PRESCRIPTION REPLACE-ALIST-TO-BINDINGS))
 (8 4 (:REWRITE DEFAULT-<-2))
 (5 1 (:REWRITE GEN-EVAL-CONJOIN-CLAUSES-ATOM))
 (4 4 (:REWRITE DEFAULT-<-1))
 (4 4 (:META CANCEL_PLUS-LESSP-CORRECT))
 )
(GENERALIZE-WITH-ALIST-CP)
(GENERALIZE-WITH-ALIST-ALIST)
(GENERALIZE-WITH-ALIST-CP-CORRECT
 (141 5 (:DEFINITION PSEUDO-TERM-LISTP))
 (69 57 (:REWRITE DEFAULT-CAR))
 (68 56 (:REWRITE DEFAULT-CDR))
 (56 8 (:DEFINITION LEN))
 (52 4 (:DEFINITION PAIRLIS$))
 (44 11 (:DEFINITION STRIP-CARS))
 (35 5 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (30 5 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (30 5 (:REWRITE PSEUDO-TERMP-CAR))
 (28 7 (:DEFINITION STRIP-CDRS))
 (23 20 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (20 20 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (20 20 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (16 8 (:REWRITE DEFAULT-+-2))
 (15 10 (:REWRITE PSEUDO-TERMP-OPENER))
 (15 5 (:DEFINITION ALISTP))
 (15 3 (:DEFINITION SYMBOL-LISTP))
 (10 10 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (10 2 (:DEFINITION BINARY-APPEND))
 (8 8 (:REWRITE DEFAULT-+-1))
 (6 6 (:REWRITE GEN-EVAL-OF-VARIABLE))
 (6 6 (:REWRITE GEN-EVAL-OF-QUOTE))
 (6 6 (:REWRITE GEN-EVAL-OF-LAMBDA))
 (6 6 (:REWRITE GEN-EVAL-OF-IF-CALL))
 (5 5 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (5 5 (:REWRITE GEN-EVAL-DISJOIN-ATOM))
 (4 4 (:TYPE-PRESCRIPTION REPLACE-ALIST-TO-BINDINGS))
 (4 1 (:REWRITE GEN-EVAL-CONJOIN-CLAUSES-ATOM))
 )
