(CASE-MATCH+-1
 (2 2 (:TYPE-PRESCRIPTION LAST))
 )
(MAKE-TYPE)
(TRUE-LISTP-MAKE-VAR-LST1
 (621 3 (:DEFINITION EXPLODE-NONNEGATIVE-INTEGER))
 (342 6 (:DEFINITION FLOOR))
 (252 3 (:DEFINITION MOD))
 (246 246 (:TYPE-PRESCRIPTION NONNEGATIVE-INTEGER-QUOTIENT))
 (192 12 (:DEFINITION NONNEGATIVE-INTEGER-QUOTIENT))
 (183 3 (:DEFINITION DIGIT-TO-CHAR))
 (104 68 (:REWRITE DEFAULT-+-2))
 (74 68 (:REWRITE DEFAULT-+-1))
 (63 9 (:REWRITE COMMUTATIVITY-OF-*))
 (60 18 (:REWRITE COMMUTATIVITY-OF-+))
 (39 27 (:REWRITE DEFAULT-UNARY-MINUS))
 (36 12 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (36 12 (:DEFINITION NFIX))
 (33 33 (:REWRITE DEFAULT-<-2))
 (33 33 (:REWRITE DEFAULT-<-1))
 (30 24 (:REWRITE DEFAULT-*-2))
 (30 24 (:REWRITE DEFAULT-*-1))
 (30 6 (:REWRITE DISTRIBUTIVITY))
 (30 3 (:REWRITE ASSOCIATIVITY-OF-+))
 (27 3 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (16 14 (:REWRITE DEFAULT-CDR))
 (16 7 (:REWRITE ZP-OPEN))
 (15 3 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (15 3 (:REWRITE DEFAULT-COERCE-3))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LISTP-EXPLODE-NONNEGATIVE-INTEGER))
 (12 12 (:TYPE-PRESCRIPTION EXPLODE-NONNEGATIVE-INTEGER))
 (12 12 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (12 12 (:DEFINITION IFIX))
 (9 3 (:DEFINITION BINARY-APPEND))
 (6 6 (:REWRITE DEFAULT-NUMERATOR))
 (6 6 (:REWRITE DEFAULT-DENOMINATOR))
 (3 3 (:REWRITE FOLD-CONSTS-IN-+))
 (3 3 (:REWRITE DEFAULT-COERCE-2))
 (3 3 (:REWRITE DEFAULT-CAR))
 )
(TYPE-EXPR-LST
 (1194 2 (:DEFINITION MAKE-VAR-LST1))
 (1108 4 (:DEFINITION EXPLODE-NONNEGATIVE-INTEGER))
 (584 266 (:REWRITE DEFAULT-+-2))
 (578 4 (:DEFINITION BINARY-APPEND))
 (484 4 (:DEFINITION DIGIT-TO-CHAR))
 (472 8 (:DEFINITION FLOOR))
 (380 4 (:DEFINITION MOD))
 (356 266 (:REWRITE DEFAULT-+-1))
 (272 8 (:DEFINITION NONNEGATIVE-INTEGER-QUOTIENT))
 (152 152 (:TYPE-PRESCRIPTION NONNEGATIVE-INTEGER-QUOTIENT))
 (132 132 (:REWRITE DEFAULT-CDR))
 (120 58 (:REWRITE DEFAULT-*-2))
 (112 28 (:DEFINITION INTEGER-ABS))
 (112 12 (:REWRITE COMMUTATIVITY-OF-*))
 (92 59 (:REWRITE DEFAULT-<-1))
 (78 58 (:REWRITE DEFAULT-*-1))
 (74 59 (:REWRITE DEFAULT-<-2))
 (60 40 (:REWRITE DEFAULT-UNARY-MINUS))
 (56 4 (:REWRITE ASSOCIATIVITY-OF-+))
 (48 8 (:DEFINITION NFIX))
 (41 41 (:REWRITE DEFAULT-CAR))
 (30 22 (:REWRITE DEFAULT-NUMERATOR))
 (30 22 (:REWRITE DEFAULT-DENOMINATOR))
 (16 16 (:REWRITE DEFAULT-COERCE-2))
 (16 8 (:DEFINITION IFIX))
 (14 14 (:REWRITE DEFAULT-REALPART))
 (14 14 (:REWRITE DEFAULT-IMAGPART))
 (14 14 (:REWRITE DEFAULT-COERCE-1))
 (12 6 (:TYPE-PRESCRIPTION TRUE-LISTP-EXPLODE-NONNEGATIVE-INTEGER))
 (12 2 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (8 2 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (8 2 (:REWRITE DEFAULT-COERCE-3))
 (6 6 (:TYPE-PRESCRIPTION EXPLODE-NONNEGATIVE-INTEGER))
 (4 4 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 )
(CONSTRUCT-DISJUNCT)
(CONSTRUCT-DISJUNCTS)
(MAKE-CAST-TO-NAT
 (2 2 (:REWRITE DEFAULT-SYMBOL-NAME))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 2 (:REWRITE DEFAULT-CAR))
 )
(MAKE-CAST-FROM-NAT
 (2 2 (:REWRITE DEFAULT-SYMBOL-NAME))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 2 (:REWRITE DEFAULT-CAR))
 )
(CONSTRUCT-CASTERS)
(MAKE-ARB)
(CONSTRUCT-ARB-CDR
 (372 174 (:REWRITE DEFAULT-+-2))
 (240 174 (:REWRITE DEFAULT-+-1))
 (112 28 (:DEFINITION INTEGER-ABS))
 (112 14 (:DEFINITION LENGTH))
 (70 14 (:DEFINITION LEN))
 (61 61 (:REWRITE DEFAULT-CDR))
 (60 26 (:REWRITE DEFAULT-*-2))
 (40 33 (:REWRITE DEFAULT-<-2))
 (40 33 (:REWRITE DEFAULT-<-1))
 (39 39 (:REWRITE DEFAULT-CAR))
 (28 28 (:REWRITE DEFAULT-UNARY-MINUS))
 (26 26 (:REWRITE DEFAULT-*-1))
 (14 14 (:TYPE-PRESCRIPTION LEN))
 (14 14 (:REWRITE DEFAULT-REALPART))
 (14 14 (:REWRITE DEFAULT-NUMERATOR))
 (14 14 (:REWRITE DEFAULT-IMAGPART))
 (14 14 (:REWRITE DEFAULT-DENOMINATOR))
 (14 14 (:REWRITE DEFAULT-COERCE-2))
 (14 14 (:REWRITE DEFAULT-COERCE-1))
 )
(CONSTRUCT-ARB-DEF
 (40 30 (:REWRITE DEFAULT-COERCE-1))
 (36 36 (:REWRITE DEFAULT-COERCE-2))
 (34 32 (:REWRITE DEFAULT-SYMBOL-NAME))
 (22 22 (:REWRITE DEFAULT-CDR))
 (22 22 (:REWRITE DEFAULT-CAR))
 (12 6 (:REWRITE DEFAULT-COERCE-3))
 (6 1 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (2 2 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (2 1 (:REWRITE DEFAULT-PKG-IMPORTS))
 (2 1 (:DEFINITION TRUE-LISTP))
 (1 1 (:TYPE-PRESCRIPTION STRINGP-SYMBOL-PACKAGE-NAME))
 (1 1 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (1 1 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 )
(TYPE-LIST-NAME)
(ARB-UNSIGNED-BYTE)
(UNSIGNED-BYTE-P-ARB-UNSIGNED-BYTE
 (23 15 (:REWRITE DEFAULT-<-2))
 (15 15 (:REWRITE DEFAULT-<-1))
 (10 4 (:REWRITE DEFAULT-*-2))
 (9 3 (:REWRITE COMMUTATIVITY-OF-+))
 (6 6 (:REWRITE DEFAULT-+-2))
 (6 6 (:REWRITE DEFAULT-+-1))
 (4 4 (:REWRITE DEFAULT-*-1))
 (3 3 (:REWRITE ZIP-OPEN))
 )
(NATP-ARB-UNSIGNED-BYTE
 (13 1 (:DEFINITION EXPT))
 (3 3 (:REWRITE DEFAULT-<-2))
 (3 3 (:REWRITE DEFAULT-<-1))
 (3 1 (:REWRITE DEFAULT-*-2))
 (3 1 (:REWRITE COMMUTATIVITY-OF-+))
 (2 2 (:REWRITE DEFAULT-+-2))
 (2 2 (:REWRITE DEFAULT-+-1))
 (1 1 (:TYPE-PRESCRIPTION RATIONALP-EXPT-TYPE-PRESCRIPTION))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NON-ZERO-BASE))
 (1 1 (:REWRITE ZIP-OPEN))
 (1 1 (:REWRITE DEFAULT-*-1))
 )
(NATP-EXPT
 (29 25 (:REWRITE DEFAULT-<-1))
 (25 25 (:REWRITE DEFAULT-<-2))
 (16 6 (:REWRITE DEFAULT-*-2))
 (12 12 (:REWRITE DEFAULT-+-2))
 (12 12 (:REWRITE DEFAULT-+-1))
 (6 6 (:REWRITE ZIP-OPEN))
 (6 6 (:REWRITE DEFAULT-*-1))
 )
(ARB32-UPPER-BOUND
 (44 44 (:TYPE-PRESCRIPTION NATP))
 (26 2 (:DEFINITION EXPT))
 (10 7 (:REWRITE DEFAULT-<-2))
 (9 7 (:REWRITE DEFAULT-<-1))
 (7 5 (:REWRITE DEFAULT-+-2))
 (6 2 (:REWRITE DEFAULT-*-2))
 (6 2 (:REWRITE COMMUTATIVITY-OF-+))
 (5 5 (:REWRITE DEFAULT-+-1))
 (2 2 (:REWRITE ZIP-OPEN))
 (2 2 (:REWRITE DEFAULT-*-1))
 )
(CHARACTER-LISTP-EXPLODE-NONNEGATIVE-INTEGER
 (3072 192 (:DEFINITION NONNEGATIVE-INTEGER-QUOTIENT))
 (1189 815 (:REWRITE DEFAULT-+-2))
 (894 815 (:REWRITE DEFAULT-+-1))
 (613 433 (:REWRITE DEFAULT-UNARY-MINUS))
 (576 192 (:DEFINITION NFIX))
 (553 381 (:REWRITE DEFAULT-*-2))
 (551 532 (:REWRITE DEFAULT-<-2))
 (551 381 (:REWRITE DEFAULT-*-1))
 (532 532 (:REWRITE DEFAULT-<-1))
 (398 158 (:REWRITE DEFAULT-UNARY-/))
 (308 308 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 (271 151 (:REWRITE DEFAULT-NUMERATOR))
 (264 150 (:REWRITE DEFAULT-DENOMINATOR))
 (234 154 (:REWRITE RATIONALP-*))
 (227 46 (:REWRITE ZP-OPEN))
 (192 192 (:DEFINITION IFIX))
 (187 85 (:REWRITE DEFAULT-CDR))
 (187 85 (:REWRITE DEFAULT-CAR))
 (80 80 (:REWRITE RATIONALP-UNARY-/))
 (2 2 (:REWRITE FOLD-CONSTS-IN-+))
 )
(NEW-FORMAL
 (98 1 (:DEFINITION EXPLODE-NONNEGATIVE-INTEGER))
 (52 2 (:DEFINITION FLOOR))
 (39 1 (:DEFINITION MOD))
 (36 36 (:TYPE-PRESCRIPTION NONNEGATIVE-INTEGER-QUOTIENT))
 (32 2 (:DEFINITION NONNEGATIVE-INTEGER-QUOTIENT))
 (31 1 (:DEFINITION DIGIT-TO-CHAR))
 (10 7 (:REWRITE DEFAULT-+-2))
 (10 3 (:REWRITE COMMUTATIVITY-OF-*))
 (8 8 (:REWRITE DEFAULT-<-2))
 (8 8 (:REWRITE DEFAULT-<-1))
 (7 7 (:REWRITE DEFAULT-+-1))
 (7 6 (:REWRITE DEFAULT-*-2))
 (7 6 (:REWRITE DEFAULT-*-1))
 (6 2 (:REWRITE COMMUTATIVITY-OF-+))
 (6 2 (:DEFINITION NFIX))
 (4 3 (:REWRITE DEFAULT-UNARY-MINUS))
 (2 2 (:REWRITE DEFAULT-NUMERATOR))
 (2 2 (:REWRITE DEFAULT-DENOMINATOR))
 (2 2 (:DEFINITION IFIX))
 (1 1 (:REWRITE ZP-OPEN))
 )
(DESTRUCTURE-FORMALS-1)
(TRUE-LISTP-CAR-DESTRUCTURE-FORMALS-1
 (73 61 (:REWRITE DEFAULT-CAR))
 (40 34 (:REWRITE DEFAULT-CDR))
 (34 11 (:DEFINITION TRUE-LISTP))
 (12 6 (:REWRITE DEFAULT-+-2))
 (6 6 (:REWRITE DEFAULT-+-1))
 )
(TRUE-LISTP-NTH-1-DESTRUCTURE-FORMALS-1
 (61 55 (:REWRITE DEFAULT-CAR))
 (59 45 (:REWRITE DEFAULT-CDR))
 (22 11 (:DEFINITION TRUE-LISTP))
 (12 6 (:REWRITE DEFAULT-+-2))
 (6 6 (:REWRITE DEFAULT-+-1))
 )
(DESTRUCTURE-FORMALS
 (784 8 (:DEFINITION EXPLODE-NONNEGATIVE-INTEGER))
 (416 16 (:DEFINITION FLOOR))
 (312 8 (:DEFINITION MOD))
 (288 288 (:TYPE-PRESCRIPTION NONNEGATIVE-INTEGER-QUOTIENT))
 (256 16 (:DEFINITION NONNEGATIVE-INTEGER-QUOTIENT))
 (248 8 (:DEFINITION DIGIT-TO-CHAR))
 (82 57 (:REWRITE DEFAULT-+-2))
 (80 24 (:REWRITE COMMUTATIVITY-OF-*))
 (61 59 (:REWRITE DEFAULT-CAR))
 (57 57 (:REWRITE DEFAULT-+-1))
 (56 48 (:REWRITE DEFAULT-*-2))
 (56 48 (:REWRITE DEFAULT-*-1))
 (50 50 (:REWRITE DEFAULT-<-2))
 (50 50 (:REWRITE DEFAULT-<-1))
 (48 16 (:REWRITE COMMUTATIVITY-OF-+))
 (48 16 (:DEFINITION NFIX))
 (32 24 (:REWRITE DEFAULT-UNARY-MINUS))
 (31 1 (:DEFINITION DESTRUCTURE-FORMALS-1))
 (27 25 (:REWRITE DEFAULT-CDR))
 (16 16 (:REWRITE DEFAULT-NUMERATOR))
 (16 16 (:REWRITE DEFAULT-DENOMINATOR))
 (16 16 (:DEFINITION IFIX))
 (8 8 (:REWRITE ZP-OPEN))
 (6 2 (:REWRITE DEFAULT-COERCE-3))
 (6 1 (:DEFINITION LENGTH))
 (5 5 (:TYPE-PRESCRIPTION TRUE-LISTP-EXPLODE-NONNEGATIVE-INTEGER))
 (5 5 (:TYPE-PRESCRIPTION EXPLODE-NONNEGATIVE-INTEGER))
 (5 1 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (5 1 (:DEFINITION LEN))
 (4 2 (:DEFINITION TRUE-LISTP))
 (3 3 (:REWRITE DEFAULT-COERCE-2))
 (3 1 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (3 1 (:REWRITE DEFAULT-COERCE-1))
 (2 2 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 )
(BL-FN)
(BITS
 (5 5 (:TYPE-PRESCRIPTION |(< (logand x y) 0)| . 2))
 (5 5 (:TYPE-PRESCRIPTION |(< (logand x y) 0)| . 1))
 )
(UNSIGNED-BYTE-P-BITS
 (85561 4 (:REWRITE UNSIGNED-BYTE-P-PLUS))
 (20198 20198 (:TYPE-PRESCRIPTION INTEGERP-/-EXPT-1))
 (20195 20195 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (20195 20195 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (20195 20195 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (19535 527 (:REWRITE DEFAULT-PLUS-2))
 (11918 527 (:REWRITE DEFAULT-PLUS-1))
 (11474 890 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (11474 890 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (11474 890 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 1))
 (11474 890 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE . 1))
 (11474 890 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (10168 571 (:REWRITE DEFAULT-TIMES-2))
 (9248 215 (:REWRITE DEFAULT-LESS-THAN-1))
 (7825 10 (:LINEAR LINEAR-FLOOR-BOUNDS-1))
 (6328 6328 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONPOSITIVE-BASE-EVEN-EXPONENT))
 (6328 6328 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NEGATIVE-BASE-ODD-EXPONENT))
 (6328 6328 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NEGATIVE-BASE-EVEN-EXPONENT))
 (6328 6328 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE-B))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 3))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 2))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 3))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 2))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE . 3))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE . 2))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 3))
 (6230 890 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (4830 7 (:REWRITE MOD-ZERO . 4))
 (4785 571 (:REWRITE DEFAULT-TIMES-1))
 (4365 2469 (:TYPE-PRESCRIPTION NATP-EXPT))
 (4115 7 (:REWRITE MOD-X-Y-=-X . 3))
 (4021 7 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (3795 7 (:REWRITE MOD-X-Y-=-X . 4))
 (3768 215 (:REWRITE DEFAULT-LESS-THAN-2))
 (3365 117 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (3211 41 (:REWRITE ODD-EXPT-THM))
 (2937 7 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (2435 18 (:REWRITE FLOOR-X-Y-=-1 . 2))
 (2433 18 (:REWRITE CANCEL-FLOOR-+))
 (2371 7 (:REWRITE CANCEL-MOD-+))
 (1957 184 (:REWRITE |(< (- x) (- y))|))
 (1896 1896 (:TYPE-PRESCRIPTION NATP))
 (1611 18 (:REWRITE FLOOR-ZERO . 3))
 (1512 216 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (1512 216 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (1488 216 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (1488 216 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (1455 24 (:REWRITE |(integerp (- x))|))
 (1339 240 (:REWRITE DEFAULT-MINUS))
 (1231 7 (:REWRITE MOD-ZERO . 3))
 (1181 182 (:REWRITE |(< (- x) c)|))
 (1122 112 (:REWRITE DEFAULT-DIVIDE))
 (1076 25 (:REWRITE |(* (- x) y)|))
 (1069 18 (:REWRITE FLOOR-=-X/Y . 2))
 (1038 20 (:REWRITE DEFAULT-FLOOR-RATIO))
 (789 18 (:REWRITE FLOOR-=-X/Y . 3))
 (726 18 (:REWRITE FLOOR-X-Y-=--1 . 2))
 (652 7 (:REWRITE DEFAULT-MOD-RATIO))
 (589 18 (:REWRITE FLOOR-ZERO . 5))
 (589 18 (:REWRITE FLOOR-ZERO . 4))
 (548 7 (:REWRITE |(mod (+ x (mod a b)) y)|))
 (548 7 (:REWRITE |(mod (+ x (- (mod a b))) y)|))
 (544 544 (:REWRITE EXPT-WITH-VIOLATED-GUARDS))
 (544 225 (:REWRITE THE-FLOOR-BELOW))
 (541 541 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B-EXPT))
 (541 541 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B-EXPT))
 (541 541 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B-EXPT))
 (483 7 (:REWRITE MOD-X-Y-=-X . 2))
 (441 18 (:REWRITE FLOOR-ZERO . 2))
 (441 18 (:REWRITE FLOOR-X-Y-=-1 . 3))
 (441 18 (:REWRITE FLOOR-X-Y-=--1 . 3))
 (400 188 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (331 7 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (331 7 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (324 6 (:REWRITE |(* (* x y) z)|))
 (288 18 (:REWRITE FLOOR-CANCEL-*-CONST))
 (272 272 (:REWRITE DEFAULT-EXPT-2))
 (272 272 (:REWRITE DEFAULT-EXPT-1))
 (272 272 (:REWRITE |(expt 1/c n)|))
 (272 272 (:REWRITE |(expt (- x) n)|))
 (266 7 (:REWRITE MOD-CANCEL-*-CONST))
 (236 7 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (223 223 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A-EXPT))
 (223 223 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A-EXPT))
 (223 223 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A-EXPT))
 (220 34 (:LINEAR EXPT-IS-WEAKLY-INCREASING-FOR-BASE->-1))
 (218 44 (:REWRITE |(< 0 (/ x))|))
 (216 216 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (216 216 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (216 216 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (216 216 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (200 200 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (190 34 (:LINEAR EXPT-IS-INCREASING-FOR-BASE->-1))
 (188 188 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (188 188 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (184 184 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (184 184 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (184 184 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (184 184 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (184 184 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (184 184 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (184 184 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (184 184 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (184 184 (:REWRITE |(< (/ x) (/ y))|))
 (182 182 (:REWRITE |(< c (- x))|))
 (181 181 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (181 181 (:REWRITE INTEGERP-<-CONSTANT))
 (181 181 (:REWRITE CONSTANT-<-INTEGERP))
 (173 20 (:REWRITE DEFAULT-FLOOR-2))
 (170 2 (:LINEAR MOD-BOUNDS-3))
 (168 18 (:REWRITE FLOOR-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (168 18 (:REWRITE |(floor x (* y (/ z))) not rewriting-goal-literal|))
 (167 17 (:REWRITE |(floor (* x (/ y)) z) not rewriting-goal-literal|))
 (163 2 (:REWRITE DEFAULT-LOGAND-2))
 (163 2 (:REWRITE DEFAULT-LOGAND-1))
 (160 8 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (160 8 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (159 7 (:REWRITE DEFAULT-MOD-1))
 (155 5 (:LINEAR LINEAR-FLOOR-BOUNDS-3))
 (152 152 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (138 18 (:REWRITE FLOOR-CANCEL-*-REWRITING-GOAL-LITERAL))
 (123 18 (:REWRITE |(floor x (* y (/ z))) rewriting-goal-literal|))
 (100 4 (:LINEAR MOD-BOUNDS-2))
 (96 96 (:REWRITE INTEGERP-MINUS-X))
 (94 94 (:META META-INTEGERP-CORRECT))
 (83 19 (:REWRITE |(< (+ (- c) x) y)|))
 (80 5 (:LINEAR LINEAR-FLOOR-BOUNDS-2))
 (79 2 (:REWRITE |(* (/ c) (expt d n))|))
 (77 17 (:LINEAR EXPT-LINEAR-LOWER-<=))
 (72 7 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (70 7 (:REWRITE DEFAULT-MOD-2))
 (68 68 (:REWRITE |(< (/ x) 0)|))
 (68 68 (:REWRITE |(< (* x y) 0)|))
 (66 6 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (66 6 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (62 62 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (62 62 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (59 20 (:REWRITE DEFAULT-FLOOR-1))
 (46 46 (:REWRITE |(< 0 (* x y))|))
 (42 42 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (42 42 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (37 7 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (36 6 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (36 6 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (35 26 (:REWRITE |(+ c (+ d x))|))
 (34 34 (:LINEAR EXPT-IS-WEAKLY-DECREASING-FOR-POS-BASE-<-1))
 (34 34 (:LINEAR EXPT-IS-DECREASING-FOR-POS-BASE-<-1))
 (34 1 (:REWRITE FLOOR-POSITIVE . 3))
 (31 1 (:REWRITE FLOOR-POSITIVE . 2))
 (31 1 (:REWRITE FLOOR-NONPOSITIVE . 1))
 (29 29 (:REWRITE |(- (* c x))|))
 (25 1 (:REWRITE FLOOR-POSITIVE . 4))
 (25 1 (:REWRITE FLOOR-NONPOSITIVE . 3))
 (25 1 (:REWRITE FLOOR-NONPOSITIVE . 2))
 (19 19 (:REWRITE |(< (+ c/d x) y)|))
 (18 18 (:REWRITE |(floor x (- y))| . 2))
 (18 18 (:REWRITE |(floor x (- y))| . 1))
 (18 18 (:REWRITE |(floor (- x) y)| . 2))
 (18 18 (:REWRITE |(floor (- x) y)| . 1))
 (17 17 (:LINEAR EXPT-LINEAR-UPPER-<=))
 (17 17 (:LINEAR EXPT-LINEAR-UPPER-<))
 (17 17 (:LINEAR EXPT-LINEAR-LOWER-<))
 (17 17 (:LINEAR EXPT->=-1-TWO))
 (17 17 (:LINEAR EXPT->-1-TWO))
 (17 17 (:LINEAR EXPT-<=-1-TWO))
 (17 17 (:LINEAR EXPT-<=-1-ONE))
 (17 17 (:LINEAR EXPT-<-1-TWO))
 (17 17 (:LINEAR EXPT-<-1-ONE))
 (16 1 (:REWRITE FLOOR-=-X/Y . 4))
 (16 1 (:REWRITE |(equal (floor (+ x y) z) x)|))
 (14 14 (:REWRITE |(< x (+ c/d y))|))
 (14 14 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 (12 12 (:REWRITE |(< y (+ (- c) x))|))
 (12 12 (:REWRITE |(* c (* d x))|))
 (10 10 (:REWRITE FOLD-CONSTS-IN-+))
 (8 8 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (8 8 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (8 8 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (8 8 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (8 8 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (8 8 (:REWRITE |(equal c (/ x))|))
 (8 8 (:REWRITE |(equal c (- x))|))
 (8 8 (:REWRITE |(equal (/ x) c)|))
 (8 8 (:REWRITE |(equal (/ x) (/ y))|))
 (8 8 (:REWRITE |(equal (- x) c)|))
 (8 8 (:REWRITE |(equal (- x) (- y))|))
 (6 6 (:REWRITE |(mod x (- y))| . 3))
 (6 6 (:REWRITE |(mod x (- y))| . 2))
 (6 6 (:REWRITE |(mod x (- y))| . 1))
 (6 6 (:REWRITE |(mod (- x) y)| . 3))
 (6 6 (:REWRITE |(mod (- x) y)| . 2))
 (6 6 (:REWRITE |(mod (- x) y)| . 1))
 (6 6 (:REWRITE |(- (- x))|))
 (5 2 (:REWRITE ASH-0))
 (4 4 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (4 4 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (4 4 (:TYPE-PRESCRIPTION INTEGERP-MOD-1))
 (4 4 (:REWRITE |(< 0 (* x y)) rationalp (* x y)|))
 (2 2 (:TYPE-PRESCRIPTION ZIP))
 (2 2 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (2 2 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (2 2 (:REWRITE ASH-GOES-TO-0))
 (1 1 (:REWRITE ZIP-OPEN))
 (1 1 (:REWRITE FLOOR-ZERO . 1))
 (1 1 (:REWRITE FLOOR-POSITIVE . 1))
 (1 1 (:REWRITE |(mod (floor x y) z)| . 5))
 (1 1 (:REWRITE |(mod (floor x y) z)| . 4))
 (1 1 (:REWRITE |(mod (floor x y) z)| . 3))
 (1 1 (:REWRITE |(mod (floor x y) z)| . 2))
 )
(NATP-BITS
 (4003 57 (:TYPE-PRESCRIPTION |(< (logand x y) 0)| . 3))
 (2450 223 (:REWRITE DEFAULT-PLUS-2))
 (2289 45 (:REWRITE DEFAULT-LOGAND-2))
 (2273 24 (:REWRITE DEFAULT-FLOOR-RATIO))
 (1810 905 (:TYPE-PRESCRIPTION NATP-EXPT))
 (1795 45 (:REWRITE DEFAULT-LOGAND-1))
 (1616 237 (:REWRITE DEFAULT-TIMES-1))
 (1340 104 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (1250 12 (:REWRITE |(integerp (expt x n))|))
 (1231 237 (:REWRITE DEFAULT-TIMES-2))
 (1109 1109 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (1109 1109 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (1109 1109 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (1109 1109 (:TYPE-PRESCRIPTION INTEGERP-/-EXPT-2))
 (1109 1109 (:TYPE-PRESCRIPTION INTEGERP-/-EXPT-1))
 (1078 77 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (971 5 (:REWRITE FLOOR-ZERO . 3))
 (953 5 (:REWRITE CANCEL-FLOOR-+))
 (909 909 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONPOSITIVE-BASE-EVEN-EXPONENT))
 (909 909 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NEGATIVE-BASE-ODD-EXPONENT))
 (909 909 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NEGATIVE-BASE-EVEN-EXPONENT))
 (909 909 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE-B))
 (909 909 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE-A))
 (875 251 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (875 251 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (875 251 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 1))
 (875 251 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (724 5 (:REWRITE FLOOR-X-Y-=-1 . 2))
 (723 5 (:REWRITE FLOOR-=-X/Y . 3))
 (710 5 (:REWRITE FLOOR-=-X/Y . 2))
 (676 52 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE . 1))
 (641 5 (:REWRITE FLOOR-ZERO . 4))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 3))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 2))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 3))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 2))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE . 3))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 3))
 (563 251 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (523 22 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (486 9 (:REWRITE |(* (* x y) z)|))
 (367 13 (:LINEAR EXPT-<=-1-TWO))
 (361 13 (:LINEAR EXPT-<-1-TWO))
 (303 77 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (297 24 (:REWRITE DEFAULT-FLOOR-1))
 (278 5 (:REWRITE FLOOR-X-Y-=--1 . 2))
 (277 5 (:REWRITE |(* (- x) y)|))
 (269 5 (:REWRITE FLOOR-ZERO . 5))
 (201 12 (:REWRITE |(< y (+ (- c) x))|))
 (161 80 (:REWRITE |(< (- x) c)|))
 (154 154 (:REWRITE THE-FLOOR-BELOW))
 (129 129 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B-EXPT))
 (129 129 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B-EXPT))
 (129 129 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B-EXPT))
 (129 129 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B-EXPT))
 (127 31 (:REWRITE |(< (+ (- c) x) y)|))
 (104 104 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (104 104 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (100 12 (:REWRITE ACL2-NUMBERP-X))
 (86 52 (:REWRITE EXPT-WITH-VIOLATED-GUARDS))
 (84 7 (:REWRITE DEFAULT-DIVIDE))
 (81 5 (:REWRITE FLOOR-ZERO . 2))
 (81 5 (:REWRITE FLOOR-X-Y-=-1 . 3))
 (81 5 (:REWRITE FLOOR-X-Y-=--1 . 3))
 (80 80 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (80 80 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (80 80 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (80 80 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (80 80 (:REWRITE |(< c (- x))|))
 (80 80 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (80 80 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (80 80 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (80 80 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (80 80 (:REWRITE |(< (/ x) (/ y))|))
 (80 80 (:REWRITE |(< (- x) (- y))|))
 (77 77 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (77 77 (:REWRITE INTEGERP-<-CONSTANT))
 (77 77 (:REWRITE CONSTANT-<-INTEGERP))
 (77 66 (:REWRITE SIMPLIFY-SUMS-<))
 (70 25 (:REWRITE |(+ c (+ d x))|))
 (70 5 (:REWRITE FLOOR-CANCEL-*-REWRITING-GOAL-LITERAL))
 (70 5 (:REWRITE FLOOR-CANCEL-*-CONST))
 (63 63 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (59 49 (:REWRITE REDUCE-INTEGERP-+))
 (57 57 (:TYPE-PRESCRIPTION BINARY-LOGAND))
 (57 57 (:TYPE-PRESCRIPTION |(< (logand x y) 0)| . 2))
 (57 57 (:TYPE-PRESCRIPTION |(< (logand x y) 0)| . 1))
 (49 49 (:REWRITE INTEGERP-MINUS-X))
 (49 49 (:META META-INTEGERP-CORRECT))
 (48 48 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (44 11 (:REWRITE RATIONALP-X))
 (43 43 (:REWRITE |(< (+ c/d x) y)|))
 (37 37 (:REWRITE |(< (* x y) 0)|))
 (35 24 (:REWRITE DEFAULT-FLOOR-2))
 (25 25 (:REWRITE |(< (/ x) 0)|))
 (23 23 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (23 23 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (22 5 (:REWRITE |(floor x (* y (/ z))) rewriting-goal-literal|))
 (21 21 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (21 21 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (21 21 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (21 21 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (20 20 (:LINEAR EXPT-IS-WEAKLY-INCREASING-FOR-BASE->-1))
 (20 20 (:LINEAR EXPT-IS-WEAKLY-DECREASING-FOR-POS-BASE-<-1))
 (20 20 (:LINEAR EXPT-IS-INCREASING-FOR-BASE->-1))
 (20 20 (:LINEAR EXPT-IS-DECREASING-FOR-POS-BASE-<-1))
 (18 18 (:REWRITE DEFAULT-EXPT-1))
 (15 15 (:REWRITE |(< x (+ c/d y))|))
 (14 14 (:REWRITE |(expt 1/c n)|))
 (14 14 (:REWRITE |(expt (- x) n)|))
 (13 13 (:LINEAR EXPT-LINEAR-UPPER-<=))
 (13 13 (:LINEAR EXPT-LINEAR-UPPER-<))
 (13 13 (:LINEAR EXPT-LINEAR-LOWER-<=))
 (13 13 (:LINEAR EXPT-LINEAR-LOWER-<))
 (13 13 (:LINEAR EXPT->=-1-TWO))
 (13 13 (:LINEAR EXPT->-1-TWO))
 (13 13 (:LINEAR EXPT-<=-1-ONE))
 (13 13 (:LINEAR EXPT-<-1-ONE))
 (11 11 (:REWRITE REDUCE-RATIONALP-+))
 (11 11 (:REWRITE REDUCE-RATIONALP-*))
 (11 11 (:REWRITE RATIONALP-MINUS-X))
 (11 11 (:META META-RATIONALP-CORRECT))
 (10 10 (:REWRITE FOLD-CONSTS-IN-+))
 (10 10 (:LINEAR EXPT-X->=-X))
 (10 10 (:LINEAR EXPT-X->-X))
 (10 10 (:LINEAR EXPT->-1-ONE))
 (6 6 (:REWRITE |(< 0 (* x y))|))
 (6 6 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 (5 5 (:REWRITE FLOOR-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (5 5 (:REWRITE |(floor x (- y))| . 2))
 (5 5 (:REWRITE |(floor x (- y))| . 1))
 (5 5 (:REWRITE |(floor x (* y (/ z))) not rewriting-goal-literal|))
 (5 5 (:REWRITE |(floor (- x) y)| . 2))
 (5 5 (:REWRITE |(floor (- x) y)| . 1))
 (5 2 (:REWRITE ASH-0))
 (4 4 (:REWRITE |(floor (* x (/ y)) z) not rewriting-goal-literal|))
 (3 3 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (3 3 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (3 3 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (3 3 (:REWRITE |(< 0 (/ x))|))
 (3 3 (:REWRITE |(- (- x))|))
 (2 2 (:TYPE-PRESCRIPTION ZIP))
 (2 2 (:REWRITE ASH-GOES-TO-0))
 (2 2 (:REWRITE |(- (* c x))|))
 (1 1 (:REWRITE ZIP-OPEN))
 (1 1 (:REWRITE ODD-EXPT-THM))
 (1 1 (:REWRITE |(< 0 (* x y)) rationalp (* x y)|))
 )
(BINARY-CAT
 (5 5 (:TYPE-PRESCRIPTION |(< 0 (logior x y))| . 1))
 (5 5 (:TYPE-PRESCRIPTION |(< (logior x y) 0)| . 2))
 (5 5 (:TYPE-PRESCRIPTION |(< (logior x y) 0)| . 1))
 )
(FORMAL-+)
(CAT-SIZE
 (525 10 (:DEFINITION INTEGER-ABS))
 (255 100 (:REWRITE DEFAULT-PLUS-2))
 (238 100 (:REWRITE DEFAULT-PLUS-1))
 (175 5 (:REWRITE |(+ (if a b c) x)|))
 (155 5 (:REWRITE NUMERATOR-NEGATIVE))
 (66 66 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (51 51 (:REWRITE DEFAULT-CDR))
 (49 20 (:REWRITE DEFAULT-LESS-THAN-1))
 (45 45 (:TYPE-PRESCRIPTION NUMERATOR-ZERO))
 (45 45 (:TYPE-PRESCRIPTION NUMERATOR-POSITIVE . 2))
 (45 45 (:TYPE-PRESCRIPTION NUMERATOR-POSITIVE . 1))
 (45 45 (:TYPE-PRESCRIPTION NUMERATOR-NEGATIVE . 2))
 (45 45 (:TYPE-PRESCRIPTION NUMERATOR-NEGATIVE . 1))
 (35 10 (:REWRITE DEFAULT-MINUS))
 (28 28 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (28 28 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (28 28 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (28 20 (:REWRITE DEFAULT-LESS-THAN-2))
 (27 15 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (27 15 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (25 25 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (25 25 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (25 25 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (22 22 (:REWRITE FOLD-CONSTS-IN-+))
 (20 20 (:REWRITE THE-FLOOR-BELOW))
 (20 20 (:REWRITE THE-FLOOR-ABOVE))
 (20 20 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (20 20 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (20 20 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (20 20 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (20 20 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (20 20 (:REWRITE INTEGERP-<-CONSTANT))
 (20 20 (:REWRITE CONSTANT-<-INTEGERP))
 (20 20 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (20 20 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (20 20 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (20 20 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (20 20 (:REWRITE |(< c (- x))|))
 (20 20 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (20 20 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (20 20 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (20 20 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (20 20 (:REWRITE |(< (/ x) (/ y))|))
 (20 20 (:REWRITE |(< (- x) c)|))
 (20 20 (:REWRITE |(< (- x) (- y))|))
 (20 5 (:REWRITE RATIONALP-X))
 (15 15 (:REWRITE |(< (/ x) 0)|))
 (15 15 (:REWRITE |(< (* x y) 0)|))
 (12 12 (:REWRITE REDUCE-INTEGERP-+))
 (12 12 (:REWRITE INTEGERP-MINUS-X))
 (12 12 (:REWRITE DEFAULT-CAR))
 (12 12 (:META META-INTEGERP-CORRECT))
 (10 10 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (10 10 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (10 6 (:REWRITE DEFAULT-TIMES-2))
 (8 6 (:REWRITE DEFAULT-TIMES-1))
 (5 5 (:REWRITE REDUCE-RATIONALP-+))
 (5 5 (:REWRITE REDUCE-RATIONALP-*))
 (5 5 (:REWRITE RATIONALP-MINUS-X))
 (5 5 (:REWRITE INTEGERP==>NUMERATOR-=-X))
 (5 5 (:REWRITE INTEGERP==>DENOMINATOR-=-1))
 (5 5 (:REWRITE DEFAULT-REALPART))
 (5 5 (:REWRITE DEFAULT-RATIONAL-NUMERATOR))
 (5 5 (:REWRITE DEFAULT-RATIONAL-DENOMINATOR))
 (5 5 (:REWRITE DEFAULT-IMAGPART))
 (5 5 (:REWRITE DEFAULT-COERCE-2))
 (5 5 (:REWRITE DEFAULT-COERCE-1))
 (5 5 (:META META-RATIONALP-CORRECT))
 (4 4 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (4 2 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (2 2 (:REWRITE |(< y (+ (- c) x))|))
 (2 2 (:REWRITE |(< x (+ c/d y))|))
 (2 2 (:LINEAR ACL2-COUNT-CAR-CDR-LINEAR))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (1 1 (:REWRITE |(< 0 (/ x))|))
 (1 1 (:REWRITE |(< 0 (* x y))|))
 (1 1 (:REWRITE |(+ x (if a b c))|))
 (1 1 (:REWRITE |(* x (if a b c))|))
 (1 1 (:REWRITE |(* (if a b c) x)|))
 )
(UNSIGNED-BYTE-P-CAT
 (3195 5 (:REWRITE ASH-0))
 (3097 3 (:REWRITE ZIP-OPEN))
 (2874 2 (:REWRITE |(equal (if a b c) x)|))
 (1725 120 (:REWRITE DEFAULT-TIMES-2))
 (1628 8 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (1232 8 (:REWRITE CANCEL-MOD-+))
 (1200 9 (:REWRITE DEFAULT-FLOOR-RATIO))
 (1071 153 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (1071 153 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (1071 153 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (1071 153 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (1014 120 (:REWRITE DEFAULT-TIMES-1))
 (934 67 (:REWRITE DEFAULT-LESS-THAN-1))
 (927 927 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONPOSITIVE-BASE-EVEN-EXPONENT))
 (927 927 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NEGATIVE-BASE-ODD-EXPONENT))
 (927 927 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NEGATIVE-BASE-EVEN-EXPONENT))
 (927 927 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE-B))
 (927 927 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE-A))
 (768 768 (:TYPE-PRESCRIPTION INTEGERP-/-EXPT-2))
 (768 768 (:TYPE-PRESCRIPTION INTEGERP-/-EXPT-1))
 (767 767 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (767 767 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (767 767 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (696 8 (:REWRITE MOD-ZERO . 3))
 (585 3 (:REWRITE |(* (* x y) z)|))
 (432 8 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (368 8 (:REWRITE MOD-X-Y-=-X . 4))
 (368 8 (:REWRITE MOD-X-Y-=-X . 3))
 (368 8 (:REWRITE DEFAULT-MOD-RATIO))
 (368 8 (:REWRITE |(integerp (- x))|))
 (364 51 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (348 4 (:LINEAR MOD-BOUNDS-3))
 (315 67 (:REWRITE DEFAULT-LESS-THAN-2))
 (313 31 (:REWRITE DEFAULT-DIVIDE))
 (272 8 (:REWRITE |(mod (+ x (mod a b)) y)|))
 (272 8 (:REWRITE |(mod (+ x (- (mod a b))) y)|))
 (270 6 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A-EXPT))
 (250 31 (:REWRITE |(/ (expt x n))|))
 (240 8 (:REWRITE |(* (- x) y)|))
 (232 8 (:REWRITE MOD-ZERO . 4))
 (200 8 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (200 8 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (200 8 (:REWRITE MOD-X-Y-=-X . 2))
 (200 8 (:LINEAR MOD-BOUNDS-2))
 (194 160 (:TYPE-PRESCRIPTION NATP-EXPT))
 (186 9 (:REWRITE DEFAULT-FLOOR-1))
 (184 17 (:REWRITE |(< 0 (/ x))|))
 (176 51 (:REWRITE SIMPLIFY-SUMS-<))
 (173 8 (:LINEAR EXPT->-1-ONE))
 (164 164 (:REWRITE EXPT-WITH-VIOLATED-GUARDS))
 (157 45 (:REWRITE DEFAULT-MINUS))
 (153 153 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (153 153 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (153 153 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (153 153 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (137 8 (:LINEAR EXPT-LINEAR-LOWER-<=))
 (136 16 (:LINEAR EXPT-IS-WEAKLY-INCREASING-FOR-BASE->-1))
 (136 16 (:LINEAR EXPT-IS-INCREASING-FOR-BASE->-1))
 (128 8 (:REWRITE MOD-CANCEL-*-CONST))
 (128 8 (:LINEAR EXPT->=-1-ONE))
 (102 1 (:REWRITE MOD-ZERO . 1))
 (83 8 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (83 8 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (83 8 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (82 82 (:REWRITE DEFAULT-EXPT-2))
 (82 82 (:REWRITE DEFAULT-EXPT-1))
 (82 82 (:REWRITE |(expt 1/c n)|))
 (82 82 (:REWRITE |(expt (- x) n)|))
 (80 8 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (80 8 (:REWRITE DEFAULT-MOD-2))
 (74 74 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B-EXPT))
 (74 74 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B-EXPT))
 (74 74 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B-EXPT))
 (74 74 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B-EXPT))
 (67 67 (:REWRITE THE-FLOOR-BELOW))
 (67 67 (:REWRITE THE-FLOOR-ABOVE))
 (67 11 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (58 8 (:LINEAR EXPT-X->=-X))
 (58 8 (:LINEAR EXPT-X->-X))
 (57 57 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (57 57 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (57 57 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (57 57 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (57 57 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (57 57 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (57 57 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (57 57 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (57 57 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (57 57 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (57 57 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (57 57 (:REWRITE |(< (/ x) (/ y))|))
 (57 57 (:REWRITE |(< (- x) (- y))|))
 (55 55 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (55 55 (:REWRITE INTEGERP-<-CONSTANT))
 (55 55 (:REWRITE CONSTANT-<-INTEGERP))
 (55 55 (:REWRITE |(< c (- x))|))
 (55 55 (:REWRITE |(< (- x) c)|))
 (54 1 (:REWRITE DEFAULT-LOGIOR-2))
 (53 9 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (53 9 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (53 8 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (53 8 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (53 8 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (51 33 (:REWRITE DEFAULT-PLUS-2))
 (45 1 (:REWRITE DEFAULT-LOGIOR-1))
 (39 39 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (38 33 (:REWRITE DEFAULT-PLUS-1))
 (34 34 (:TYPE-PRESCRIPTION NATP))
 (25 25 (:REWRITE REDUCE-INTEGERP-+))
 (25 25 (:REWRITE INTEGERP-MINUS-X))
 (25 25 (:META META-INTEGERP-CORRECT))
 (25 1 (:REWRITE MOD-ZERO . 2))
 (22 22 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (22 22 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (22 22 (:REWRITE |(< (/ x) 0)|))
 (22 22 (:REWRITE |(< (* x y) 0)|))
 (22 4 (:REWRITE DEFAULT-LOGAND-2))
 (22 4 (:REWRITE DEFAULT-LOGAND-1))
 (17 17 (:REWRITE |(< 0 (* x y))|))
 (16 16 (:LINEAR EXPT-IS-WEAKLY-DECREASING-FOR-POS-BASE-<-1))
 (16 16 (:LINEAR EXPT-IS-DECREASING-FOR-POS-BASE-<-1))
 (14 14 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (14 14 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (10 1 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (9 9 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (9 9 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (9 9 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (9 9 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (9 9 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (9 9 (:REWRITE DEFAULT-FLOOR-2))
 (9 9 (:REWRITE |(equal c (/ x))|))
 (9 9 (:REWRITE |(equal c (- x))|))
 (9 9 (:REWRITE |(equal (/ x) c)|))
 (9 9 (:REWRITE |(equal (/ x) (/ y))|))
 (9 9 (:REWRITE |(equal (- x) c)|))
 (9 9 (:REWRITE |(equal (- x) (- y))|))
 (8 8 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (8 8 (:REWRITE DEFAULT-MOD-1))
 (8 8 (:REWRITE |(mod x (- y))| . 3))
 (8 8 (:REWRITE |(mod x (- y))| . 2))
 (8 8 (:REWRITE |(mod x (- y))| . 1))
 (8 8 (:REWRITE |(mod (- x) y)| . 3))
 (8 8 (:REWRITE |(mod (- x) y)| . 2))
 (8 8 (:REWRITE |(mod (- x) y)| . 1))
 (8 8 (:REWRITE |(- (* c x))|))
 (8 8 (:LINEAR EXPT-LINEAR-UPPER-<=))
 (8 8 (:LINEAR EXPT-LINEAR-UPPER-<))
 (8 8 (:LINEAR EXPT-LINEAR-LOWER-<))
 (8 8 (:LINEAR EXPT->=-1-TWO))
 (8 8 (:LINEAR EXPT->-1-TWO))
 (8 8 (:LINEAR EXPT-<=-1-TWO))
 (8 8 (:LINEAR EXPT-<=-1-ONE))
 (8 8 (:LINEAR EXPT-<-1-TWO))
 (8 8 (:LINEAR EXPT-<-1-ONE))
 (6 6 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A-EXPT))
 (6 6 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A-EXPT))
 (6 6 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A-EXPT))
 (5 5 (:TYPE-PRESCRIPTION ZIP))
 (5 5 (:REWRITE ASH-GOES-TO-0))
 (3 3 (:REWRITE |(< (+ c/d x) y)|))
 (3 3 (:REWRITE |(< (+ (- c) x) y)|))
 (3 3 (:REWRITE |(* c (* d x))|))
 (2 2 (:REWRITE |(- (- x))|))
 (1 1 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (1 1 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (1 1 (:REWRITE |(< y (+ (- c) x))|))
 (1 1 (:REWRITE |(< x (+ c/d y))|))
 (1 1 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 )
(UNIT-VALUE)
(SLET-IGNORES
 (3531 811 (:REWRITE ACL2-NUMBERP-X))
 (3422 362 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1360 340 (:REWRITE RATIONALP-X))
 (843 834 (:REWRITE DEFAULT-CAR))
 (702 362 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (699 682 (:REWRITE DEFAULT-CDR))
 (493 362 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (362 362 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (362 362 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (362 362 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (362 362 (:REWRITE |(equal c (/ x))|))
 (362 362 (:REWRITE |(equal c (- x))|))
 (362 362 (:REWRITE |(equal (/ x) c)|))
 (362 362 (:REWRITE |(equal (/ x) (/ y))|))
 (362 362 (:REWRITE |(equal (- x) c)|))
 (362 362 (:REWRITE |(equal (- x) (- y))|))
 (340 340 (:REWRITE REDUCE-RATIONALP-+))
 (340 340 (:REWRITE REDUCE-RATIONALP-*))
 (340 340 (:REWRITE REDUCE-INTEGERP-+))
 (340 340 (:REWRITE RATIONALP-MINUS-X))
 (340 340 (:REWRITE INTEGERP-MINUS-X))
 (340 340 (:META META-RATIONALP-CORRECT))
 (340 340 (:META META-INTEGERP-CORRECT))
 )
(EQUAL-LEN-0
 (9 5 (:REWRITE DEFAULT-PLUS-2))
 (8 4 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (8 4 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (5 5 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (5 5 (:REWRITE NORMALIZE-ADDENDS))
 (5 5 (:REWRITE DEFAULT-PLUS-1))
 (4 4 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (4 4 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (4 4 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (4 4 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (4 4 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (4 4 (:REWRITE DEFAULT-CDR))
 (4 4 (:REWRITE |(equal c (/ x))|))
 (4 4 (:REWRITE |(equal c (- x))|))
 (4 4 (:REWRITE |(equal (/ x) c)|))
 (4 4 (:REWRITE |(equal (/ x) (/ y))|))
 (4 4 (:REWRITE |(equal (- x) c)|))
 (4 4 (:REWRITE |(equal (- x) (- y))|))
 )
(UNSIGNED-BYTE-P-MONOTONE
 (94 94 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONPOSITIVE-BASE-ODD-EXPONENT))
 (94 94 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONPOSITIVE-BASE-EVEN-EXPONENT))
 (94 94 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NEGATIVE-BASE-ODD-EXPONENT))
 (94 94 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NEGATIVE-BASE-EVEN-EXPONENT))
 (94 94 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE-B))
 (94 94 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE-A))
 (93 3 (:LINEAR EXPT-<=-1-TWO))
 (90 3 (:LINEAR EXPT->-1-ONE))
 (62 2 (:REWRITE ODD-EXPT-THM))
 (52 2 (:LINEAR EXPT-X->=-X))
 (52 2 (:LINEAR EXPT-X->-X))
 (44 22 (:TYPE-PRESCRIPTION NATP-EXPT))
 (38 20 (:REWRITE DEFAULT-LESS-THAN-2))
 (37 19 (:REWRITE SIMPLIFY-SUMS-<))
 (37 19 (:REWRITE SIMPLIFY-PRODUCTS-SCATTER-EXPONENTS-<))
 (37 19 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (30 30 (:REWRITE EXPT-WITH-VIOLATED-GUARDS))
 (22 22 (:TYPE-PRESCRIPTION NATP))
 (20 20 (:REWRITE THE-FLOOR-BELOW))
 (20 20 (:REWRITE THE-FLOOR-ABOVE))
 (20 20 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (20 20 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (20 20 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (20 20 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (20 20 (:REWRITE INTEGERP-<-CONSTANT))
 (20 20 (:REWRITE DEFAULT-LESS-THAN-1))
 (20 20 (:REWRITE CONSTANT-<-INTEGERP))
 (20 20 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (20 20 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (20 20 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (20 20 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (20 20 (:REWRITE |(< c (- x))|))
 (20 20 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (20 20 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (20 20 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (20 20 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (20 20 (:REWRITE |(< (/ x) (/ y))|))
 (20 20 (:REWRITE |(< (- x) c)|))
 (20 20 (:REWRITE |(< (- x) (- y))|))
 (15 15 (:REWRITE DEFAULT-EXPT-2))
 (15 15 (:REWRITE DEFAULT-EXPT-1))
 (15 15 (:REWRITE |(expt 1/c n)|))
 (15 15 (:REWRITE |(expt (- x) n)|))
 (8 8 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (8 8 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (8 8 (:REWRITE |(< 0 (/ x))|))
 (8 8 (:REWRITE |(< 0 (* x y))|))
 (6 6 (:LINEAR EXPT-IS-WEAKLY-DECREASING-FOR-POS-BASE-<-1))
 (5 5 (:REWRITE |(< (/ x) 0)|))
 (5 5 (:REWRITE |(< (* x y) 0)|))
 (4 4 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (4 4 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (4 4 (:LINEAR EXPT-IS-INCREASING-FOR-BASE->-1))
 (4 4 (:LINEAR EXPT-IS-DECREASING-FOR-POS-BASE-<-1))
 (3 3 (:REWRITE REDUCE-INTEGERP-+))
 (3 3 (:REWRITE INTEGERP-MINUS-X))
 (3 3 (:META META-INTEGERP-CORRECT))
 (3 3 (:LINEAR EXPT-LINEAR-UPPER-<=))
 (3 3 (:LINEAR EXPT-LINEAR-UPPER-<))
 (3 3 (:LINEAR EXPT-LINEAR-LOWER-<))
 (3 3 (:LINEAR EXPT->=-1-TWO))
 (3 3 (:LINEAR EXPT->-1-TWO))
 (3 3 (:LINEAR EXPT-<=-1-ONE))
 (3 3 (:LINEAR EXPT-<-1-TWO))
 (3 3 (:LINEAR EXPT-<-1-ONE))
 )
(ARB-UTY)
(ARB-LIST-FN)
(STOBJ-MAPPER-NAME
 (2 2 (:REWRITE DEFAULT-SYMBOL-NAME))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 2 (:REWRITE DEFAULT-CAR))
 )
(DEFSTOBJ-MAPPERS-1)
(DEFSTOBJ-MAPPERS)
