(INT10)
(BOOLEANP-OF-INT10)
(INT10-NATP)
(ADD-INT10
 (25 5 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (25 5 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (10 10 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (10 10 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (10 10 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (10 10 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (5 5 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (5 5 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (5 5 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (5 5 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (5 5 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (5 5 (:TYPE-PRESCRIPTION MOD-NONNEGATIVE))
 (5 5 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (5 5 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (5 5 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (5 5 (:TYPE-PRESCRIPTION INTEGERP-MOD-1))
 )
(INT10-OF-ADD-INT10
 (247 7 (:REWRITE MOD-X-Y-=-X . 4))
 (182 7 (:REWRITE MOD-ZERO . 3))
 (127 7 (:REWRITE MOD-ZERO . 4))
 (102 16 (:REWRITE |(* y x)|))
 (101 1 (:REWRITE CANCEL-MOD-+))
 (100 7 (:REWRITE DEFAULT-MOD-RATIO))
 (77 77 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (77 77 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (77 77 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (63 7 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (59 13 (:REWRITE INTEGERP-MINUS-X))
 (42 42 (:REWRITE DEFAULT-TIMES-2))
 (42 42 (:REWRITE DEFAULT-TIMES-1))
 (40 40 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (40 40 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (40 40 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (40 40 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (38 2 (:REWRITE |(* x (+ y z))|))
 (35 7 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (35 7 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (35 7 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (34 4 (:REWRITE |(* (- x) y)|))
 (24 24 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (20 20 (:REWRITE THE-FLOOR-BELOW))
 (20 20 (:REWRITE THE-FLOOR-ABOVE))
 (20 20 (:REWRITE DEFAULT-LESS-THAN-2))
 (20 20 (:REWRITE DEFAULT-LESS-THAN-1))
 (20 4 (:REWRITE DEFAULT-MINUS))
 (18 18 (:REWRITE SIMPLIFY-SUMS-<))
 (18 18 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (18 18 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (18 18 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (18 18 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (18 18 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (18 18 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (18 18 (:REWRITE INTEGERP-<-CONSTANT))
 (18 18 (:REWRITE CONSTANT-<-INTEGERP))
 (18 18 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (18 18 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (18 18 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (18 18 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (18 18 (:REWRITE |(< c (- x))|))
 (18 18 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (18 18 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (18 18 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (18 18 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (18 18 (:REWRITE |(< (/ x) (/ y))|))
 (18 18 (:REWRITE |(< (- x) c)|))
 (18 18 (:REWRITE |(< (- x) (- y))|))
 (18 10 (:REWRITE DEFAULT-PLUS-2))
 (18 10 (:REWRITE DEFAULT-PLUS-1))
 (18 4 (:REWRITE |(- (* c x))|))
 (17 17 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (11 11 (:REWRITE REDUCE-INTEGERP-+))
 (11 11 (:META META-INTEGERP-CORRECT))
 (8 8 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (8 8 (:REWRITE NORMALIZE-ADDENDS))
 (7 7 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (7 7 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (7 7 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (7 7 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (7 7 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (7 7 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (7 7 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (7 7 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (7 7 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (7 7 (:REWRITE DEFAULT-MOD-2))
 (7 7 (:REWRITE DEFAULT-MOD-1))
 (7 7 (:REWRITE |(equal c (/ x))|))
 (7 7 (:REWRITE |(equal c (- x))|))
 (7 7 (:REWRITE |(equal (/ x) c)|))
 (7 7 (:REWRITE |(equal (/ x) (/ y))|))
 (7 7 (:REWRITE |(equal (- x) c)|))
 (7 7 (:REWRITE |(equal (- x) (- y))|))
 (7 7 (:REWRITE |(< 0 (/ x))|))
 (7 7 (:REWRITE |(< 0 (* x y))|))
 (7 7 (:REWRITE |(< (+ c/d x) y)|))
 (7 7 (:REWRITE |(< (+ (- c) x) y)|))
 (5 1 (:REWRITE MOD-X-Y-=-X . 2))
 (5 1 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (5 1 (:REWRITE MOD-CANCEL-*-CONST))
 (5 1 (:REWRITE |(mod (+ x (mod a b)) y)|))
 (5 1 (:REWRITE |(mod (+ x (- (mod a b))) y)|))
 (5 1 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (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 (:REWRITE |(< (/ x) 0)|))
 (4 4 (:REWRITE |(< (* x y) 0)|))
 (1 1 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (1 1 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (1 1 (:REWRITE FOLD-CONSTS-IN-+))
 (1 1 (:REWRITE |(mod x (- y))| . 3))
 (1 1 (:REWRITE |(mod x (- y))| . 2))
 (1 1 (:REWRITE |(mod x (- y))| . 1))
 (1 1 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (1 1 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (1 1 (:REWRITE |(mod (- x) y)| . 3))
 (1 1 (:REWRITE |(mod (- x) y)| . 2))
 (1 1 (:REWRITE |(mod (- x) y)| . 1))
 (1 1 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 3))
 (1 1 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 2))
 (1 1 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (1 1 (:REWRITE |(equal (+ (- c) x) y)|))
 (1 1 (:REWRITE |(< y (+ (- c) x))|))
 (1 1 (:REWRITE |(< x (+ c/d y))|))
 (1 1 (:REWRITE |(+ c (+ d x))|))
 )
(ADD-INT10-COMM
 (90450 184 (:LINEAR MOD-BOUNDS-1))
 (77265 51 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (39135 51 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (37172 124 (:REWRITE |(equal (+ (- c) x) y)|))
 (14384 186 (:REWRITE CANCEL-MOD-+))
 (7539 186 (:REWRITE MOD-X-Y-=-X . 4))
 (7400 186 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (7368 186 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (7339 186 (:REWRITE MOD-X-Y-=-X . 3))
 (7274 6810 (:REWRITE DEFAULT-TIMES-2))
 (7136 7136 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (7136 7136 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (7136 7136 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (6790 6790 (:REWRITE DEFAULT-TIMES-1))
 (6626 922 (:REWRITE INTEGERP-MINUS-X))
 (5835 1167 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (5835 1167 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (5781 5781 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (5781 5781 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (5781 5781 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (5781 5781 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (4917 186 (:REWRITE MOD-ZERO . 3))
 (4650 4650 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (4575 186 (:REWRITE MOD-ZERO . 4))
 (4216 496 (:REWRITE |(* (- x) y)|))
 (4087 1167 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (4087 1167 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (3300 184 (:LINEAR MOD-BOUNDS-2))
 (2924 92 (:LINEAR MOD-BOUNDS-3))
 (2480 496 (:REWRITE DEFAULT-MINUS))
 (2480 186 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (2480 186 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (2480 186 (:REWRITE MOD-X-Y-=-X . 2))
 (2480 186 (:REWRITE |(mod (+ x (mod a b)) y)|))
 (2480 186 (:REWRITE |(mod (+ x (- (mod a b))) y)|))
 (2454 220 (:REWRITE RATIONALP-X))
 (2406 186 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (2406 186 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (2295 186 (:REWRITE MOD-CANCEL-*-CONST))
 (2232 496 (:REWRITE |(- (* c x))|))
 (2152 62 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 3))
 (1573 217 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1507 1291 (:REWRITE NORMALIZE-ADDENDS))
 (1327 62 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (1259 1259 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (1167 1167 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (1167 1167 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (1167 1167 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (1167 1167 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (1167 1167 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (1167 1167 (:TYPE-PRESCRIPTION INTEGERP-MOD-1))
 (997 217 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (997 217 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (723 723 (:REWRITE THE-FLOOR-BELOW))
 (723 723 (:REWRITE THE-FLOOR-ABOVE))
 (723 723 (:REWRITE SIMPLIFY-SUMS-<))
 (723 723 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (723 723 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (723 723 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (723 723 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (723 723 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (723 723 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (723 723 (:REWRITE INTEGERP-<-CONSTANT))
 (723 723 (:REWRITE DEFAULT-LESS-THAN-2))
 (723 723 (:REWRITE DEFAULT-LESS-THAN-1))
 (723 723 (:REWRITE CONSTANT-<-INTEGERP))
 (723 723 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (723 723 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (723 723 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (723 723 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (723 723 (:REWRITE |(< c (- x))|))
 (723 723 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (723 723 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (723 723 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (723 723 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (723 723 (:REWRITE |(< (/ x) (/ y))|))
 (723 723 (:REWRITE |(< (- x) c)|))
 (723 723 (:REWRITE |(< (- x) (- y))|))
 (710 10 (:REWRITE |(+ x (if a b c))|))
 (674 674 (:REWRITE REDUCE-INTEGERP-+))
 (674 674 (:META META-INTEGERP-CORRECT))
 (540 20 (:REWRITE |(+ (if a b c) x)|))
 (524 204 (:REWRITE REDUCE-RATIONALP-+))
 (482 38 (:REWRITE |(+ y (+ x z))|))
 (472 472 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (442 50 (:REWRITE ACL2-NUMBERP-X))
 (437 437 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (308 308 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (308 308 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (308 308 (:REWRITE |(< (/ x) 0)|))
 (308 308 (:REWRITE |(< (* x y) 0)|))
 (294 14 (:REWRITE |(+ (+ x y) z)|))
 (260 186 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (260 186 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (238 238 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (238 238 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (220 220 (:REWRITE RATIONALP-MINUS-X))
 (217 217 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (217 217 (:REWRITE |(equal c (/ x))|))
 (217 217 (:REWRITE |(equal c (- x))|))
 (217 217 (:REWRITE |(equal (/ x) c)|))
 (217 217 (:REWRITE |(equal (/ x) (/ y))|))
 (217 217 (:REWRITE |(equal (- x) c)|))
 (217 217 (:REWRITE |(equal (- x) (- y))|))
 (204 204 (:REWRITE DEFAULT-MOD-2))
 (204 204 (:REWRITE DEFAULT-MOD-1))
 (204 204 (:META META-RATIONALP-CORRECT))
 (186 186 (:REWRITE |(mod x (- y))| . 3))
 (186 186 (:REWRITE |(mod x (- y))| . 2))
 (186 186 (:REWRITE |(mod x (- y))| . 1))
 (186 186 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (186 186 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (186 186 (:REWRITE |(mod (- x) y)| . 3))
 (186 186 (:REWRITE |(mod (- x) y)| . 2))
 (186 186 (:REWRITE |(mod (- x) y)| . 1))
 (180 180 (:REWRITE |(< (+ c/d x) y)|))
 (180 180 (:REWRITE |(< (+ (- c) x) y)|))
 (177 177 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (177 177 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (177 177 (:REWRITE |(< 0 (/ x))|))
 (177 177 (:REWRITE |(< 0 (* x y))|))
 (171 171 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (138 62 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 1))
 (108 62 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (108 28 (:REWRITE |(+ 0 x)|))
 (92 92 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (62 62 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (62 62 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 2))
 (61 61 (:REWRITE |(< y (+ (- c) x))|))
 (61 61 (:REWRITE |(< x (+ c/d y))|))
 (54 45 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (48 48 (:DEFINITION FIX))
 (48 24 (:REWRITE BUBBLE-DOWN-+-MATCH-1))
 (40 8 (:REWRITE BUBBLE-DOWN-+-MATCH-3))
 (32 32 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (32 32 (:REWRITE |(+ x (- x))|))
 (24 24 (:REWRITE |(+ c (+ d x))|))
 (16 16 (:REWRITE FOLD-CONSTS-IN-+))
 )
(DOUBLE-INT10)
(INT10-OF-DOUBLE-INT10)
(TRIPLE-INT10)
(INT10-OF-TRIPLE-INT10)
(INT10-LIST-P)
(INT10-LIST-P-OF-CONS)
(USE-INT10-LIST-P-FOR-CAR)
(USE-INT10-LIST-P-FOR-CAR-OF-LAST)
(INT10-LIST-P-OF-APPEND)
(INT10-LIST-P-OF-UNION-EQUAL)
(INT10-LIST-P-WHEN-NOT-CONSP)
(INT10-LIST-P-WHEN-NOT-CONSP-CHEAP)
(INT10-LIST-P-OF-REVAPPEND)
(INT10-LIST-P-OF-CDR)
(INT10-LIST-P-OF-NTHCDR)
(INT10-LIST-P-OF-FIRSTN)
(INT10-LIST-P-OF-REMOVE1-EQUAL)
(INT10-LIST-P-OF-REMOVE-EQUAL)
(INT10-LIST-P-OF-LAST)
(INT10-LIST-P-OF-TAKE)
(TRUE-LISTP-WHEN-INT10-LIST-P)
(TRUE-LISTP-WHEN-INT10-LIST-P-FORWARD)
(INT10-LIST-P-WHEN-PERM)
(INT10-LIST-P-OF-TRUE-LIST-FIX)
(USE-INT10-LIST-P)
(USE-INT10-LIST-P-2)
(INT10-LIST-P-OF-ADD-TO-SET-EQUAL)
(MAP-DOUBLE-INT10
 (1 1 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP-CHEAP))
 (1 1 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 )
(MAP-DOUBLE-INT10-OF-NIL)
(MAP-DOUBLE-INT10-OF-CONS)
(MAP-DOUBLE-INT10-OF-TRUE-LIST-FIX)
(MAP-DOUBLE-INT10-OPENER)
(MAP-DOUBLE-INT10-OF-APPEND)
(CAR-OF-MAP-DOUBLE-INT10)
(CDR-OF-MAP-DOUBLE-INT10)
(LEN-OF-MAP-DOUBLE-INT10)
(CONSP-OF-MAP-DOUBLE-INT10)
(MAP-DOUBLE-INT10-IFF)
(TRUE-LISTP-OF-MAP-DOUBLE-INT10)
(FIRSTN-OF-MAP-DOUBLE-INT10)
(TAKE-OF-MAP-DOUBLE-INT10)
(NTH-OF-MAP-DOUBLE-INT10)
(NTHCDR-OF-MAP-DOUBLE-INT10)
(INT10-LIST-P-OF-MAP-DOUBLE-INT10
 (93 8 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP))
 (38 4 (:REWRITE CONSP-OF-MAP-DOUBLE-INT10))
 (15 15 (:TYPE-PRESCRIPTION MAP-DOUBLE-INT10))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (7 7 (:REWRITE DEFAULT-CDR))
 (6 3 (:REWRITE MEMBERP-WHEN-SINGLETON-CHEAP))
 (6 3 (:REWRITE MEMBERP-WHEN-NOT-MEMBERP-OF-CDR-CHEAP))
 (6 3 (:REWRITE MEMBERP-WHEN-MEMBERP-OF-CDR-CHEAP))
 (5 5 (:REWRITE DEFAULT-CAR))
 (4 3 (:REWRITE MEMBERP-WHEN-NOT-CONS-OF-CDR-CHEAP))
 (3 3 (:TYPE-PRESCRIPTION LEN))
 (3 3 (:REWRITE NOT-MEMBERP-WHEN-MEMBERP-OF-TAKE))
 (3 3 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-2))
 (3 3 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-1))
 (3 3 (:REWRITE MEMBERP-WHEN-NOT-EQUAL-OF-CAR-CHEAP))
 (3 3 (:REWRITE MEMBERP-OF-CONSTANT-WHEN-NOT-MEMBER-OF-CONSTANT))
 (2 2 (:REWRITE USE-INT10-LIST-P-2))
 )
(INT20)
(BOOLEANP-OF-INT20)
(INT20-NATP)
(INT10-TO-INT20)
(INT20-TO-INT10)
(ALPHA-IMAGE
 (4 4 (:REWRITE THE-FLOOR-BELOW))
 (4 4 (:REWRITE THE-FLOOR-ABOVE))
 (4 4 (:REWRITE SIMPLIFY-SUMS-<))
 (4 4 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 4 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (4 4 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (4 4 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (4 4 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (4 4 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (4 4 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 4 (:REWRITE INTEGERP-<-CONSTANT))
 (4 4 (:REWRITE DEFAULT-LESS-THAN-2))
 (4 4 (:REWRITE DEFAULT-LESS-THAN-1))
 (4 4 (:REWRITE CONSTANT-<-INTEGERP))
 (4 4 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (4 4 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (4 4 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (4 4 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (4 4 (:REWRITE |(< c (- x))|))
 (4 4 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (4 4 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (4 4 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (4 4 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (4 4 (:REWRITE |(< (/ x) (/ y))|))
 (4 4 (:REWRITE |(< (- x) c)|))
 (4 4 (:REWRITE |(< (- x) (- y))|))
 (2 2 (:REWRITE |(< (+ c/d x) y)|))
 (2 2 (:REWRITE |(< (+ (- c) x) y)|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (1 1 (:REWRITE REDUCE-INTEGERP-+))
 (1 1 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (1 1 (:REWRITE NORMALIZE-ADDENDS))
 (1 1 (:REWRITE INTEGERP-MINUS-X))
 (1 1 (:REWRITE DEFAULT-PLUS-2))
 (1 1 (:REWRITE DEFAULT-PLUS-1))
 (1 1 (:REWRITE |(< (/ x) 0)|))
 (1 1 (:REWRITE |(< (* x y) 0)|))
 (1 1 (:META META-INTEGERP-CORRECT))
 )
(BETA-IMAGE
 (4 4 (:REWRITE THE-FLOOR-BELOW))
 (4 4 (:REWRITE THE-FLOOR-ABOVE))
 (4 4 (:REWRITE SIMPLIFY-SUMS-<))
 (4 4 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 4 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (4 4 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (4 4 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (4 4 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (4 4 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (4 4 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 4 (:REWRITE INTEGERP-<-CONSTANT))
 (4 4 (:REWRITE DEFAULT-LESS-THAN-2))
 (4 4 (:REWRITE DEFAULT-LESS-THAN-1))
 (4 4 (:REWRITE CONSTANT-<-INTEGERP))
 (4 4 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (4 4 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (4 4 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (4 4 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (4 4 (:REWRITE |(< c (- x))|))
 (4 4 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (4 4 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (4 4 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (4 4 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (4 4 (:REWRITE |(< (/ x) (/ y))|))
 (4 4 (:REWRITE |(< (- x) c)|))
 (4 4 (:REWRITE |(< (- x) (- y))|))
 (2 2 (:REWRITE |(< (+ c/d x) y)|))
 (2 2 (:REWRITE |(< (+ (- c) x) y)|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (1 1 (:REWRITE REDUCE-INTEGERP-+))
 (1 1 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (1 1 (:REWRITE NORMALIZE-ADDENDS))
 (1 1 (:REWRITE INTEGERP-MINUS-X))
 (1 1 (:REWRITE DEFAULT-PLUS-2))
 (1 1 (:REWRITE DEFAULT-PLUS-1))
 (1 1 (:REWRITE |(< (/ x) 0)|))
 (1 1 (:REWRITE |(< (* x y) 0)|))
 (1 1 (:META META-INTEGERP-CORRECT))
 )
(BETA-OF-ALPHA)
(ALPHA-OF-BETA)
(DOMA-GUARD)
(DOMB-GUARD)
(ALPHA-GUARD)
(BETA-GUARD)
(INT10-ISO-INT20.ALPHA-IMAGE)
(INT10-ISO-INT20.BETA-IMAGE)
(INT10-ISO-INT20.BETA-OF-ALPHA)
(INT10-ISO-INT20.ALPHA-OF-BETA)
(INT10-ISO-INT20.DOMA-GUARD)
(INT10-ISO-INT20.DOMB-GUARD)
(INT10-ISO-INT20.ALPHA-GUARD)
(INT10-ISO-INT20.BETA-GUARD)
(INT10-ISO-INT20.ALPHA-INJECTIVE)
(INT10-ISO-INT20.BETA-INJECTIVE)
(INT20-LIST-P)
(INT20-LIST-P-OF-CONS)
(USE-INT20-LIST-P-FOR-CAR)
(USE-INT20-LIST-P-FOR-CAR-OF-LAST)
(INT20-LIST-P-OF-APPEND)
(INT20-LIST-P-OF-UNION-EQUAL)
(INT20-LIST-P-WHEN-NOT-CONSP)
(INT20-LIST-P-WHEN-NOT-CONSP-CHEAP)
(INT20-LIST-P-OF-REVAPPEND)
(INT20-LIST-P-OF-CDR)
(INT20-LIST-P-OF-NTHCDR)
(INT20-LIST-P-OF-FIRSTN)
(INT20-LIST-P-OF-REMOVE1-EQUAL)
(INT20-LIST-P-OF-REMOVE-EQUAL)
(INT20-LIST-P-OF-LAST)
(INT20-LIST-P-OF-TAKE)
(TRUE-LISTP-WHEN-INT20-LIST-P)
(TRUE-LISTP-WHEN-INT20-LIST-P-FORWARD)
(INT20-LIST-P-WHEN-PERM)
(INT20-LIST-P-OF-TRUE-LIST-FIX)
(USE-INT20-LIST-P)
(USE-INT20-LIST-P-2)
(INT20-LIST-P-OF-ADD-TO-SET-EQUAL)
(INT10-LIST-P-TO-INT20-LIST-P
 (1 1 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP-CHEAP))
 (1 1 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 )
(INT10-LIST-P-TO-INT20-LIST-P-OF-NIL)
(INT10-LIST-P-TO-INT20-LIST-P-OF-CONS)
(INT10-LIST-P-TO-INT20-LIST-P-OF-TRUE-LIST-FIX)
(INT10-LIST-P-TO-INT20-LIST-P-OPENER)
(INT10-LIST-P-TO-INT20-LIST-P-OF-APPEND)
(CAR-OF-INT10-LIST-P-TO-INT20-LIST-P)
(CDR-OF-INT10-LIST-P-TO-INT20-LIST-P)
(LEN-OF-INT10-LIST-P-TO-INT20-LIST-P)
(CONSP-OF-INT10-LIST-P-TO-INT20-LIST-P)
(INT10-LIST-P-TO-INT20-LIST-P-IFF)
(TRUE-LISTP-OF-INT10-LIST-P-TO-INT20-LIST-P)
(FIRSTN-OF-INT10-LIST-P-TO-INT20-LIST-P)
(TAKE-OF-INT10-LIST-P-TO-INT20-LIST-P)
(NTH-OF-INT10-LIST-P-TO-INT20-LIST-P)
(NTHCDR-OF-INT10-LIST-P-TO-INT20-LIST-P)
(INT20-LIST-P-TO-INT10-LIST-P
 (1 1 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP-CHEAP))
 (1 1 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 )
(INT20-LIST-P-TO-INT10-LIST-P-OF-NIL)
(INT20-LIST-P-TO-INT10-LIST-P-OF-CONS)
(INT20-LIST-P-TO-INT10-LIST-P-OF-TRUE-LIST-FIX)
(INT20-LIST-P-TO-INT10-LIST-P-OPENER)
(INT20-LIST-P-TO-INT10-LIST-P-OF-APPEND)
(CAR-OF-INT20-LIST-P-TO-INT10-LIST-P)
(CDR-OF-INT20-LIST-P-TO-INT10-LIST-P)
(LEN-OF-INT20-LIST-P-TO-INT10-LIST-P)
(CONSP-OF-INT20-LIST-P-TO-INT10-LIST-P)
(INT20-LIST-P-TO-INT10-LIST-P-IFF)
(TRUE-LISTP-OF-INT20-LIST-P-TO-INT10-LIST-P)
(FIRSTN-OF-INT20-LIST-P-TO-INT10-LIST-P)
(TAKE-OF-INT20-LIST-P-TO-INT10-LIST-P)
(NTH-OF-INT20-LIST-P-TO-INT10-LIST-P)
(NTHCDR-OF-INT20-LIST-P-TO-INT10-LIST-P)
(ALPHA-IMAGE
 (100 8 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP))
 (46 12 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP))
 (43 7 (:REWRITE USE-INT10-LIST-P-FOR-CAR))
 (24 24 (:REWRITE DEFAULT-CDR))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (19 4 (:REWRITE USE-INT20-LIST-P))
 (16 8 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP-CHEAP))
 (12 12 (:REWRITE DEFAULT-CAR))
 (12 6 (:REWRITE MEMBERP-WHEN-SINGLETON-CHEAP))
 (12 6 (:REWRITE MEMBERP-WHEN-NOT-MEMBERP-OF-CDR-CHEAP))
 (12 6 (:REWRITE MEMBERP-WHEN-MEMBERP-OF-CDR-CHEAP))
 (12 2 (:REWRITE INT10-LIST-P-OF-CDR))
 (11 11 (:REWRITE USE-INT10-LIST-P-2))
 (7 6 (:REWRITE MEMBERP-WHEN-NOT-CONS-OF-CDR-CHEAP))
 (6 6 (:TYPE-PRESCRIPTION LEN))
 (6 6 (:REWRITE NOT-MEMBERP-WHEN-MEMBERP-OF-TAKE))
 (6 6 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-2))
 (6 6 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-1))
 (6 6 (:REWRITE MEMBERP-WHEN-NOT-EQUAL-OF-CAR-CHEAP))
 (6 6 (:REWRITE MEMBERP-OF-CONSTANT-WHEN-NOT-MEMBER-OF-CONSTANT))
 (4 4 (:REWRITE USE-INT20-LIST-P-2))
 (1 1 (:TYPE-PRESCRIPTION INT20))
 )
(BETA-IMAGE
 (100 8 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP))
 (46 12 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP))
 (43 7 (:REWRITE USE-INT20-LIST-P-FOR-CAR))
 (24 24 (:REWRITE DEFAULT-CDR))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (19 19 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (16 8 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP-CHEAP))
 (12 12 (:REWRITE DEFAULT-CAR))
 (12 2 (:REWRITE INT20-LIST-P-OF-CDR))
 (11 11 (:REWRITE USE-INT20-LIST-P-2))
 (10 5 (:REWRITE MEMBERP-WHEN-SINGLETON-CHEAP))
 (10 5 (:REWRITE MEMBERP-WHEN-NOT-MEMBERP-OF-CDR-CHEAP))
 (10 5 (:REWRITE MEMBERP-WHEN-MEMBERP-OF-CDR-CHEAP))
 (5 5 (:TYPE-PRESCRIPTION LEN))
 (5 5 (:REWRITE NOT-MEMBERP-WHEN-MEMBERP-OF-TAKE))
 (5 5 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-2))
 (5 5 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-1))
 (5 5 (:REWRITE MEMBERP-WHEN-NOT-EQUAL-OF-CAR-CHEAP))
 (5 5 (:REWRITE MEMBERP-WHEN-NOT-CONS-OF-CDR-CHEAP))
 (5 5 (:REWRITE MEMBERP-OF-CONSTANT-WHEN-NOT-MEMBER-OF-CONSTANT))
 (1 1 (:TYPE-PRESCRIPTION INT10))
 (1 1 (:REWRITE USE-INT10-LIST-P-2))
 (1 1 (:REWRITE USE-INT10-LIST-P))
 )
(BETA-OF-ALPHA
 (210 19 (:REWRITE INT10-LIST-P-OF-CDR))
 (203 40 (:REWRITE INT10-LIST-P-WHEN-NOT-CONSP))
 (144 19 (:REWRITE USE-INT10-LIST-P-FOR-CAR))
 (40 40 (:REWRITE DEFAULT-CDR))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (22 22 (:REWRITE USE-INT10-LIST-P-2))
 (19 19 (:REWRITE DEFAULT-CAR))
 (18 9 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (18 9 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (18 9 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (10 5 (:REWRITE MEMBERP-WHEN-SINGLETON-CHEAP))
 (10 5 (:REWRITE MEMBERP-WHEN-NOT-MEMBERP-OF-CDR-CHEAP))
 (10 5 (:REWRITE MEMBERP-WHEN-MEMBERP-OF-CDR-CHEAP))
 (9 9 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (9 9 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (9 9 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (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))|))
 (5 5 (:TYPE-PRESCRIPTION LEN))
 (5 5 (:REWRITE NOT-MEMBERP-WHEN-MEMBERP-OF-TAKE))
 (5 5 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-2))
 (5 5 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-1))
 (5 5 (:REWRITE MEMBERP-WHEN-NOT-EQUAL-OF-CAR-CHEAP))
 (5 5 (:REWRITE MEMBERP-WHEN-NOT-CONS-OF-CDR-CHEAP))
 (5 5 (:REWRITE MEMBERP-OF-CONSTANT-WHEN-NOT-MEMBER-OF-CONSTANT))
 )
(ALPHA-OF-BETA
 (210 19 (:REWRITE INT20-LIST-P-OF-CDR))
 (203 40 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP))
 (144 19 (:REWRITE USE-INT20-LIST-P-FOR-CAR))
 (40 40 (:REWRITE DEFAULT-CDR))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (22 22 (:REWRITE USE-INT20-LIST-P-2))
 (19 19 (:REWRITE DEFAULT-CAR))
 (18 9 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (18 9 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (18 9 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (10 5 (:REWRITE MEMBERP-WHEN-SINGLETON-CHEAP))
 (10 5 (:REWRITE MEMBERP-WHEN-NOT-MEMBERP-OF-CDR-CHEAP))
 (10 5 (:REWRITE MEMBERP-WHEN-MEMBERP-OF-CDR-CHEAP))
 (9 9 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (9 9 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (9 9 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (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))|))
 (5 5 (:TYPE-PRESCRIPTION LEN))
 (5 5 (:REWRITE NOT-MEMBERP-WHEN-MEMBERP-OF-TAKE))
 (5 5 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-2))
 (5 5 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-1))
 (5 5 (:REWRITE MEMBERP-WHEN-NOT-EQUAL-OF-CAR-CHEAP))
 (5 5 (:REWRITE MEMBERP-WHEN-NOT-CONS-OF-CDR-CHEAP))
 (5 5 (:REWRITE MEMBERP-OF-CONSTANT-WHEN-NOT-MEMBER-OF-CONSTANT))
 )
(DOMA-GUARD)
(DOMB-GUARD)
(ALPHA-GUARD)
(BETA-GUARD)
(INT10-LIST-P-ISO-INT20-LIST-P.ALPHA-IMAGE)
(INT10-LIST-P-ISO-INT20-LIST-P.BETA-IMAGE)
(INT10-LIST-P-ISO-INT20-LIST-P.BETA-OF-ALPHA)
(INT10-LIST-P-ISO-INT20-LIST-P.ALPHA-OF-BETA)
(INT10-LIST-P-ISO-INT20-LIST-P.DOMA-GUARD)
(INT10-LIST-P-ISO-INT20-LIST-P.DOMB-GUARD)
(INT10-LIST-P-ISO-INT20-LIST-P.ALPHA-GUARD)
(INT10-LIST-P-ISO-INT20-LIST-P.BETA-GUARD)
(INT10-LIST-P-ISO-INT20-LIST-P.ALPHA-INJECTIVE)
(INT10-LIST-P-ISO-INT20-LIST-P.BETA-INJECTIVE)
(ADD-INT20
 (35 7 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (35 7 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (21 21 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (21 21 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (21 21 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (21 21 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (19 7 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (19 7 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (7 7 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (7 7 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (7 7 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (7 7 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (7 7 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (4 4 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 )
(INT20-OF-ADD-INT20
 (101 1 (:REWRITE CANCEL-MOD-+))
 (100 7 (:REWRITE DEFAULT-MOD-RATIO))
 (78 10 (:REWRITE |(* y x)|))
 (53 7 (:REWRITE INTEGERP-MINUS-X))
 (51 43 (:REWRITE DEFAULT-PLUS-2))
 (51 43 (:REWRITE DEFAULT-PLUS-1))
 (50 1 (:REWRITE MOD-ZERO . 3))
 (41 41 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (41 41 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (41 41 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (38 2 (:REWRITE |(* x (+ y z))|))
 (35 7 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (34 4 (:REWRITE |(* (- x) y)|))
 (32 1 (:REWRITE MOD-X-Y-=-X . 3))
 (30 30 (:REWRITE DEFAULT-TIMES-2))
 (30 30 (:REWRITE DEFAULT-TIMES-1))
 (28 28 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (28 28 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (28 28 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (28 28 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (22 22 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (22 22 (:REWRITE NORMALIZE-ADDENDS))
 (20 4 (:REWRITE DEFAULT-MINUS))
 (18 18 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (18 4 (:REWRITE |(- (* c x))|))
 (13 13 (:REWRITE THE-FLOOR-BELOW))
 (13 13 (:REWRITE THE-FLOOR-ABOVE))
 (13 13 (:REWRITE DEFAULT-LESS-THAN-2))
 (13 13 (:REWRITE DEFAULT-LESS-THAN-1))
 (11 11 (:REWRITE SIMPLIFY-SUMS-<))
 (11 11 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (11 11 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (11 11 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (11 11 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (11 11 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (11 11 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (11 11 (:REWRITE INTEGERP-<-CONSTANT))
 (11 11 (:REWRITE CONSTANT-<-INTEGERP))
 (11 11 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (11 11 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (11 11 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (11 11 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (11 11 (:REWRITE |(< c (- x))|))
 (11 11 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (11 11 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (11 11 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (11 11 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (11 11 (:REWRITE |(< (/ x) (/ y))|))
 (11 11 (:REWRITE |(< (- x) c)|))
 (11 11 (:REWRITE |(< (- x) (- y))|))
 (9 9 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (8 8 (:REWRITE FOLD-CONSTS-IN-+))
 (7 7 (:REWRITE DEFAULT-MOD-2))
 (7 7 (:REWRITE DEFAULT-MOD-1))
 (7 7 (:REWRITE |(< (+ c/d x) y)|))
 (7 7 (:REWRITE |(< (+ (- c) x) y)|))
 (5 5 (:REWRITE REDUCE-INTEGERP-+))
 (5 5 (:META META-INTEGERP-CORRECT))
 (5 1 (:REWRITE MOD-ZERO . 4))
 (5 1 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (5 1 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (5 1 (:REWRITE MOD-X-Y-=-X . 4))
 (5 1 (:REWRITE MOD-X-Y-=-X . 2))
 (5 1 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (5 1 (:REWRITE MOD-CANCEL-*-CONST))
 (5 1 (:REWRITE |(mod (+ x (mod a b)) y)|))
 (5 1 (:REWRITE |(mod (+ x (- (mod a b))) y)|))
 (5 1 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (1 1 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (1 1 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (1 1 (:REWRITE |(mod x (- y))| . 3))
 (1 1 (:REWRITE |(mod x (- y))| . 2))
 (1 1 (:REWRITE |(mod x (- y))| . 1))
 (1 1 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (1 1 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (1 1 (:REWRITE |(mod (- x) y)| . 3))
 (1 1 (:REWRITE |(mod (- x) y)| . 2))
 (1 1 (:REWRITE |(mod (- x) y)| . 1))
 (1 1 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 3))
 (1 1 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 2))
 (1 1 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 )
(ADD-INT10-->ADD-INT20
 (3938 190 (:REWRITE |(* y x)|))
 (3485 77 (:REWRITE MOD-ZERO . 3))
 (3178 122 (:REWRITE |(* x (+ y z))|))
 (2968 109 (:REWRITE DEFAULT-MOD-RATIO))
 (1961 649 (:REWRITE DEFAULT-PLUS-2))
 (1953 77 (:REWRITE MOD-X-Y-=-X . 4))
 (1111 1111 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (1111 1111 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (1111 1111 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (1097 649 (:REWRITE DEFAULT-PLUS-1))
 (1049 77 (:REWRITE MOD-ZERO . 4))
 (886 886 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (886 886 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (886 886 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (886 886 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (764 42 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (570 570 (:REWRITE DEFAULT-TIMES-2))
 (570 570 (:REWRITE DEFAULT-TIMES-1))
 (545 109 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (385 77 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (385 77 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (372 372 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (360 3 (:LINEAR MOD-BOUNDS-3))
 (305 61 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (305 61 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (292 292 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (292 292 (:REWRITE NORMALIZE-ADDENDS))
 (275 91 (:REWRITE INTEGERP-MINUS-X))
 (273 61 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (273 61 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (219 116 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (136 16 (:REWRITE |(* (- x) y)|))
 (120 120 (:REWRITE THE-FLOOR-BELOW))
 (120 120 (:REWRITE THE-FLOOR-ABOVE))
 (120 120 (:REWRITE DEFAULT-LESS-THAN-2))
 (120 120 (:REWRITE DEFAULT-LESS-THAN-1))
 (116 116 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (116 116 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (113 113 (:REWRITE SIMPLIFY-SUMS-<))
 (113 113 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (113 113 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (113 113 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (113 113 (:REWRITE INTEGERP-<-CONSTANT))
 (113 113 (:REWRITE CONSTANT-<-INTEGERP))
 (113 113 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (113 113 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (113 113 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (113 113 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (113 113 (:REWRITE |(< c (- x))|))
 (113 113 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (113 113 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (113 113 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (113 113 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (113 113 (:REWRITE |(< (/ x) (/ y))|))
 (113 113 (:REWRITE |(< (- x) c)|))
 (113 113 (:REWRITE |(< (- x) (- y))|))
 (109 109 (:REWRITE DEFAULT-MOD-2))
 (109 109 (:REWRITE DEFAULT-MOD-1))
 (105 21 (:REWRITE MOD-X-Y-=-X . 2))
 (105 21 (:REWRITE |(mod (+ x (mod a b)) y)|))
 (105 21 (:REWRITE |(mod (+ x (- (mod a b))) y)|))
 (100 20 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (100 20 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (84 84 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (83 83 (:REWRITE REDUCE-INTEGERP-+))
 (83 83 (:META META-INTEGERP-CORRECT))
 (80 16 (:REWRITE DEFAULT-MINUS))
 (79 79 (:REWRITE FOLD-CONSTS-IN-+))
 (72 16 (:REWRITE |(- (* c x))|))
 (64 20 (:REWRITE MOD-CANCEL-*-CONST))
 (61 61 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (61 61 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (61 61 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (61 61 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (61 61 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (59 59 (:REWRITE |(< (+ c/d x) y)|))
 (56 56 (:REWRITE |(< (+ (- c) x) y)|))
 (53 53 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (53 53 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (53 53 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (53 53 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (53 53 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (53 53 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (53 53 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (53 53 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (53 53 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (53 53 (:REWRITE |(equal c (/ x))|))
 (53 53 (:REWRITE |(equal c (- x))|))
 (53 53 (:REWRITE |(equal (/ x) c)|))
 (53 53 (:REWRITE |(equal (/ x) (/ y))|))
 (53 53 (:REWRITE |(equal (- x) c)|))
 (53 53 (:REWRITE |(equal (- x) (- y))|))
 (53 53 (:REWRITE |(< 0 (/ x))|))
 (53 53 (:REWRITE |(< 0 (* x y))|))
 (30 6 (:LINEAR MOD-BOUNDS-2))
 (20 20 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (20 20 (:REWRITE |(mod x (- y))| . 3))
 (20 20 (:REWRITE |(mod x (- y))| . 2))
 (20 20 (:REWRITE |(mod x (- y))| . 1))
 (20 20 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (20 20 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (20 20 (:REWRITE |(mod (- x) y)| . 3))
 (20 20 (:REWRITE |(mod (- x) y)| . 2))
 (20 20 (:REWRITE |(mod (- x) y)| . 1))
 (20 20 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 3))
 (20 20 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 2))
 (20 20 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (8 8 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (4 4 (:REWRITE |(< (* x y) 0)|))
 (3 3 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (3 3 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (3 3 (:REWRITE |(equal (+ (- c) x) y)|))
 (3 3 (:REWRITE |(< y (+ (- c) x))|))
 (3 3 (:REWRITE |(< x (+ c/d y))|))
 (3 3 (:REWRITE |(< (/ x) 0)|))
 )
(ADD-INT20-->ADD-INT10
 (3851 164 (:REWRITE |(* y x)|))
 (3629 53 (:REWRITE MOD-ZERO . 3))
 (3195 150 (:REWRITE |(* x (+ y z))|))
 (2814 109 (:REWRITE DEFAULT-MOD-RATIO))
 (2392 972 (:REWRITE DEFAULT-PLUS-2))
 (1688 53 (:REWRITE MOD-X-Y-=-X . 4))
 (1412 170 (:REWRITE REDUCE-ADDITIVE-CONSTANT-<))
 (1408 70 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (1304 972 (:REWRITE DEFAULT-PLUS-1))
 (1062 53 (:REWRITE MOD-ZERO . 4))
 (900 900 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (900 900 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (900 900 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (872 872 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (872 872 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (872 872 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (872 872 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (595 53 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (572 78 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (545 109 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (534 534 (:REWRITE DEFAULT-TIMES-2))
 (534 534 (:REWRITE DEFAULT-TIMES-1))
 (433 433 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (433 433 (:REWRITE NORMALIZE-ADDENDS))
 (393 77 (:REWRITE |(< (+ (- c) x) y)|))
 (366 366 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (349 3 (:LINEAR MOD-BOUNDS-3))
 (305 61 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (305 61 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (273 61 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (273 61 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (265 53 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (174 174 (:REWRITE THE-FLOOR-BELOW))
 (174 174 (:REWRITE THE-FLOOR-ABOVE))
 (174 174 (:REWRITE DEFAULT-LESS-THAN-2))
 (174 174 (:REWRITE DEFAULT-LESS-THAN-1))
 (170 170 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (170 170 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (153 61 (:REWRITE INTEGERP-MINUS-X))
 (152 152 (:REWRITE FOLD-CONSTS-IN-+))
 (121 13 (:REWRITE |(< y (+ (- c) x))|))
 (114 114 (:REWRITE SIMPLIFY-SUMS-<))
 (114 114 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (114 114 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (114 114 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (114 114 (:REWRITE INTEGERP-<-CONSTANT))
 (114 114 (:REWRITE CONSTANT-<-INTEGERP))
 (114 114 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (114 114 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (114 114 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (114 114 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (114 114 (:REWRITE |(< c (- x))|))
 (114 114 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (114 114 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (114 114 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (114 114 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (114 114 (:REWRITE |(< (/ x) (/ y))|))
 (114 114 (:REWRITE |(< (- x) c)|))
 (114 114 (:REWRITE |(< (- x) (- y))|))
 (109 109 (:REWRITE DEFAULT-MOD-2))
 (109 109 (:REWRITE DEFAULT-MOD-1))
 (105 21 (:REWRITE MOD-X-Y-=-X . 2))
 (105 21 (:REWRITE |(mod (+ x (mod a b)) y)|))
 (105 21 (:REWRITE |(mod (+ x (- (mod a b))) y)|))
 (100 20 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (100 20 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (88 88 (:REWRITE |(< (+ c/d x) y)|))
 (78 78 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (74 74 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (69 21 (:REWRITE |(equal (+ (- c) x) y)|))
 (68 8 (:REWRITE |(* (- x) y)|))
 (64 20 (:REWRITE MOD-CANCEL-*-CONST))
 (61 61 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (61 61 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (61 61 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (61 61 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (61 61 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (57 57 (:REWRITE REDUCE-INTEGERP-+))
 (57 57 (:META META-INTEGERP-CORRECT))
 (45 45 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (45 45 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (45 45 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (45 45 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (45 45 (:REWRITE |(equal c (/ x))|))
 (45 45 (:REWRITE |(equal c (- x))|))
 (45 45 (:REWRITE |(equal (/ x) c)|))
 (45 45 (:REWRITE |(equal (/ x) (/ y))|))
 (45 45 (:REWRITE |(equal (- x) c)|))
 (45 45 (:REWRITE |(equal (- x) (- y))|))
 (42 42 (:REWRITE |(< x (+ c/d y))|))
 (40 8 (:REWRITE DEFAULT-MINUS))
 (37 37 (:REWRITE |(< 0 (* x y))|))
 (36 8 (:REWRITE |(- (* c x))|))
 (30 6 (:LINEAR MOD-BOUNDS-2))
 (20 20 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (20 20 (:REWRITE |(mod x (- y))| . 3))
 (20 20 (:REWRITE |(mod x (- y))| . 2))
 (20 20 (:REWRITE |(mod x (- y))| . 1))
 (20 20 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (20 20 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (20 20 (:REWRITE |(mod (- x) y)| . 3))
 (20 20 (:REWRITE |(mod (- x) y)| . 2))
 (20 20 (:REWRITE |(mod (- x) y)| . 1))
 (20 20 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 3))
 (20 20 (:REWRITE |(mod (+ x y) z) where (<= 0 z)| . 2))
 (20 20 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (13 13 (:REWRITE |(< (* x y) 0)|))
 (12 12 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (8 8 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (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 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (4 4 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (4 4 (:REWRITE |(< 0 (/ x))|))
 (4 4 (:REWRITE |(< (/ x) 0)|))
 )
(ADD-INT20-COMM
 (6 2 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (6 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (6 2 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (4 4 (:REWRITE USE-INT20-LIST-P-2))
 (4 4 (:REWRITE USE-INT20-LIST-P))
 (4 4 (:REWRITE INT10-ISO-INT20.BETA-GUARD))
 (2 2 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (2 2 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (2 2 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (2 2 (:REWRITE |(equal c (/ x))|))
 (2 2 (:REWRITE |(equal c (- x))|))
 (2 2 (:REWRITE |(equal (/ x) c)|))
 (2 2 (:REWRITE |(equal (/ x) (/ y))|))
 (2 2 (:REWRITE |(equal (- x) c)|))
 (2 2 (:REWRITE |(equal (- x) (- y))|))
 )
(DOUBLE-INT20)
(DOUBLE-INT20$NOT-NORMALIZED)
(DOUBLE-INT20-IS-ISO-DOUBLE-INT10
 (2 2 (:REWRITE INT10-ISO-INT20.BETA-GUARD))
 )
(DOUBLE-INT10-IS-ISO-DOUBLE-INT20
 (3 3 (:REWRITE INT10-ISO-INT20.ALPHA-GUARD))
 (1 1 (:REWRITE INT10-ISO-INT20.BETA-GUARD))
 )
(INT20-OF-DOUBLE-INT20
 (1 1 (:REWRITE USE-INT20-LIST-P-2))
 (1 1 (:REWRITE USE-INT20-LIST-P))
 )
(TRIPLE-INT20)
(TRIPLE-INT20$NOT-NORMALIZED)
(TRIPLE-INT20-IS-ISO-TRIPLE-INT10
 (8 8 (:REWRITE INT10-ISO-INT20.ALPHA-GUARD))
 )
(TRIPLE-INT10-IS-ISO-TRIPLE-INT20
 (3 3 (:REWRITE INT10-ISO-INT20.ALPHA-GUARD))
 (1 1 (:REWRITE INT10-ISO-INT20.BETA-GUARD))
 )
(INT20-OF-TRIPLE-INT20
 (1 1 (:REWRITE USE-INT20-LIST-P-2))
 (1 1 (:REWRITE USE-INT20-LIST-P))
 )
(MAP-DOUBLE-INT20
 (1 1 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP-CHEAP))
 (1 1 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 )
(MAP-DOUBLE-INT20$NOT-NORMALIZED)
(MAP-DOUBLE-INT20--100
 (11 11 (:REWRITE DEFAULT-CDR))
 (7 2 (:REWRITE INT10-LIST-P-ISO-INT20-LIST-P.BETA-GUARD))
 (5 5 (:REWRITE DEFAULT-CAR))
 (3 3 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (3 3 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (3 3 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (3 3 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (3 3 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (3 3 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (3 3 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (3 3 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (2 2 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP-CHEAP))
 (2 2 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP))
 (2 1 (:REWRITE MEMBERP-WHEN-SINGLETON-CHEAP))
 (2 1 (:REWRITE MEMBERP-WHEN-NOT-MEMBERP-OF-CDR-CHEAP))
 (2 1 (:REWRITE MEMBERP-WHEN-MEMBERP-OF-CDR-CHEAP))
 (1 1 (:TYPE-PRESCRIPTION LEN))
 (1 1 (:REWRITE USE-INT20-LIST-P-2))
 (1 1 (:REWRITE NOT-MEMBERP-WHEN-MEMBERP-OF-TAKE))
 (1 1 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-2))
 (1 1 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-1))
 (1 1 (:REWRITE MEMBERP-WHEN-NOT-EQUAL-OF-CAR-CHEAP))
 (1 1 (:REWRITE MEMBERP-WHEN-NOT-CONS-OF-CDR-CHEAP))
 (1 1 (:REWRITE MEMBERP-OF-CONSTANT-WHEN-NOT-MEMBER-OF-CONSTANT))
 )
(MAP-DOUBLE-INT20--1
 (5 2 (:REWRITE INT10-LIST-P-ISO-INT20-LIST-P.BETA-GUARD))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 )
(MAP-DOUBLE-INT20-IS-ISO-MAP-DOUBLE-INT10
 (3 3 (:REWRITE USE-INT20-LIST-P-2))
 (3 3 (:REWRITE USE-INT20-LIST-P))
 )
(MAP-DOUBLE-INT10-IS-ISO-MAP-DOUBLE-INT20
 (3 3 (:REWRITE INT10-LIST-P-ISO-INT20-LIST-P.ALPHA-GUARD))
 (1 1 (:REWRITE INT10-LIST-P-ISO-INT20-LIST-P.BETA-GUARD))
 )
(MAP-DOUBLE-INT20-OF-NIL)
(MAP-DOUBLE-INT20-OF-CONS)
(MAP-DOUBLE-INT20-OF-TRUE-LIST-FIX)
(MAP-DOUBLE-INT20-OPENER)
(MAP-DOUBLE-INT20-OF-APPEND)
(CAR-OF-MAP-DOUBLE-INT20)
(CDR-OF-MAP-DOUBLE-INT20)
(LEN-OF-MAP-DOUBLE-INT20)
(CONSP-OF-MAP-DOUBLE-INT20)
(MAP-DOUBLE-INT20-IFF)
(TRUE-LISTP-OF-MAP-DOUBLE-INT20)
(FIRSTN-OF-MAP-DOUBLE-INT20)
(TAKE-OF-MAP-DOUBLE-INT20)
(NTH-OF-MAP-DOUBLE-INT20)
(NTHCDR-OF-MAP-DOUBLE-INT20)
(INT20-LIST-P-OF-MAP-DOUBLE-INT20
 (93 8 (:REWRITE INT20-LIST-P-WHEN-NOT-CONSP))
 (38 4 (:REWRITE CONSP-OF-MAP-DOUBLE-INT20))
 (14 14 (:TYPE-PRESCRIPTION MAP-DOUBLE-INT20))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (13 13 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (7 7 (:REWRITE DEFAULT-CDR))
 (5 5 (:REWRITE DEFAULT-CAR))
 (2 1 (:REWRITE MEMBERP-WHEN-SINGLETON-CHEAP))
 (2 1 (:REWRITE MEMBERP-WHEN-NOT-MEMBERP-OF-CDR-CHEAP))
 (2 1 (:REWRITE MEMBERP-WHEN-MEMBERP-OF-CDR-CHEAP))
 (1 1 (:TYPE-PRESCRIPTION LEN))
 (1 1 (:REWRITE USE-INT20-LIST-P-2))
 (1 1 (:REWRITE NOT-MEMBERP-WHEN-MEMBERP-OF-TAKE))
 (1 1 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-2))
 (1 1 (:REWRITE MEMBERP-WHEN-SUBSETP-EQUAL-1))
 (1 1 (:REWRITE MEMBERP-WHEN-NOT-EQUAL-OF-CAR-CHEAP))
 (1 1 (:REWRITE MEMBERP-WHEN-NOT-CONS-OF-CDR-CHEAP))
 (1 1 (:REWRITE MEMBERP-OF-CONSTANT-WHEN-NOT-MEMBER-OF-CONSTANT))
 )
