(DAY)
(HOUR)
(PART)
(MOMENTP)
(MOMENTP+
 (11662 11662 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (11662 11662 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (4761 1437 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (4505 1437 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (4505 1437 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (4425 1437 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (3461 61 (:REWRITE MOD-X-Y-=-X . 4))
 (3176 3176 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (3176 3176 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (3176 3176 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (2909 107 (:REWRITE DEFAULT-MOD-RATIO))
 (2752 16 (:LINEAR RTL::MOD-BND-2))
 (2569 61 (:REWRITE MOD-ZERO . 4))
 (2529 573 (:REWRITE DEFAULT-PLUS-2))
 (2188 61 (:REWRITE MOD-ZERO . 3))
 (1844 754 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (1773 1437 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (1745 921 (:REWRITE DEFAULT-TIMES-1))
 (1521 921 (:REWRITE DEFAULT-TIMES-2))
 (1441 21 (:REWRITE FLOOR-ZERO . 5))
 (1437 1437 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (1437 1437 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (1437 1437 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (1437 1437 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (1337 573 (:REWRITE DEFAULT-PLUS-1))
 (1198 49 (:REWRITE |(mod x 1)|))
 (1142 346 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (1090 754 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (1090 754 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (993 373 (:REWRITE DEFAULT-LESS-THAN-1))
 (962 346 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (879 21 (:REWRITE FLOOR-X-Y-=-1 . 2))
 (834 21 (:REWRITE FLOOR-=-X/Y . 3))
 (834 21 (:REWRITE FLOOR-=-X/Y . 2))
 (754 754 (:TYPE-PRESCRIPTION NATP))
 (750 74 (:REWRITE |(* (* x y) z)|))
 (728 16 (:LINEAR MOD-BOUNDS-3))
 (692 164 (:REWRITE |(* 1 x)|))
 (690 346 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (669 373 (:REWRITE DEFAULT-LESS-THAN-2))
 (632 5 (:REWRITE FLOOR-ZERO . 3))
 (589 61 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (560 330 (:REWRITE INTEGERP-MINUS-X))
 (539 107 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (531 21 (:REWRITE DEFAULT-FLOOR-RATIO))
 (505 5 (:REWRITE CANCEL-FLOOR-+))
 (500 66 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (480 320 (:REWRITE REDUCE-INTEGERP-+))
 (435 323 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (428 21 (:REWRITE |(floor x 1)|))
 (426 426 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (421 159 (:REWRITE |(< (+ c/d x) y)|))
 (418 370 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (418 370 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (410 346 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (400 320 (:META META-INTEGERP-CORRECT))
 (389 61 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (388 388 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (388 388 (:REWRITE NORMALIZE-ADDENDS))
 (373 373 (:REWRITE THE-FLOOR-BELOW))
 (373 373 (:REWRITE THE-FLOOR-ABOVE))
 (360 60 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (360 60 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (346 346 (:REWRITE SIMPLIFY-SUMS-<))
 (346 346 (:REWRITE INTEGERP-<-CONSTANT))
 (346 346 (:REWRITE CONSTANT-<-INTEGERP))
 (346 346 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (346 346 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (346 346 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (346 346 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (346 346 (:REWRITE |(< c (- x))|))
 (346 346 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (346 346 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (346 346 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (346 346 (:REWRITE |(< (/ x) (/ y))|))
 (346 346 (:REWRITE |(< (- x) c)|))
 (346 346 (:REWRITE |(< (- x) (- y))|))
 (318 66 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (307 107 (:REWRITE DEFAULT-MOD-1))
 (292 66 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (292 40 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (286 78 (:REWRITE ACL2-NUMBERP-X))
 (229 21 (:REWRITE FLOOR-X-Y-=--1 . 2))
 (210 6 (:REWRITE RTL::MOD-DOES-NOTHING))
 (160 32 (:LINEAR MOD-BOUNDS-2))
 (156 156 (:REWRITE |(< (+ (- c) x) y)|))
 (128 128 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (128 128 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (125 21 (:REWRITE FLOOR-X-Y-=-1 . 3))
 (125 21 (:REWRITE FLOOR-X-Y-=--1 . 3))
 (125 21 (:REWRITE DEFAULT-FLOOR-1))
 (114 114 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (114 114 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (107 107 (:REWRITE FOLD-CONSTS-IN-+))
 (107 107 (:REWRITE DEFAULT-MOD-2))
 (104 104 (:TYPE-PRESCRIPTION ABS))
 (104 26 (:REWRITE RATIONALP-X))
 (99 99 (:REWRITE |(< (/ x) 0)|))
 (99 99 (:REWRITE |(< (* x y) 0)|))
 (96 96 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (92 66 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (74 66 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (66 66 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (66 66 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (66 66 (:REWRITE |(equal c (/ x))|))
 (66 66 (:REWRITE |(equal c (- x))|))
 (66 66 (:REWRITE |(equal (/ x) c)|))
 (66 66 (:REWRITE |(equal (/ x) (/ y))|))
 (66 66 (:REWRITE |(equal (- x) c)|))
 (66 66 (:REWRITE |(equal (- x) (- y))|))
 (65 5 (:REWRITE |(floor (+ x r) i)|))
 (60 60 (:REWRITE |(< 0 (/ x))|))
 (60 60 (:REWRITE |(< 0 (* x y))|))
 (54 6 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (52 52 (:TYPE-PRESCRIPTION BOOLEANP))
 (50 10 (:REWRITE DEFAULT-MINUS))
 (47 7 (:REWRITE MOD-X-Y-=-X . 2))
 (45 5 (:REWRITE FLOOR-ZERO . 2))
 (45 5 (:REWRITE FLOOR-CANCEL-*-REWRITING-GOAL-LITERAL))
 (45 5 (:REWRITE FLOOR-CANCEL-*-CONST))
 (45 5 (:REWRITE |(floor (* x (/ y)) z) rewriting-goal-literal|))
 (40 10 (:REWRITE |(- (* c x))|))
 (39 7 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (39 7 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (36 36 (:REWRITE |(< y (+ (- c) x))|))
 (36 36 (:REWRITE |(< x (+ c/d y))|))
 (32 32 (:REWRITE |(equal (+ (- c) x) y)|))
 (30 1 (:REWRITE RTL::MOD-BY-1))
 (26 26 (:REWRITE REDUCE-RATIONALP-+))
 (26 26 (:REWRITE REDUCE-RATIONALP-*))
 (26 26 (:REWRITE RATIONALP-MINUS-X))
 (26 26 (:META META-RATIONALP-CORRECT))
 (24 24 (:REWRITE |(< 0 (* x y)) rationalp (* x y)|))
 (24 24 (:REWRITE |(< (* (/ x) y) 1) with (< x 0)|))
 (24 24 (:REWRITE |(< (* (/ x) y) 1) with (< 0 x)|))
 (21 21 (:REWRITE DEFAULT-FLOOR-2))
 (16 16 (:LINEAR RTL::MOD-BND-3))
 (10 10 (:REWRITE |(* (- x) y)|))
 (8 8 (:REWRITE |(equal (* x y) 0)|))
 (7 7 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (7 7 (:REWRITE |(mod x (- y))| . 3))
 (7 7 (:REWRITE |(mod x (- y))| . 2))
 (7 7 (:REWRITE |(mod x (- y))| . 1))
 (7 7 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (7 7 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (7 7 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (6 6 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (6 6 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (6 6 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (6 6 (:REWRITE |(* a (/ a) b)|))
 (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))) rewriting-goal-literal|))
 (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 5 (:REWRITE |(floor (+ x y) z) where (< 0 z)| . 3))
 (5 5 (:REWRITE |(floor (+ x y) z) where (< 0 z)| . 2))
 (5 5 (:REWRITE |(floor (* x (/ y)) z) not rewriting-goal-literal|))
 )
(MOMENTP*
 (40018 40018 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (40018 40018 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (40018 40018 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (22275 1743 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (16649 4558 (:REWRITE DEFAULT-TIMES-2))
 (15934 309 (:REWRITE DEFAULT-PLUS-2))
 (15746 115 (:REWRITE FLOOR-ZERO . 3))
 (15559 1743 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 1))
 (15559 1743 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (15091 1691 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (15021 61 (:REWRITE MOD-X-Y-=-X . 3))
 (14299 63 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (13643 115 (:REWRITE CANCEL-FLOOR-+))
 (12509 115 (:REWRITE FLOOR-X-Y-=-1 . 2))
 (12144 61 (:REWRITE MOD-X-Y-=-X . 4))
 (12076 115 (:REWRITE FLOOR-ZERO . 4))
 (11602 115 (:REWRITE FLOOR-ZERO . 5))
 (10281 4558 (:REWRITE DEFAULT-TIMES-1))
 (9829 63 (:REWRITE MOD-ZERO . 4))
 (9681 309 (:REWRITE DEFAULT-PLUS-1))
 (9164 58 (:REWRITE RTL::MOD-DOES-NOTHING))
 (8715 1743 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (8715 1743 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (8715 1743 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 3))
 (8715 1743 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 3))
 (8715 1743 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 2))
 (8715 1743 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 3))
 (8715 1743 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (8455 1691 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE . 3))
 (6501 115 (:REWRITE FLOOR-=-X/Y . 2))
 (5390 406 (:REWRITE INTEGERP-MINUS-X))
 (5253 117 (:REWRITE DEFAULT-FLOOR-RATIO))
 (4930 63 (:REWRITE DEFAULT-MOD-RATIO))
 (4481 228 (:REWRITE |(* (- x) y)|))
 (4085 461 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (3692 3692 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (3692 3692 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (3617 463 (:REWRITE DEFAULT-LESS-THAN-1))
 (3545 709 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (3545 709 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (3353 709 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (3353 709 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (3231 485 (:REWRITE THE-FLOOR-BELOW))
 (2350 2350 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (2151 23 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (1953 15 (:LINEAR MOD-BOUNDS-3))
 (1951 51 (:REWRITE |(< (* (/ x) y) 1) with (< 0 x)|))
 (1914 227 (:REWRITE DEFAULT-MINUS))
 (1905 463 (:REWRITE DEFAULT-LESS-THAN-2))
 (1682 35 (:REWRITE |(* 1 x)|))
 (1653 63 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (1643 61 (:REWRITE MOD-X-Y-=-X . 2))
 (1557 115 (:REWRITE FLOOR-X-Y-=--1 . 2))
 (1138 460 (:REWRITE SIMPLIFY-SUMS-<))
 (1054 115 (:REWRITE FLOOR-ZERO . 2))
 (1054 115 (:REWRITE FLOOR-X-Y-=-1 . 3))
 (1054 115 (:REWRITE FLOOR-X-Y-=--1 . 3))
 (1026 462 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (1001 51 (:REWRITE |(< (* (/ x) y) 1) with (< x 0)|))
 (980 63 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (980 63 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (970 61 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (965 6 (:REWRITE |(floor x 1)|))
 (729 462 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (717 63 (:REWRITE DEFAULT-MOD-1))
 (709 709 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (709 709 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (709 709 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (709 709 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (709 709 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (689 66 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (654 66 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (649 66 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (620 117 (:REWRITE DEFAULT-FLOOR-1))
 (577 7 (:REWRITE |(<= 1 (* (/ x) y)) with (< 0 x)|))
 (575 110 (:REWRITE FLOOR-CANCEL-*-REWRITING-GOAL-LITERAL))
 (557 462 (:REWRITE |(< (- x) c)|))
 (557 462 (:REWRITE |(< (- x) (- y))|))
 (556 9 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (530 30 (:LINEAR MOD-BOUNDS-2))
 (527 462 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (527 462 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (467 41 (:LINEAR LINEAR-FLOOR-BOUNDS-2))
 (462 462 (:REWRITE INTEGERP-<-CONSTANT))
 (462 462 (:REWRITE CONSTANT-<-INTEGERP))
 (462 462 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (462 462 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (462 462 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (462 462 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (462 462 (:REWRITE |(< c (- x))|))
 (462 462 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (462 462 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (462 462 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (462 462 (:REWRITE |(< (/ x) (/ y))|))
 (448 64 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE . 1))
 (436 107 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (436 107 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (422 290 (:REWRITE REDUCE-INTEGERP-+))
 (375 108 (:REWRITE |(floor (* x (/ y)) z) rewriting-goal-literal|))
 (374 110 (:REWRITE FLOOR-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (372 108 (:REWRITE |(floor (* x (/ y)) z) not rewriting-goal-literal|))
 (317 2 (:REWRITE |(mod x 1)|))
 (292 7 (:REWRITE |(<= 1 (* (/ x) y)) with (< x 0)|))
 (290 290 (:META META-INTEGERP-CORRECT))
 (132 132 (:TYPE-PRESCRIPTION ABS))
 (117 117 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (117 117 (:REWRITE DEFAULT-FLOOR-2))
 (108 108 (:REWRITE |(floor x (- y))| . 2))
 (108 108 (:REWRITE |(floor x (- y))| . 1))
 (108 108 (:REWRITE |(floor x (* y (/ z))) rewriting-goal-literal|))
 (108 108 (:REWRITE |(floor x (* y (/ z))) not rewriting-goal-literal|))
 (108 108 (:REWRITE |(floor (- x) y)| . 2))
 (108 108 (:REWRITE |(floor (- x) y)| . 1))
 (107 107 (:REWRITE |(< 0 (/ x))|))
 (107 107 (:REWRITE |(< 0 (* x y))|))
 (96 48 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (93 93 (:REWRITE |(< 0 (* x y)) rationalp (* x y)|))
 (93 61 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (71 66 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (68 66 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (66 66 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (66 66 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (66 66 (:REWRITE |(equal c (/ x))|))
 (66 66 (:REWRITE |(equal c (- x))|))
 (66 66 (:REWRITE |(equal (/ x) c)|))
 (66 66 (:REWRITE |(equal (/ x) (/ y))|))
 (66 66 (:REWRITE |(equal (- x) c)|))
 (66 66 (:REWRITE |(equal (- x) (- y))|))
 (63 63 (:REWRITE DEFAULT-MOD-2))
 (61 61 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (60 60 (:REWRITE |(mod x (- y))| . 3))
 (60 60 (:REWRITE |(mod x (- y))| . 2))
 (60 60 (:REWRITE |(mod x (- y))| . 1))
 (60 60 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (60 60 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (58 58 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (58 58 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (55 15 (:REWRITE ACL2-NUMBERP-X))
 (52 52 (:REWRITE |(equal (* x y) 0)|))
 (48 48 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (48 48 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (48 48 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (48 48 (:TYPE-PRESCRIPTION NATP))
 (48 48 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (40 40 (:REWRITE |(< (+ c/d x) y)|))
 (40 40 (:REWRITE |(< (+ (- c) x) y)|))
 (27 3 (:REWRITE FLOOR-POSITIVE . 2))
 (27 3 (:REWRITE FLOOR-NONPOSITIVE . 1))
 (25 25 (:REWRITE |(< (/ x) 0)|))
 (25 25 (:REWRITE |(< (* x y) 0)|))
 (22 22 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (20 20 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (20 20 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (20 5 (:REWRITE RATIONALP-X))
 (16 1 (:REWRITE |(floor (+ x r) i)|))
 (15 3 (:REWRITE FLOOR-POSITIVE . 4))
 (15 3 (:REWRITE FLOOR-POSITIVE . 3))
 (15 3 (:REWRITE FLOOR-NONPOSITIVE . 3))
 (15 3 (:REWRITE FLOOR-NONPOSITIVE . 2))
 (13 13 (:REWRITE |(< y (+ (- c) x))|))
 (13 13 (:REWRITE |(< x (+ c/d y))|))
 (12 12 (:REWRITE |(+ c (+ d x))|))
 (11 11 (:REWRITE FOLD-CONSTS-IN-+))
 (10 10 (:TYPE-PRESCRIPTION BOOLEANP))
 (9 9 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (9 9 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (9 9 (:LINEAR RTL::MOD-BND-3))
 (8 8 (:REWRITE |(equal (+ (- c) x) y)|))
 (5 5 (:REWRITE REDUCE-RATIONALP-+))
 (5 5 (:REWRITE REDUCE-RATIONALP-*))
 (5 5 (:REWRITE RATIONALP-MINUS-X))
 (5 5 (:META META-RATIONALP-CORRECT))
 (5 1 (:REWRITE FLOOR-=-X/Y . 4))
 (5 1 (:REWRITE |(equal (floor (+ x y) z) x)|))
 (3 3 (:REWRITE FLOOR-POSITIVE . 1))
 (2 2 (:REWRITE |(floor (floor x y) z)| . 5))
 (2 2 (:REWRITE |(floor (floor x y) z)| . 4))
 (2 2 (:REWRITE |(floor (floor x y) z)| . 3))
 (2 2 (:REWRITE |(floor (floor x y) z)| . 2))
 (1 1 (:REWRITE FLOOR-ZERO . 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))
 (1 1 (:REWRITE |(floor (+ x y) z) where (< 0 z)| . 3))
 (1 1 (:REWRITE |(floor (+ x y) z) where (< 0 z)| . 2))
 (1 1 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 )
(NATP-PRIORMONTHS
 (30 30 (:REWRITE REDUCE-INTEGERP-+))
 (30 30 (:REWRITE INTEGERP-MINUS-X))
 (30 30 (:META META-INTEGERP-CORRECT))
 (25 5 (:REWRITE |(+ y x)|))
 (24 22 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (24 22 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (24 22 (:REWRITE DEFAULT-LESS-THAN-1))
 (24 17 (:REWRITE DEFAULT-PLUS-2))
 (22 22 (:REWRITE THE-FLOOR-BELOW))
 (22 22 (:REWRITE THE-FLOOR-ABOVE))
 (22 22 (:REWRITE SIMPLIFY-SUMS-<))
 (22 22 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (22 22 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (22 22 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (22 22 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (22 22 (:REWRITE INTEGERP-<-CONSTANT))
 (22 22 (:REWRITE DEFAULT-LESS-THAN-2))
 (22 22 (:REWRITE CONSTANT-<-INTEGERP))
 (22 22 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (22 22 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (22 22 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (22 22 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (22 22 (:REWRITE |(< c (- x))|))
 (22 22 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (22 22 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (22 22 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (22 22 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (22 22 (:REWRITE |(< (/ x) (/ y))|))
 (22 22 (:REWRITE |(< (- x) c)|))
 (22 22 (:REWRITE |(< (- x) (- y))|))
 (17 17 (:REWRITE DEFAULT-PLUS-1))
 (13 13 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (13 13 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (13 13 (:REWRITE |(< (/ x) 0)|))
 (13 13 (:REWRITE |(< (* x y) 0)|))
 (12 12 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (12 12 (:REWRITE NORMALIZE-ADDENDS))
 (2 1 (:TYPE-PRESCRIPTION NATP-PRIORMONTHS))
 )
(MOMENTP-MOLAD)
(MOMENTP-DMOLAD)
(MOMENTP-BEHARAD)
(MOMENTP-LUNATION)
(EXPAND)
(EXPAND=
 (32440 6488 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (32440 6488 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (27365 27365 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (27365 27365 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (27365 27365 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (25732 6488 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (25732 6488 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (12181 327 (:REWRITE MOD-X-Y-=-X . 4))
 (10957 339 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (9013 323 (:REWRITE RTL::MOD-DOES-NOTHING))
 (8944 4536 (:REWRITE DEFAULT-PLUS-2))
 (7207 339 (:REWRITE MOD-ZERO . 4))
 (6488 6488 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (6488 6488 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (6488 6488 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (6488 6488 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (6488 6488 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (6108 6068 (:REWRITE DEFAULT-TIMES-1))
 (5843 52 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (5216 5216 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (5216 5216 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (5216 5216 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (5216 5216 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (4999 2504 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (4499 52 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (4409 514 (:REWRITE |(equal (+ (- c) x) y)|))
 (4128 60 (:LINEAR MOD-BOUNDS-3))
 (3235 3235 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (3194 339 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (2919 315 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (2881 649 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (2504 2504 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (2504 2504 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (2495 2495 (:TYPE-PRESCRIPTION NATP))
 (2268 544 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (2119 2119 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (2045 829 (:META META-INTEGERP-CORRECT))
 (1860 339 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (1860 339 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (1780 323 (:REWRITE MOD-X-Y-=-X . 2))
 (1780 323 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (1764 323 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (1688 738 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (1677 1677 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (1677 1677 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (1665 212 (:REWRITE RATIONALP-X))
 (1546 1518 (:REWRITE DEFAULT-LESS-THAN-1))
 (1544 1516 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (1544 1516 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (1542 302 (:REWRITE ACL2-NUMBERP-X))
 (1524 1518 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (1524 1518 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (1520 1520 (:REWRITE THE-FLOOR-BELOW))
 (1520 1520 (:REWRITE THE-FLOOR-ABOVE))
 (1518 1518 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (1518 1518 (:REWRITE INTEGERP-<-CONSTANT))
 (1518 1518 (:REWRITE DEFAULT-LESS-THAN-2))
 (1518 1518 (:REWRITE CONSTANT-<-INTEGERP))
 (1518 1518 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (1518 1518 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (1518 1518 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (1518 1518 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (1518 1518 (:REWRITE |(< c (- x))|))
 (1518 1518 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (1518 1518 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (1518 1518 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (1518 1518 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (1518 1518 (:REWRITE |(< (/ x) (/ y))|))
 (1518 1518 (:REWRITE |(< (- x) c)|))
 (1518 1518 (:REWRITE |(< (- x) (- y))|))
 (1516 1516 (:REWRITE SIMPLIFY-SUMS-<))
 (1042 120 (:LINEAR MOD-BOUNDS-2))
 (993 993 (:REWRITE |(< (+ c/d x) y)|))
 (993 993 (:REWRITE |(< (+ (- c) x) y)|))
 (830 830 (:REWRITE INTEGERP-MINUS-X))
 (701 701 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (649 649 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (649 649 (:REWRITE |(equal c (/ x))|))
 (649 649 (:REWRITE |(equal c (- x))|))
 (649 649 (:REWRITE |(equal (/ x) c)|))
 (649 649 (:REWRITE |(equal (/ x) (/ y))|))
 (649 649 (:REWRITE |(equal (- x) c)|))
 (649 649 (:REWRITE |(equal (- x) (- y))|))
 (635 635 (:REWRITE |(+ c (+ d x))|))
 (519 519 (:REWRITE FOLD-CONSTS-IN-+))
 (392 392 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (391 391 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (366 358 (:REWRITE DEFAULT-MOD-1))
 (358 358 (:REWRITE DEFAULT-MOD-2))
 (340 340 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (327 327 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (327 327 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (327 327 (:REWRITE |(< 0 (/ x))|))
 (327 327 (:REWRITE |(< 0 (* x y))|))
 (323 323 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (323 323 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (323 323 (:REWRITE |(mod x (- y))| . 3))
 (323 323 (:REWRITE |(mod x (- y))| . 2))
 (323 323 (:REWRITE |(mod x (- y))| . 1))
 (323 323 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (323 323 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (323 323 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (315 315 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (315 315 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (315 315 (:REWRITE |(< y (+ (- c) x))|))
 (315 315 (:REWRITE |(< x (+ c/d y))|))
 (233 225 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (212 212 (:REWRITE RATIONALP-MINUS-X))
 (202 202 (:REWRITE |(< (/ x) 0)|))
 (202 202 (:REWRITE |(< (* x y) 0)|))
 (200 200 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (200 200 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (195 195 (:META META-RATIONALP-CORRECT))
 (140 140 (:TYPE-PRESCRIPTION BOOLEANP))
 (60 60 (:LINEAR RTL::MOD-BND-3))
 (56 56 (:TYPE-PRESCRIPTION ABS))
 (18 3 (:REWRITE INTEGERP-MOD-2))
 (18 3 (:REWRITE INTEGERP-MOD-1))
 (18 3 (:REWRITE RTL::INTEGERP-MOD))
 (6 6 (:REWRITE |(equal (* x y) 0)|))
 (2 2 (:REWRITE MOD-NEGATIVE . 3))
 (2 2 (:REWRITE MOD-NEGATIVE . 2))
 (1 1 (:REWRITE |(* (- x) y)|))
 )
(EXPAND+
 (12948 41 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (10031 2 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (9840 2 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (8784 204 (:REWRITE RTL::INTEGERP-FL))
 (8437 41 (:REWRITE |(equal (+ (- c) x) y)|))
 (6986 408 (:REWRITE RTL::FL+INT-REWRITE))
 (4340 4340 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (4340 4340 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (4340 4340 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (3925 57 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (3729 53 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (3230 798 (:META META-INTEGERP-CORRECT))
 (2180 436 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (2180 436 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (1778 1778 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (1778 1778 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (1778 1778 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (1755 569 (:REWRITE DEFAULT-PLUS-2))
 (1684 436 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (1684 436 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (1513 18 (:REWRITE MOD-ZERO . 3))
 (1267 49 (:REWRITE |(equal (- x) c)|))
 (1211 569 (:REWRITE DEFAULT-PLUS-1))
 (1015 18 (:REWRITE RTL::MOD-DOES-NOTHING))
 (1007 18 (:REWRITE MOD-X-Y-=-X . 4))
 (965 18 (:REWRITE MOD-X-Y-=-X . 3))
 (941 19 (:REWRITE DEFAULT-MOD-RATIO))
 (939 19 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (830 798 (:REWRITE REDUCE-INTEGERP-+))
 (811 18 (:REWRITE MOD-ZERO . 4))
 (798 798 (:REWRITE INTEGERP-MINUS-X))
 (461 354 (:REWRITE DEFAULT-TIMES-2))
 (436 436 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (436 436 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (436 436 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (436 436 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (436 436 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (360 360 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (360 354 (:REWRITE DEFAULT-TIMES-1))
 (297 47 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (278 4 (:LINEAR MOD-BOUNDS-3))
 (276 276 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (265 265 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (265 265 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (248 124 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (206 206 (:LINEAR RTL::FL-MONOTONE-LINEAR))
 (170 18 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (162 31 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (126 98 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (125 98 (:REWRITE DEFAULT-LESS-THAN-1))
 (124 124 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (124 124 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (124 124 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (124 124 (:TYPE-PRESCRIPTION NATP))
 (124 124 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (116 16 (:REWRITE BUBBLE-DOWN-+-MATCH-3))
 (112 98 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (110 110 (:REWRITE FOLD-CONSTS-IN-+))
 (103 103 (:LINEAR RTL::N<=FL-LINEAR))
 (99 98 (:REWRITE DEFAULT-LESS-THAN-2))
 (98 98 (:REWRITE THE-FLOOR-BELOW))
 (98 98 (:REWRITE THE-FLOOR-ABOVE))
 (98 98 (:REWRITE SIMPLIFY-SUMS-<))
 (98 98 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (98 98 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (98 98 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (98 98 (:REWRITE INTEGERP-<-CONSTANT))
 (98 98 (:REWRITE CONSTANT-<-INTEGERP))
 (98 98 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (98 98 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (98 98 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (98 98 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (98 98 (:REWRITE |(< c (- x))|))
 (98 98 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (98 98 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (98 98 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (98 98 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (98 98 (:REWRITE |(< (/ x) (/ y))|))
 (98 98 (:REWRITE |(< (- x) c)|))
 (98 98 (:REWRITE |(< (- x) (- y))|))
 (96 19 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (96 19 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (92 18 (:REWRITE MOD-X-Y-=-X . 2))
 (91 18 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (91 18 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (62 61 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (60 60 (:REWRITE |(< (+ c/d x) y)|))
 (60 60 (:REWRITE |(< (+ (- c) x) y)|))
 (51 49 (:REWRITE |(equal (- x) (- y))|))
 (49 49 (:REWRITE |(equal c (/ x))|))
 (49 49 (:REWRITE |(equal c (- x))|))
 (49 49 (:REWRITE |(equal (/ x) c)|))
 (49 49 (:REWRITE |(equal (/ x) (/ y))|))
 (47 47 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (44 12 (:REWRITE ACL2-NUMBERP-X))
 (40 8 (:LINEAR MOD-BOUNDS-2))
 (36 26 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (20 20 (:REWRITE |(+ x (- x))|))
 (20 19 (:REWRITE DEFAULT-MOD-1))
 (19 19 (:REWRITE DEFAULT-MOD-2))
 (19 11 (:REWRITE DEFAULT-MINUS))
 (18 18 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (18 18 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (18 18 (:REWRITE |(mod x (- y))| . 3))
 (18 18 (:REWRITE |(mod x (- y))| . 2))
 (18 18 (:REWRITE |(mod x (- y))| . 1))
 (18 18 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (18 18 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (18 18 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (18 18 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (18 18 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (18 18 (:REWRITE |(< y (+ (- c) x))|))
 (18 18 (:REWRITE |(< x (+ c/d y))|))
 (18 18 (:REWRITE |(< 0 (/ x))|))
 (18 18 (:REWRITE |(< 0 (* x y))|))
 (18 18 (:REWRITE |(< (/ x) 0)|))
 (18 18 (:REWRITE |(< (* x y) 0)|))
 (16 16 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (16 4 (:REWRITE RATIONALP-X))
 (8 8 (:TYPE-PRESCRIPTION BOOLEANP))
 (8 8 (:REWRITE |(* (- x) y)|))
 (6 2 (:REWRITE |(* -1 x)|))
 (4 4 (:TYPE-PRESCRIPTION ABS))
 (4 4 (:REWRITE REDUCE-RATIONALP-+))
 (4 4 (:REWRITE REDUCE-RATIONALP-*))
 (4 4 (:REWRITE RATIONALP-MINUS-X))
 (4 4 (:META META-RATIONALP-CORRECT))
 (4 2 (:REWRITE |(- (- x))|))
 (4 2 (:REWRITE |(* a (/ a) b)|))
 (3 2 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (2 2 (:LINEAR RTL::MOD-BND-3))
 )
(EXPAND*
 (5343 35 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (4564 2 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (4214 2 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (3566 182 (:REWRITE RTL::INTEGERP-FL))
 (3545 27 (:REWRITE |(equal (+ (- c) x) y)|))
 (2030 116 (:REWRITE RTL::FL+INT-REWRITE))
 (2015 51 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (1926 47 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (1720 344 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (1720 344 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (1653 1653 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (1653 1653 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (1653 1653 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (1446 1446 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (1446 1446 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (1446 1446 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (1336 344 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (1336 344 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (923 327 (:REWRITE DEFAULT-PLUS-2))
 (909 18 (:REWRITE MOD-X-Y-=-X . 4))
 (841 18 (:REWRITE MOD-ZERO . 3))
 (836 18 (:REWRITE MOD-X-Y-=-X . 3))
 (831 19 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (779 18 (:REWRITE RTL::MOD-DOES-NOTHING))
 (684 327 (:REWRITE DEFAULT-PLUS-1))
 (681 18 (:REWRITE MOD-ZERO . 4))
 (662 43 (:REWRITE |(equal (- x) c)|))
 (615 19 (:REWRITE DEFAULT-MOD-RATIO))
 (577 373 (:REWRITE DEFAULT-TIMES-2))
 (379 373 (:REWRITE DEFAULT-TIMES-1))
 (344 344 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (344 344 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (344 344 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (344 344 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (344 344 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (327 305 (:REWRITE REDUCE-INTEGERP-+))
 (305 305 (:REWRITE INTEGERP-MINUS-X))
 (305 305 (:META META-INTEGERP-CORRECT))
 (265 41 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (240 240 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (197 197 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (192 96 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (182 182 (:LINEAR RTL::FL-MONOTONE-LINEAR))
 (173 4 (:LINEAR MOD-BOUNDS-3))
 (156 29 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (109 89 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (108 89 (:REWRITE DEFAULT-LESS-THAN-1))
 (99 89 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (96 96 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (96 96 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (96 96 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (96 96 (:TYPE-PRESCRIPTION NATP))
 (96 96 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (96 19 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (96 19 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (92 18 (:REWRITE MOD-X-Y-=-X . 2))
 (91 91 (:LINEAR RTL::N<=FL-LINEAR))
 (91 18 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (91 18 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (90 89 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (90 89 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (90 89 (:REWRITE DEFAULT-LESS-THAN-2))
 (89 89 (:REWRITE THE-FLOOR-BELOW))
 (89 89 (:REWRITE THE-FLOOR-ABOVE))
 (89 89 (:REWRITE SIMPLIFY-SUMS-<))
 (89 89 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (89 89 (:REWRITE INTEGERP-<-CONSTANT))
 (89 89 (:REWRITE CONSTANT-<-INTEGERP))
 (89 89 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (89 89 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (89 89 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (89 89 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (89 89 (:REWRITE |(< c (- x))|))
 (89 89 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (89 89 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (89 89 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (89 89 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (89 89 (:REWRITE |(< (/ x) (/ y))|))
 (89 89 (:REWRITE |(< (- x) c)|))
 (89 89 (:REWRITE |(< (- x) (- y))|))
 (80 8 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (68 68 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (68 68 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (60 8 (:REWRITE BUBBLE-DOWN-+-MATCH-3))
 (53 52 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (45 43 (:REWRITE |(equal (- x) (- y))|))
 (43 43 (:REWRITE |(equal c (/ x))|))
 (43 43 (:REWRITE |(equal c (- x))|))
 (43 43 (:REWRITE |(equal (/ x) c)|))
 (43 43 (:REWRITE |(equal (/ x) (/ y))|))
 (41 41 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (40 8 (:LINEAR MOD-BOUNDS-2))
 (28 28 (:REWRITE |(< (+ c/d x) y)|))
 (28 28 (:REWRITE |(< (+ (- c) x) y)|))
 (28 18 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (22 6 (:REWRITE ACL2-NUMBERP-X))
 (21 21 (:REWRITE FOLD-CONSTS-IN-+))
 (20 19 (:REWRITE DEFAULT-MOD-1))
 (19 19 (:REWRITE DEFAULT-MOD-2))
 (18 18 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (18 18 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (18 18 (:REWRITE |(mod x (- y))| . 3))
 (18 18 (:REWRITE |(mod x (- y))| . 2))
 (18 18 (:REWRITE |(mod x (- y))| . 1))
 (18 18 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (18 18 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (18 18 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (18 18 (:REWRITE |(< 0 (/ x))|))
 (18 18 (:REWRITE |(< 0 (* x y))|))
 (16 9 (:REWRITE DEFAULT-MINUS))
 (13 13 (:REWRITE |(< (/ x) 0)|))
 (13 13 (:REWRITE |(< (* x y) 0)|))
 (12 12 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (12 12 (:REWRITE |(+ x (- x))|))
 (10 10 (:REWRITE |(equal (* x y) 0)|))
 (10 10 (:REWRITE |(< 0 (* x y)) rationalp (* x y)|))
 (8 8 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (8 8 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (8 8 (:REWRITE |(< y (+ (- c) x))|))
 (8 8 (:REWRITE |(< x (+ c/d y))|))
 (8 8 (:REWRITE |(* (- x) y)|))
 (8 2 (:REWRITE RATIONALP-X))
 (6 6 (:TYPE-PRESCRIPTION ABS))
 (6 2 (:REWRITE |(* -1 x)|))
 (4 4 (:TYPE-PRESCRIPTION BOOLEANP))
 (4 2 (:REWRITE |(- (- x))|))
 (4 2 (:REWRITE |(* a (/ a) b)|))
 (3 2 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (2 2 (:REWRITE REDUCE-RATIONALP-+))
 (2 2 (:REWRITE REDUCE-RATIONALP-*))
 (2 2 (:REWRITE RATIONALP-MINUS-X))
 (2 2 (:META META-RATIONALP-CORRECT))
 (2 2 (:LINEAR RTL::MOD-BND-3))
 (1 1 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 )
(MOLAD-LOOP-DECOMP
 (108 72 (:REWRITE DEFAULT-PLUS-2))
 (90 6 (:REWRITE |(+ (+ x y) z)|))
 (88 72 (:REWRITE DEFAULT-PLUS-1))
 (63 63 (:REWRITE THE-FLOOR-BELOW))
 (63 63 (:REWRITE THE-FLOOR-ABOVE))
 (63 63 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (63 63 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (63 63 (:REWRITE DEFAULT-LESS-THAN-2))
 (63 63 (:REWRITE DEFAULT-LESS-THAN-1))
 (60 60 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (60 60 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (60 60 (:REWRITE INTEGERP-<-CONSTANT))
 (60 60 (:REWRITE CONSTANT-<-INTEGERP))
 (60 60 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (60 60 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (60 60 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (60 60 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (60 60 (:REWRITE |(< c (- x))|))
 (60 60 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (60 60 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (60 60 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (60 60 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (60 60 (:REWRITE |(< (/ x) (/ y))|))
 (60 60 (:REWRITE |(< (- x) c)|))
 (60 60 (:REWRITE |(< (- x) (- y))|))
 (57 57 (:REWRITE SIMPLIFY-SUMS-<))
 (57 57 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (44 44 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (44 44 (:REWRITE NORMALIZE-ADDENDS))
 (27 6 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (27 6 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (27 6 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (24 24 (:REWRITE REDUCE-INTEGERP-+))
 (24 24 (:REWRITE INTEGERP-MINUS-X))
 (24 24 (:META META-INTEGERP-CORRECT))
 (20 20 (:REWRITE |(< 0 (* x y))|))
 (18 6 (:REWRITE |(+ c (+ d x))|))
 (17 17 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (17 17 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (17 17 (:REWRITE |(< 0 (/ x))|))
 (16 6 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (12 12 (:REWRITE DEFAULT-TIMES-2))
 (12 12 (:REWRITE DEFAULT-TIMES-1))
 (7 7 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (7 7 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (7 7 (:REWRITE |(< (/ x) 0)|))
 (7 7 (:REWRITE |(< (* x y) 0)|))
 (6 6 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (6 6 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (6 6 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (6 6 (:REWRITE |(equal c (/ x))|))
 (6 6 (:REWRITE |(equal c (- x))|))
 (6 6 (:REWRITE |(equal (/ x) c)|))
 (6 6 (:REWRITE |(equal (/ x) (/ y))|))
 (6 6 (:REWRITE |(equal (- x) c)|))
 (6 6 (:REWRITE |(equal (- x) (- y))|))
 (3 3 (:REWRITE FOLD-CONSTS-IN-+))
 (3 3 (:REWRITE |(<= (/ x) y) with (< x 0)|))
 (3 3 (:REWRITE |(<= (/ x) y) with (< 0 x)|))
 (3 3 (:REWRITE |(< x (/ y)) with (< y 0)|))
 (3 3 (:REWRITE |(< (+ c/d x) y)|))
 (3 3 (:REWRITE |(< (+ (- c) x) y)|))
 )
(MOLAD-NEXT
 (91 73 (:REWRITE DEFAULT-PLUS-1))
 (89 73 (:REWRITE DEFAULT-PLUS-2))
 (55 10 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (44 12 (:REWRITE ACL2-NUMBERP-X))
 (33 33 (:REWRITE THE-FLOOR-BELOW))
 (33 33 (:REWRITE THE-FLOOR-ABOVE))
 (33 33 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (33 33 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (33 33 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (33 33 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (33 33 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (33 33 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (33 33 (:REWRITE INTEGERP-<-CONSTANT))
 (33 33 (:REWRITE DEFAULT-LESS-THAN-2))
 (33 33 (:REWRITE DEFAULT-LESS-THAN-1))
 (33 33 (:REWRITE CONSTANT-<-INTEGERP))
 (33 33 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (33 33 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (33 33 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (33 33 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (33 33 (:REWRITE |(< c (- x))|))
 (33 33 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (33 33 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (33 33 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (33 33 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (33 33 (:REWRITE |(< (/ x) (/ y))|))
 (33 33 (:REWRITE |(< (- x) c)|))
 (33 33 (:REWRITE |(< (- x) (- y))|))
 (30 30 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (23 10 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (22 10 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (20 10 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (16 4 (:REWRITE RATIONALP-X))
 (14 14 (:REWRITE |(< y (+ (- c) x))|))
 (14 14 (:REWRITE |(< x (+ c/d y))|))
 (10 10 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (10 10 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (10 10 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (10 10 (:REWRITE |(equal c (/ x))|))
 (10 10 (:REWRITE |(equal c (- x))|))
 (10 10 (:REWRITE |(equal (/ x) c)|))
 (10 10 (:REWRITE |(equal (/ x) (/ y))|))
 (10 10 (:REWRITE |(equal (- x) c)|))
 (10 10 (:REWRITE |(equal (- x) (- y))|))
 (10 8 (:REWRITE DEFAULT-TIMES-2))
 (10 8 (:REWRITE DEFAULT-TIMES-1))
 (8 8 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (8 8 (:TYPE-PRESCRIPTION BOOLEANP))
 (8 8 (:REWRITE REDUCE-INTEGERP-+))
 (8 8 (:REWRITE INTEGERP-MINUS-X))
 (8 8 (:META META-INTEGERP-CORRECT))
 (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 REDUCE-RATIONALP-+))
 (4 4 (:REWRITE REDUCE-RATIONALP-*))
 (4 4 (:REWRITE RATIONALP-MINUS-X))
 (4 4 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (4 4 (:REWRITE |(< 0 (/ x))|))
 (4 4 (:REWRITE |(< 0 (* x y))|))
 (4 4 (:META META-RATIONALP-CORRECT))
 (3 3 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (2 2 (:REWRITE |(equal (+ (- c) x) y)|))
 (2 2 (:REWRITE |(< (+ c/d x) y)|))
 (2 2 (:REWRITE |(< (+ (- c) x) y)|))
 )
(DMOLAD-NEXT
 (96 12 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (88 24 (:REWRITE ACL2-NUMBERP-X))
 (62 36 (:REWRITE DEFAULT-PLUS-2))
 (45 36 (:REWRITE DEFAULT-PLUS-1))
 (32 12 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (32 12 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (32 12 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (32 8 (:REWRITE RATIONALP-X))
 (27 27 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (27 27 (:REWRITE NORMALIZE-ADDENDS))
 (16 16 (:TYPE-PRESCRIPTION BOOLEANP))
 (14 8 (:REWRITE DEFAULT-TIMES-2))
 (13 13 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (12 12 (:REWRITE REDUCE-INTEGERP-+))
 (12 12 (:REWRITE INTEGERP-MINUS-X))
 (12 12 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (12 12 (:REWRITE |(equal c (/ x))|))
 (12 12 (:REWRITE |(equal c (- x))|))
 (12 12 (:REWRITE |(equal (/ x) c)|))
 (12 12 (:REWRITE |(equal (/ x) (/ y))|))
 (12 12 (:REWRITE |(equal (- x) c)|))
 (12 12 (:REWRITE |(equal (- x) (- y))|))
 (12 12 (:META META-INTEGERP-CORRECT))
 (10 8 (:REWRITE DEFAULT-TIMES-1))
 (8 8 (:REWRITE REDUCE-RATIONALP-+))
 (8 8 (:REWRITE REDUCE-RATIONALP-*))
 (8 8 (:REWRITE RATIONALP-MINUS-X))
 (8 8 (:META META-RATIONALP-CORRECT))
 (6 6 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (4 4 (:REWRITE THE-FLOOR-BELOW))
 (4 4 (:REWRITE THE-FLOOR-ABOVE))
 (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 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 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 |(equal (+ (- c) x) y)|))
 (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 |(< 0 (/ x))|))
 (4 4 (:REWRITE |(< 0 (* x y))|))
 (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))|))
 (3 3 (:REWRITE FOLD-CONSTS-IN-+))
 )
(EXPAND-DMOLAD-NEXT
 (42 6 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (33 9 (:REWRITE ACL2-NUMBERP-X))
 (20 15 (:REWRITE DEFAULT-PLUS-2))
 (20 15 (:REWRITE DEFAULT-PLUS-1))
 (18 6 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (18 6 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (15 15 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (15 15 (:REWRITE NORMALIZE-ADDENDS))
 (15 6 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (12 7 (:REWRITE DEFAULT-TIMES-2))
 (12 3 (:REWRITE RATIONALP-X))
 (9 7 (:REWRITE DEFAULT-TIMES-1))
 (7 7 (:REWRITE REDUCE-INTEGERP-+))
 (7 7 (:REWRITE INTEGERP-MINUS-X))
 (7 7 (:META META-INTEGERP-CORRECT))
 (6 6 (:TYPE-PRESCRIPTION BOOLEANP))
 (6 6 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (6 6 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (6 6 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (6 6 (:REWRITE |(equal c (/ x))|))
 (6 6 (:REWRITE |(equal c (- x))|))
 (6 6 (:REWRITE |(equal (/ x) c)|))
 (6 6 (:REWRITE |(equal (/ x) (/ y))|))
 (6 6 (:REWRITE |(equal (- x) c)|))
 (6 6 (:REWRITE |(equal (- x) (- y))|))
 (5 5 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (4 4 (:REWRITE THE-FLOOR-BELOW))
 (4 4 (:REWRITE THE-FLOOR-ABOVE))
 (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 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 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 |(< 0 (/ x))|))
 (4 4 (:REWRITE |(< 0 (* x y))|))
 (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))|))
 (3 3 (:REWRITE REDUCE-RATIONALP-+))
 (3 3 (:REWRITE REDUCE-RATIONALP-*))
 (3 3 (:REWRITE RATIONALP-MINUS-X))
 (3 3 (:REWRITE |(equal (+ (- c) x) y)|))
 (3 3 (:META META-RATIONALP-CORRECT))
 )
(RH-DELAY)
(RH-REWRITE
 (1155 79 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (1154 79 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (935 187 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (935 187 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (935 187 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (935 187 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (796 796 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (796 796 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (796 796 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (796 796 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (704 79 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (333 97 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (330 10 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (320 91 (:REWRITE DEFAULT-PLUS-2))
 (187 187 (:TYPE-PRESCRIPTION MOD-ZERO . 4))
 (187 187 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (187 187 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (187 187 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (187 187 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (187 187 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (178 10 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (97 97 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (91 91 (:REWRITE DEFAULT-PLUS-1))
 (80 79 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (80 18 (:REWRITE |(+ c (+ d x))|))
 (79 79 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (79 79 (:REWRITE |(equal c (/ x))|))
 (79 79 (:REWRITE |(equal c (- x))|))
 (79 79 (:REWRITE |(equal (/ x) c)|))
 (79 79 (:REWRITE |(equal (/ x) (/ y))|))
 (79 79 (:REWRITE |(equal (- x) c)|))
 (79 79 (:REWRITE |(equal (- x) (- y))|))
 (68 2 (:REWRITE MOD-X-Y-=-X . 4))
 (60 2 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (58 2 (:REWRITE MOD-X-Y-=-X . 3))
 (54 54 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (50 2 (:REWRITE RTL::MOD-DOES-NOTHING))
 (44 2 (:REWRITE MOD-ZERO . 3))
 (38 2 (:REWRITE MOD-ZERO . 4))
 (34 34 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (34 34 (:REWRITE NORMALIZE-ADDENDS))
 (27 23 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (27 23 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (27 23 (:REWRITE DEFAULT-LESS-THAN-1))
 (24 23 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (24 23 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (23 23 (:REWRITE THE-FLOOR-BELOW))
 (23 23 (:REWRITE THE-FLOOR-ABOVE))
 (23 23 (:REWRITE SIMPLIFY-SUMS-<))
 (23 23 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (23 23 (:REWRITE INTEGERP-<-CONSTANT))
 (23 23 (:REWRITE DEFAULT-LESS-THAN-2))
 (23 23 (:REWRITE CONSTANT-<-INTEGERP))
 (23 23 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (23 23 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (23 23 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (23 23 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (23 23 (:REWRITE |(< c (- x))|))
 (23 23 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (23 23 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (23 23 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (23 23 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (23 23 (:REWRITE |(< (/ x) (/ y))|))
 (23 23 (:REWRITE |(< (- x) c)|))
 (23 23 (:REWRITE |(< (- x) (- y))|))
 (22 2 (:REWRITE DEFAULT-MOD-RATIO))
 (19 19 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (12 12 (:REWRITE DEFAULT-TIMES-2))
 (12 12 (:REWRITE DEFAULT-TIMES-1))
 (11 11 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (11 11 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (11 11 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (11 11 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (11 3 (:REWRITE ACL2-NUMBERP-X))
 (10 10 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (10 2 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (10 2 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (10 2 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (10 2 (:REWRITE MOD-X-Y-=-X . 2))
 (10 2 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (10 2 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (7 7 (:REWRITE REDUCE-INTEGERP-+))
 (7 7 (:REWRITE INTEGERP-MINUS-X))
 (7 7 (:META META-INTEGERP-CORRECT))
 (6 6 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (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)|))
 (4 1 (:REWRITE RATIONALP-X))
 (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 |(< 0 (/ x))|))
 (3 3 (:REWRITE |(< 0 (* x y))|))
 (2 2 (:TYPE-PRESCRIPTION BOOLEANP))
 (2 2 (:TYPE-PRESCRIPTION ABS))
 (2 2 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (2 2 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (2 2 (:REWRITE DEFAULT-MOD-2))
 (2 2 (:REWRITE DEFAULT-MOD-1))
 (2 2 (:REWRITE |(mod x (- y))| . 3))
 (2 2 (:REWRITE |(mod x (- y))| . 2))
 (2 2 (:REWRITE |(mod x (- y))| . 1))
 (2 2 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (2 2 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (2 2 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (1 1 (:REWRITE REDUCE-RATIONALP-+))
 (1 1 (:REWRITE REDUCE-RATIONALP-*))
 (1 1 (:REWRITE RATIONALP-MINUS-X))
 (1 1 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 (1 1 (:META META-RATIONALP-CORRECT))
 )
(LEAP-GUTS)
(LEAP-REWRITE
 (1957 53 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1957 53 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (1640 328 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (1640 328 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (1640 328 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (1640 328 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (1621 53 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1375 1375 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (1375 1375 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (1375 1375 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (1375 1375 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (462 14 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (415 79 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (328 328 (:TYPE-PRESCRIPTION MOD-ZERO . 4))
 (328 328 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (328 328 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (328 328 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (328 328 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (328 328 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (262 14 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (130 26 (:REWRITE |(+ y x)|))
 (116 26 (:REWRITE |(+ c (+ d x))|))
 (104 104 (:REWRITE DEFAULT-PLUS-2))
 (104 104 (:REWRITE DEFAULT-PLUS-1))
 (79 79 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (53 53 (:REWRITE SIMPLIFY-SUMS-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))|))
 (52 2 (:REWRITE MOD-ZERO . 1))
 (38 38 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (38 38 (:REWRITE NORMALIZE-ADDENDS))
 (35 2 (:REWRITE MOD-X-Y-=-X . 4))
 (31 2 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (30 2 (:REWRITE MOD-X-Y-=-X . 3))
 (27 27 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (26 2 (:REWRITE RTL::MOD-DOES-NOTHING))
 (23 2 (:REWRITE MOD-ZERO . 3))
 (22 2 (:REWRITE DEFAULT-MOD-RATIO))
 (20 2 (:REWRITE MOD-ZERO . 4))
 (14 14 (:REWRITE DEFAULT-TIMES-2))
 (14 14 (:REWRITE DEFAULT-TIMES-1))
 (14 14 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (14 14 (:REWRITE |(+ 0 x)|))
 (13 13 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (13 13 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (13 13 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (13 13 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (10 6 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (10 6 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (10 6 (:REWRITE DEFAULT-LESS-THAN-1))
 (10 2 (:REWRITE MOD-ZERO . 2))
 (10 2 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (10 2 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (10 2 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (10 2 (:REWRITE MOD-X-Y-=-X . 2))
 (10 2 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (10 2 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (7 7 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (7 6 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (7 6 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (6 6 (:REWRITE THE-FLOOR-BELOW))
 (6 6 (:REWRITE THE-FLOOR-ABOVE))
 (6 6 (:REWRITE SIMPLIFY-SUMS-<))
 (6 6 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (6 6 (:REWRITE INTEGERP-<-CONSTANT))
 (6 6 (:REWRITE DEFAULT-LESS-THAN-2))
 (6 6 (:REWRITE CONSTANT-<-INTEGERP))
 (6 6 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (6 6 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (6 6 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (6 6 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (6 6 (:REWRITE |(< c (- x))|))
 (6 6 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (6 6 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (6 6 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (6 6 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (6 6 (:REWRITE |(< (/ x) (/ y))|))
 (6 6 (:REWRITE |(< (- x) c)|))
 (6 6 (:REWRITE |(< (- x) (- y))|))
 (4 4 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (4 4 (:REWRITE REDUCE-INTEGERP-+))
 (4 4 (:REWRITE INTEGERP-MINUS-X))
 (4 4 (:META META-INTEGERP-CORRECT))
 (2 2 (:TYPE-PRESCRIPTION ABS))
 (2 2 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (2 2 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (2 2 (:REWRITE DEFAULT-MOD-2))
 (2 2 (:REWRITE DEFAULT-MOD-1))
 (2 2 (:REWRITE |(mod x (- y))| . 3))
 (2 2 (:REWRITE |(mod x (- y))| . 2))
 (2 2 (:REWRITE |(mod x (- y))| . 1))
 (2 2 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (2 2 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (2 2 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (2 2 (:REWRITE |(< (/ x) 0)|))
 (2 2 (:REWRITE |(< (* x y) 0)|))
 (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 y) 0) rationalp (* x y)|))
 )
(MOD-Y-1
 (275 275 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (275 275 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (275 275 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (265 53 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (265 53 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (265 53 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (265 53 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (53 53 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (53 53 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (53 53 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (53 53 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (53 53 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (18 9 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (9 9 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (9 9 (:TYPE-PRESCRIPTION NATP))
 (9 9 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 )
(MOD-Y+1
 (299 299 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (299 299 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (299 299 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (265 53 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (265 53 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (265 53 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (265 53 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (53 53 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (53 53 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (53 53 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (53 53 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (53 53 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (18 9 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (9 9 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (9 9 (:TYPE-PRESCRIPTION NATP))
 (9 9 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 )
(YEARLENGTH-EQUAL-LEMMA
 (57137 39 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (28991 22 (:REWRITE |(equal (+ (- c) x) y)|))
 (21086 170 (:REWRITE |(< (+ (- c) x) y)|))
 (19928 39 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (18212 18212 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (18212 18212 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (18212 18212 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (18118 3638 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (18118 3638 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (17086 3638 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (17086 3638 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (13982 95 (:REWRITE MOD-ZERO . 4))
 (11905 95 (:REWRITE MOD-X-Y-=-X . 4))
 (10660 95 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (9801 95 (:REWRITE MOD-ZERO . 3))
 (9799 83 (:REWRITE RTL::MOD-DOES-NOTHING))
 (8549 95 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (7877 137 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (7032 664 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (6311 459 (:REWRITE DEFAULT-PLUS-2))
 (5956 552 (:REWRITE DEFAULT-LESS-THAN-1))
 (5150 43 (:REWRITE |(< y (+ (- c) x))|))
 (4376 114 (:REWRITE |(* x (+ y z))|))
 (4017 577 (:REWRITE DEFAULT-TIMES-2))
 (3971 355 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (3638 3638 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (3638 3638 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (3638 3638 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (3638 3638 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (3638 3638 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (3525 121 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (3523 355 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (2685 577 (:REWRITE DEFAULT-TIMES-1))
 (2444 16 (:LINEAR MOD-BOUNDS-3))
 (1896 552 (:REWRITE DEFAULT-LESS-THAN-2))
 (1725 89 (:REWRITE MOD-X-Y-=-X . 2))
 (1613 89 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1307 95 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (1307 95 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (1218 5 (:REWRITE |(equal (mod a n) (mod b n))|))
 (1003 83 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (760 32 (:LINEAR MOD-BOUNDS-2))
 (749 89 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (749 89 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (721 459 (:REWRITE DEFAULT-PLUS-1))
 (703 43 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (703 43 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (664 664 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (664 664 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (664 664 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (552 552 (:REWRITE THE-FLOOR-BELOW))
 (552 552 (:REWRITE THE-FLOOR-ABOVE))
 (550 550 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (550 550 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (528 270 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (425 89 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (425 89 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (355 355 (:REWRITE SIMPLIFY-SUMS-<))
 (355 355 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (355 355 (:REWRITE INTEGERP-<-CONSTANT))
 (355 355 (:REWRITE CONSTANT-<-INTEGERP))
 (355 355 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (355 355 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (355 355 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (355 355 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (355 355 (:REWRITE |(< c (- x))|))
 (355 355 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (355 355 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (355 355 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (355 355 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (355 355 (:REWRITE |(< (/ x) (/ y))|))
 (355 355 (:REWRITE |(< (- x) c)|))
 (355 355 (:REWRITE |(< (- x) (- y))|))
 (352 52 (:REWRITE RATIONALP-X))
 (341 341 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (340 52 (:REWRITE ACL2-NUMBERP-X))
 (277 277 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (270 270 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (270 270 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (270 270 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (270 270 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (258 258 (:TYPE-PRESCRIPTION NATP))
 (213 213 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (172 172 (:REWRITE REDUCE-INTEGERP-+))
 (172 172 (:REWRITE INTEGERP-MINUS-X))
 (172 172 (:META META-INTEGERP-CORRECT))
 (170 170 (:REWRITE |(< (+ c/d x) y)|))
 (137 137 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (131 43 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (111 15 (:REWRITE DEFAULT-MINUS))
 (103 39 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (99 99 (:REWRITE DEFAULT-MOD-2))
 (91 89 (:REWRITE |(equal (- x) (- y))|))
 (89 89 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (89 89 (:REWRITE |(mod x (- y))| . 3))
 (89 89 (:REWRITE |(mod x (- y))| . 2))
 (89 89 (:REWRITE |(mod x (- y))| . 1))
 (89 89 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (89 89 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (89 89 (:REWRITE |(equal c (/ x))|))
 (89 89 (:REWRITE |(equal c (- x))|))
 (89 89 (:REWRITE |(equal (/ x) c)|))
 (89 89 (:REWRITE |(equal (/ x) (/ y))|))
 (89 89 (:REWRITE |(equal (- x) c)|))
 (83 83 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (73 73 (:REWRITE |(< (* x y) 0)|))
 (66 66 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (61 61 (:REWRITE |(< 0 (* x y))|))
 (57 5 (:REWRITE |(- (* c x))|))
 (54 6 (:REWRITE MOD-ZERO . 1))
 (54 6 (:REWRITE MOD-POSITIVE . 3))
 (52 52 (:REWRITE RATIONALP-MINUS-X))
 (48 48 (:REWRITE REDUCE-RATIONALP-+))
 (48 48 (:META META-RATIONALP-CORRECT))
 (43 43 (:REWRITE |(< x (+ c/d y))|))
 (30 6 (:REWRITE MOD-ZERO . 2))
 (30 6 (:REWRITE MOD-NONPOSITIVE))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (18 18 (:REWRITE |(< 0 (/ x))|))
 (16 16 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (16 16 (:REWRITE FOLD-CONSTS-IN-+))
 (14 14 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (14 14 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (14 14 (:REWRITE |(< (/ x) 0)|))
 (14 14 (:LINEAR RTL::MOD-BND-3))
 (12 8 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (8 8 (:TYPE-PRESCRIPTION BOOLEANP))
 (6 6 (:REWRITE MOD-POSITIVE . 2))
 (6 6 (:REWRITE MOD-POSITIVE . 1))
 (5 5 (:REWRITE |(* (- x) y)|))
 )
(MONTHSINYEAR-MOD
 (11657 17 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (9355 41 (:LINEAR MOD-BOUNDS-1))
 (5545 42 (:REWRITE |(equal (+ (- c) x) y)|))
 (4730 20 (:LINEAR RTL::MOD-BND-2))
 (4545 4545 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (4545 4545 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (4545 4545 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (4195 839 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (4195 839 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (4114 20 (:LINEAR RTL::MOD-BND-1))
 (4095 839 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (4095 839 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (4091 17 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (3699 87 (:REWRITE RTL::MOD-DOES-NOTHING))
 (3552 87 (:REWRITE MOD-X-Y-=-X . 4))
 (3277 87 (:REWRITE MOD-X-Y-=-X . 3))
 (3212 87 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (2758 87 (:REWRITE MOD-ZERO . 4))
 (2660 112 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (2576 112 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (2487 87 (:REWRITE MOD-ZERO . 3))
 (2324 112 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1812 87 (:REWRITE DEFAULT-MOD-RATIO))
 (1304 300 (:REWRITE DEFAULT-PLUS-2))
 (1217 29 (:REWRITE |(+ (+ x y) z)|))
 (911 463 (:REWRITE DEFAULT-TIMES-2))
 (839 839 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (839 839 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (839 839 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (839 839 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (839 839 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (797 300 (:REWRITE DEFAULT-PLUS-1))
 (713 1 (:REWRITE |(equal (mod a n) (mod b n))|))
 (659 463 (:REWRITE DEFAULT-TIMES-1))
 (547 87 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (547 87 (:REWRITE MOD-X-Y-=-X . 2))
 (546 29 (:REWRITE |(+ y (+ x z))|))
 (522 226 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (513 139 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (509 509 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (509 509 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (509 509 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (500 21 (:LINEAR MOD-BOUNDS-3))
 (491 87 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (491 87 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (466 226 (:REWRITE DEFAULT-LESS-THAN-1))
 (411 87 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (411 87 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (326 226 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (308 112 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (303 171 (:REWRITE NORMALIZE-ADDENDS))
 (299 299 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (282 226 (:REWRITE DEFAULT-LESS-THAN-2))
 (237 29 (:REWRITE |(+ y x)|))
 (226 226 (:REWRITE THE-FLOOR-BELOW))
 (226 226 (:REWRITE THE-FLOOR-ABOVE))
 (226 226 (:REWRITE SIMPLIFY-SUMS-<))
 (226 226 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (226 226 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (226 226 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (226 226 (:REWRITE INTEGERP-<-CONSTANT))
 (226 226 (:REWRITE CONSTANT-<-INTEGERP))
 (226 226 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (226 226 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (226 226 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (226 226 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (226 226 (:REWRITE |(< c (- x))|))
 (226 226 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (226 226 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (226 226 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (226 226 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (226 226 (:REWRITE |(< (/ x) (/ y))|))
 (226 226 (:REWRITE |(< (- x) c)|))
 (226 226 (:REWRITE |(< (- x) (- y))|))
 (210 42 (:LINEAR MOD-BOUNDS-2))
 (193 25 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (193 25 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (170 170 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (170 68 (:REWRITE |(+ c (+ d x))|))
 (167 87 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (167 87 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (143 87 (:REWRITE DEFAULT-MOD-1))
 (139 139 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (113 25 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (112 112 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (112 112 (:REWRITE |(equal c (/ x))|))
 (112 112 (:REWRITE |(equal c (- x))|))
 (112 112 (:REWRITE |(equal (/ x) c)|))
 (112 112 (:REWRITE |(equal (/ x) (/ y))|))
 (112 112 (:REWRITE |(equal (- x) c)|))
 (112 112 (:REWRITE |(equal (- x) (- y))|))
 (110 2 (:REWRITE MOD-ZERO . 1))
 (108 108 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (87 87 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (87 87 (:REWRITE DEFAULT-MOD-2))
 (87 87 (:REWRITE |(mod x (- y))| . 3))
 (87 87 (:REWRITE |(mod x (- y))| . 2))
 (87 87 (:REWRITE |(mod x (- y))| . 1))
 (87 87 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (87 87 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (83 83 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (80 40 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (80 1 (:REWRITE BUBBLE-DOWN-+-MATCH-3))
 (79 79 (:REWRITE |(< (+ c/d x) y)|))
 (79 79 (:REWRITE |(< (+ (- c) x) y)|))
 (73 73 (:REWRITE REDUCE-INTEGERP-+))
 (73 73 (:REWRITE INTEGERP-MINUS-X))
 (73 73 (:META META-INTEGERP-CORRECT))
 (55 55 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (55 55 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (55 55 (:REWRITE |(< 0 (/ x))|))
 (55 55 (:REWRITE |(< 0 (* x y))|))
 (51 15 (:REWRITE |(+ 0 x)|))
 (45 17 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (41 41 (:REWRITE FOLD-CONSTS-IN-+))
 (40 40 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (40 40 (:TYPE-PRESCRIPTION NATP))
 (40 40 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (34 34 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (34 34 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (33 1 (:REWRITE |(- (+ x y))|))
 (25 25 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (25 25 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (25 25 (:REWRITE |(< y (+ (- c) x))|))
 (25 25 (:REWRITE |(< x (+ c/d y))|))
 (20 20 (:LINEAR RTL::MOD-BND-3))
 (19 3 (:REWRITE DEFAULT-MINUS))
 (10 2 (:REWRITE MOD-ZERO . 2))
 (10 2 (:REWRITE |(- (* c x))|))
 (6 6 (:REWRITE |(< (/ x) 0)|))
 (6 6 (:REWRITE |(< (* x y) 0)|))
 (5 1 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (5 1 (:DEFINITION FIX))
 (4 4 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (4 1 (:REWRITE |(+ (* c x) (* d x))|))
 (2 2 (:REWRITE |(* (- x) y)|))
 (1 1 (:REWRITE |(* 0 x)|))
 )
(MONTHSINYEAR-SUM-MOD
 (33 33 (:REWRITE SUBSETP-MEMBER . 4))
 (33 33 (:REWRITE SUBSETP-MEMBER . 3))
 (33 33 (:REWRITE SUBSETP-MEMBER . 2))
 (33 33 (:REWRITE SUBSETP-MEMBER . 1))
 (33 33 (:REWRITE INTERSECTP-MEMBER . 3))
 (33 33 (:REWRITE INTERSECTP-MEMBER . 2))
 (32 32 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (32 32 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (32 32 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (32 32 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (32 32 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (32 32 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (32 32 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (32 32 (:REWRITE |(equal c (/ x))|))
 (32 32 (:REWRITE |(equal c (- x))|))
 (32 32 (:REWRITE |(equal (/ x) c)|))
 (32 32 (:REWRITE |(equal (/ x) (/ y))|))
 (32 32 (:REWRITE |(equal (- x) c)|))
 (32 32 (:REWRITE |(equal (- x) (- y))|))
 (2 2 (:REWRITE THE-FLOOR-BELOW))
 (2 2 (:REWRITE THE-FLOOR-ABOVE))
 (2 2 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (2 2 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (2 2 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (2 2 (:REWRITE INTEGERP-<-CONSTANT))
 (2 2 (:REWRITE DEFAULT-LESS-THAN-2))
 (2 2 (:REWRITE DEFAULT-LESS-THAN-1))
 (2 2 (:REWRITE CONSTANT-<-INTEGERP))
 (2 2 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (2 2 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (2 2 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (2 2 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (2 2 (:REWRITE |(< c (- x))|))
 (2 2 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (2 2 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (2 2 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (2 2 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (2 2 (:REWRITE |(< (/ x) (/ y))|))
 (2 2 (:REWRITE |(< (- x) c)|))
 (2 2 (:REWRITE |(< (- x) (- y))|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (1 1 (:REWRITE SIMPLIFY-SUMS-<))
 (1 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (1 1 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (1 1 (:REWRITE |(< (/ x) 0)|))
 (1 1 (:REWRITE |(< (* x y) 0)|))
 )
(MONTHSINYEAR-SUM
 (1227 182 (:REWRITE DEFAULT-PLUS-2))
 (740 182 (:REWRITE DEFAULT-PLUS-1))
 (675 675 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (675 675 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (675 675 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (675 675 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (350 70 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (350 70 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (274 70 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (274 70 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (253 23 (:REWRITE DEFAULT-MOD-RATIO))
 (126 126 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (126 126 (:REWRITE NORMALIZE-ADDENDS))
 (122 23 (:REWRITE MOD-X-Y-=-X . 4))
 (115 23 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (115 23 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (115 23 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (115 23 (:REWRITE MOD-X-Y-=-X . 2))
 (115 23 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (115 23 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (110 23 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (108 27 (:REWRITE |(* y x)|))
 (107 23 (:REWRITE MOD-X-Y-=-X . 3))
 (95 23 (:REWRITE RTL::MOD-DOES-NOTHING))
 (86 23 (:REWRITE MOD-ZERO . 3))
 (77 23 (:REWRITE MOD-ZERO . 4))
 (70 70 (:TYPE-PRESCRIPTION MOD-ZERO . 4))
 (70 70 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (70 70 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (70 70 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (70 70 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (70 70 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (54 54 (:REWRITE DEFAULT-TIMES-2))
 (54 54 (:REWRITE DEFAULT-TIMES-1))
 (51 51 (:REWRITE FOLD-CONSTS-IN-+))
 (51 51 (:REWRITE |(+ c (+ d x))|))
 (46 6 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (46 6 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (45 6 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (43 15 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (43 15 (:REWRITE DEFAULT-LESS-THAN-1))
 (38 19 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (31 31 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (31 31 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (31 31 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (31 31 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (27 27 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (23 23 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (23 23 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (23 23 (:REWRITE DEFAULT-MOD-2))
 (23 23 (:REWRITE DEFAULT-MOD-1))
 (23 23 (:REWRITE |(mod x (- y))| . 3))
 (23 23 (:REWRITE |(mod x (- y))| . 2))
 (23 23 (:REWRITE |(mod x (- y))| . 1))
 (23 23 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (23 23 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (23 23 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (22 1 (:LINEAR MOD-BOUNDS-3))
 (19 19 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (19 19 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (19 19 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (19 19 (:TYPE-PRESCRIPTION NATP))
 (19 19 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (15 15 (:REWRITE THE-FLOOR-BELOW))
 (15 15 (:REWRITE THE-FLOOR-ABOVE))
 (15 15 (:REWRITE SIMPLIFY-SUMS-<))
 (15 15 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (15 15 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (15 15 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (15 15 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (15 15 (:REWRITE INTEGERP-<-CONSTANT))
 (15 15 (:REWRITE DEFAULT-LESS-THAN-2))
 (15 15 (:REWRITE CONSTANT-<-INTEGERP))
 (15 15 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (15 15 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (15 15 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (15 15 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (15 15 (:REWRITE |(< c (- x))|))
 (15 15 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (15 15 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (15 15 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (15 15 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (15 15 (:REWRITE |(< (/ x) (/ y))|))
 (15 15 (:REWRITE |(< (- x) c)|))
 (15 15 (:REWRITE |(< (- x) (- y))|))
 (10 2 (:LINEAR MOD-BOUNDS-2))
 (9 9 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (8 6 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (6 6 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (6 6 (:REWRITE REDUCE-INTEGERP-+))
 (6 6 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (6 6 (:REWRITE INTEGERP-MINUS-X))
 (6 6 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (6 6 (:REWRITE |(equal c (/ x))|))
 (6 6 (:REWRITE |(equal c (- x))|))
 (6 6 (:REWRITE |(equal (/ x) c)|))
 (6 6 (:REWRITE |(equal (/ x) (/ y))|))
 (6 6 (:REWRITE |(equal (- x) c)|))
 (6 6 (:REWRITE |(equal (- x) (- y))|))
 (6 6 (:META META-INTEGERP-CORRECT))
 (3 3 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (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 |(< 0 (/ x))|))
 (3 3 (:REWRITE |(< 0 (* x y))|))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (2 2 (:REWRITE |(equal (+ (- c) x) y)|))
 (2 2 (:REWRITE |(< (/ x) 0)|))
 (2 2 (:REWRITE |(< (* x y) 0)|))
 )
(DMOLAD+19
 (461 269 (:REWRITE DEFAULT-PLUS-2))
 (308 269 (:REWRITE DEFAULT-PLUS-1))
 (154 154 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (154 154 (:REWRITE NORMALIZE-ADDENDS))
 (103 22 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (103 22 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (84 22 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (62 22 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (60 40 (:REWRITE DEFAULT-TIMES-2))
 (60 40 (:REWRITE DEFAULT-TIMES-1))
 (22 22 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (22 22 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (22 22 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (22 22 (:REWRITE |(equal c (/ x))|))
 (22 22 (:REWRITE |(equal c (- x))|))
 (22 22 (:REWRITE |(equal (/ x) c)|))
 (22 22 (:REWRITE |(equal (/ x) (/ y))|))
 (22 22 (:REWRITE |(equal (- x) c)|))
 (22 22 (:REWRITE |(equal (- x) (- y))|))
 (22 22 (:REWRITE |(equal (+ (- c) x) y)|))
 (20 20 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (17 17 (:REWRITE FOLD-CONSTS-IN-+))
 (1 1 (:REWRITE THE-FLOOR-BELOW))
 (1 1 (:REWRITE THE-FLOOR-ABOVE))
 (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 SIMPLIFY-SUMS-<))
 (1 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (1 1 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (1 1 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (1 1 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (1 1 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (1 1 (:REWRITE REDUCE-INTEGERP-+))
 (1 1 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (1 1 (:REWRITE INTEGERP-MINUS-X))
 (1 1 (:REWRITE INTEGERP-<-CONSTANT))
 (1 1 (:REWRITE DEFAULT-LESS-THAN-2))
 (1 1 (:REWRITE DEFAULT-LESS-THAN-1))
 (1 1 (:REWRITE CONSTANT-<-INTEGERP))
 (1 1 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (1 1 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (1 1 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (1 1 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (1 1 (:REWRITE |(< c (- x))|))
 (1 1 (:REWRITE |(< 0 (/ x))|))
 (1 1 (:REWRITE |(< 0 (* x y))|))
 (1 1 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (1 1 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (1 1 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (1 1 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (1 1 (:REWRITE |(< (/ x) (/ y))|))
 (1 1 (:REWRITE |(< (- x) c)|))
 (1 1 (:REWRITE |(< (- x) (- y))|))
 (1 1 (:META META-INTEGERP-CORRECT))
 )
(NATP-INDUCT)
(DMOLAD+19K
 (66 58 (:REWRITE DEFAULT-PLUS-2))
 (66 58 (:REWRITE DEFAULT-PLUS-1))
 (38 38 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (38 38 (:REWRITE NORMALIZE-ADDENDS))
 (32 32 (:REWRITE DEFAULT-TIMES-2))
 (32 32 (:REWRITE DEFAULT-TIMES-1))
 (24 24 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (15 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (15 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (15 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (10 5 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (8 8 (:REWRITE THE-FLOOR-BELOW))
 (8 8 (:REWRITE THE-FLOOR-ABOVE))
 (8 8 (:REWRITE SIMPLIFY-SUMS-<))
 (8 8 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (8 8 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (8 8 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (8 8 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (8 8 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (8 8 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (8 8 (:REWRITE INTEGERP-<-CONSTANT))
 (8 8 (:REWRITE DEFAULT-LESS-THAN-2))
 (8 8 (:REWRITE DEFAULT-LESS-THAN-1))
 (8 8 (:REWRITE CONSTANT-<-INTEGERP))
 (8 8 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (8 8 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (8 8 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (8 8 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (8 8 (:REWRITE |(< c (- x))|))
 (8 8 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (8 8 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (8 8 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (8 8 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (8 8 (:REWRITE |(< (/ x) (/ y))|))
 (8 8 (:REWRITE |(< (- x) c)|))
 (8 8 (:REWRITE |(< (- x) (- y))|))
 (6 6 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (6 6 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (6 6 (:REWRITE FOLD-CONSTS-IN-+))
 (6 6 (:REWRITE |(< 0 (/ x))|))
 (6 6 (:REWRITE |(< 0 (* x y))|))
 (5 5 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (5 5 (:REWRITE REDUCE-INTEGERP-+))
 (5 5 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (5 5 (:REWRITE INTEGERP-MINUS-X))
 (5 5 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (5 5 (:REWRITE |(equal c (/ x))|))
 (5 5 (:REWRITE |(equal c (- x))|))
 (5 5 (:REWRITE |(equal (/ x) c)|))
 (5 5 (:REWRITE |(equal (/ x) (/ y))|))
 (5 5 (:REWRITE |(equal (- x) c)|))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (5 5 (:REWRITE |(equal (+ (- c) x) y)|))
 (5 5 (:META META-INTEGERP-CORRECT))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (2 2 (:REWRITE |(< (/ x) 0)|))
 (2 2 (:REWRITE |(< (* x y) 0)|))
 (1 1 (:REWRITE |(< y (+ (- c) x))|))
 (1 1 (:REWRITE |(< x (+ c/d y))|))
 )
(EXPAND-DMOLAD+25920K
 (90 90 (:REWRITE DEFAULT-PLUS-2))
 (90 90 (:REWRITE DEFAULT-PLUS-1))
 (55 15 (:REWRITE ACL2-NUMBERP-X))
 (52 7 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (51 51 (:REWRITE DEFAULT-TIMES-2))
 (51 51 (:REWRITE DEFAULT-TIMES-1))
 (49 49 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (49 49 (:REWRITE NORMALIZE-ADDENDS))
 (37 37 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (26 26 (:REWRITE THE-FLOOR-BELOW))
 (26 26 (:REWRITE THE-FLOOR-ABOVE))
 (26 26 (:REWRITE SIMPLIFY-SUMS-<))
 (26 26 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (26 26 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (26 26 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (26 26 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (26 26 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (26 26 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (26 26 (:REWRITE INTEGERP-<-CONSTANT))
 (26 26 (:REWRITE DEFAULT-LESS-THAN-2))
 (26 26 (:REWRITE DEFAULT-LESS-THAN-1))
 (26 26 (:REWRITE CONSTANT-<-INTEGERP))
 (26 26 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (26 26 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (26 26 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (26 26 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (26 26 (:REWRITE |(< c (- x))|))
 (26 26 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (26 26 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (26 26 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (26 26 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (26 26 (:REWRITE |(< (/ x) (/ y))|))
 (26 26 (:REWRITE |(< (- x) c)|))
 (26 26 (:REWRITE |(< (- x) (- y))|))
 (20 5 (:REWRITE RATIONALP-X))
 (19 19 (:REWRITE REDUCE-INTEGERP-+))
 (19 19 (:REWRITE INTEGERP-MINUS-X))
 (19 19 (:META META-INTEGERP-CORRECT))
 (17 7 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (14 14 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (14 14 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (14 14 (:REWRITE FOLD-CONSTS-IN-+))
 (14 14 (:REWRITE |(< (/ x) 0)|))
 (14 14 (:REWRITE |(< (* x y) 0)|))
 (14 14 (:REWRITE |(+ c (+ d x))|))
 (12 7 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (12 7 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (10 10 (:TYPE-PRESCRIPTION BOOLEANP))
 (7 7 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (7 7 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (7 7 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (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))|))
 (5 5 (:REWRITE REDUCE-RATIONALP-+))
 (5 5 (:REWRITE REDUCE-RATIONALP-*))
 (5 5 (:REWRITE RATIONALP-MINUS-X))
 (5 5 (:META META-RATIONALP-CORRECT))
 (2 2 (:REWRITE |(equal (+ (- c) x) y)|))
 )
(DMOLAD-COMPARE
 (27577 33 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (14623 81 (:REWRITE |(equal (+ (- c) x) y)|))
 (11312 11312 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (11312 11312 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (11312 11312 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (9915 301 (:REWRITE MOD-X-Y-=-X . 4))
 (9461 1897 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (9461 1897 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (9253 1897 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (9253 1897 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (9040 301 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (8161 301 (:REWRITE MOD-X-Y-=-X . 3))
 (7041 301 (:REWRITE RTL::MOD-DOES-NOTHING))
 (6902 301 (:REWRITE MOD-ZERO . 3))
 (5819 33 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (5565 301 (:REWRITE MOD-ZERO . 4))
 (3431 301 (:REWRITE DEFAULT-MOD-RATIO))
 (2615 477 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1897 1897 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (1897 1897 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (1897 1897 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (1897 1897 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (1897 1897 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (1879 477 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1879 477 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1750 77 (:LINEAR MOD-BOUNDS-3))
 (1523 1523 (:REWRITE THE-FLOOR-BELOW))
 (1523 1523 (:REWRITE THE-FLOOR-ABOVE))
 (1523 1523 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (1523 1523 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (1523 1523 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (1523 1523 (:REWRITE INTEGERP-<-CONSTANT))
 (1523 1523 (:REWRITE DEFAULT-LESS-THAN-2))
 (1523 1523 (:REWRITE DEFAULT-LESS-THAN-1))
 (1523 1523 (:REWRITE CONSTANT-<-INTEGERP))
 (1523 1523 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (1523 1523 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (1523 1523 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (1523 1523 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (1523 1523 (:REWRITE |(< c (- x))|))
 (1523 1523 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (1523 1523 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (1523 1523 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (1523 1523 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (1523 1523 (:REWRITE |(< (/ x) (/ y))|))
 (1523 1523 (:REWRITE |(< (- x) c)|))
 (1523 1523 (:REWRITE |(< (- x) (- y))|))
 (1514 1514 (:REWRITE SIMPLIFY-SUMS-<))
 (1514 1514 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (1514 1514 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (1505 301 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (1505 301 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (1505 301 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (1505 301 (:REWRITE MOD-X-Y-=-X . 2))
 (1449 1449 (:REWRITE DEFAULT-TIMES-2))
 (1449 1449 (:REWRITE DEFAULT-TIMES-1))
 (1368 766 (:REWRITE DEFAULT-PLUS-2))
 (1232 1232 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (1232 1232 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (1232 1232 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (1232 1232 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (1109 301 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (1109 301 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (1012 276 (:REWRITE ACL2-NUMBERP-X))
 (1010 477 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (883 766 (:REWRITE DEFAULT-PLUS-1))
 (770 154 (:LINEAR MOD-BOUNDS-2))
 (742 742 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (710 710 (:REWRITE REDUCE-INTEGERP-+))
 (710 710 (:REWRITE INTEGERP-MINUS-X))
 (710 710 (:META META-INTEGERP-CORRECT))
 (698 698 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (697 301 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (697 301 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (488 488 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (488 488 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (477 477 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (477 477 (:REWRITE |(equal c (/ x))|))
 (477 477 (:REWRITE |(equal c (- x))|))
 (477 477 (:REWRITE |(equal (/ x) c)|))
 (477 477 (:REWRITE |(equal (/ x) (/ y))|))
 (477 477 (:REWRITE |(equal (- x) c)|))
 (477 477 (:REWRITE |(equal (- x) (- y))|))
 (368 92 (:REWRITE RATIONALP-X))
 (326 326 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (326 326 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (326 326 (:REWRITE |(< 0 (/ x))|))
 (326 326 (:REWRITE |(< 0 (* x y))|))
 (301 301 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (301 301 (:REWRITE DEFAULT-MOD-2))
 (301 301 (:REWRITE DEFAULT-MOD-1))
 (301 301 (:REWRITE |(mod x (- y))| . 3))
 (301 301 (:REWRITE |(mod x (- y))| . 2))
 (301 301 (:REWRITE |(mod x (- y))| . 1))
 (301 301 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (301 301 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (290 290 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (287 23 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (202 202 (:REWRITE |(< (/ x) 0)|))
 (202 202 (:REWRITE |(< (* x y) 0)|))
 (193 193 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (193 193 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (184 184 (:TYPE-PRESCRIPTION BOOLEANP))
 (134 70 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (92 92 (:REWRITE REDUCE-RATIONALP-+))
 (92 92 (:REWRITE REDUCE-RATIONALP-*))
 (92 92 (:REWRITE RATIONALP-MINUS-X))
 (92 92 (:META META-RATIONALP-CORRECT))
 (70 70 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (70 70 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (66 66 (:LINEAR RTL::MOD-BND-3))
 (65 13 (:REWRITE DEFAULT-MINUS))
 (64 64 (:TYPE-PRESCRIPTION NATP))
 (60 12 (:REWRITE |(+ 0 x)|))
 (58 58 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (58 58 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (50 10 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (33 33 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (31 31 (:REWRITE |(< (+ c/d x) y)|))
 (31 31 (:REWRITE |(< (+ (- c) x) y)|))
 (13 13 (:REWRITE |(* (- x) y)|))
 (11 11 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (10 10 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (10 10 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (10 2 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 )
(YEARLENGTH-EQUAL
 (2467 2467 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (2467 2467 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (2467 2467 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (2264 648 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (2264 648 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (2264 648 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (2264 648 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (1832 56 (:REWRITE MOD-X-Y-=-X . 3))
 (1689 56 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (1484 56 (:REWRITE MOD-ZERO . 3))
 (1418 56 (:REWRITE RTL::MOD-DOES-NOTHING))
 (1382 56 (:REWRITE MOD-X-Y-=-X . 4))
 (1344 56 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (956 570 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (812 56 (:REWRITE MOD-ZERO . 4))
 (648 648 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (648 648 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (648 648 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (648 648 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (648 648 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (594 306 (:REWRITE DEFAULT-PLUS-2))
 (570 570 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (570 570 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (477 413 (:REWRITE DEFAULT-TIMES-2))
 (471 81 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (444 444 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (444 444 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (444 444 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (444 444 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (432 60 (:REWRITE RATIONALP-X))
 (413 413 (:REWRITE DEFAULT-TIMES-1))
 (386 386 (:TYPE-PRESCRIPTION NATP))
 (280 56 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (280 56 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (280 56 (:REWRITE MOD-X-Y-=-X . 2))
 (280 56 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (280 56 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (276 52 (:REWRITE ACL2-NUMBERP-X))
 (263 263 (:REWRITE THE-FLOOR-BELOW))
 (263 263 (:REWRITE THE-FLOOR-ABOVE))
 (263 263 (:REWRITE SIMPLIFY-SUMS-<))
 (263 263 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (263 263 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (263 263 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (263 263 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (263 263 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (263 263 (:REWRITE INTEGERP-<-CONSTANT))
 (263 263 (:REWRITE DEFAULT-LESS-THAN-2))
 (263 263 (:REWRITE DEFAULT-LESS-THAN-1))
 (263 263 (:REWRITE CONSTANT-<-INTEGERP))
 (263 263 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (263 263 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (263 263 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (263 263 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (263 263 (:REWRITE |(< c (- x))|))
 (263 263 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (263 263 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (263 263 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (263 263 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (263 263 (:REWRITE |(< (/ x) (/ y))|))
 (263 263 (:REWRITE |(< (- x) c)|))
 (263 263 (:REWRITE |(< (- x) (- y))|))
 (236 71 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (212 212 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (207 9 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (184 184 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (184 184 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (180 6 (:LINEAR RTL::MOD-BND-2))
 (142 142 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (135 135 (:REWRITE REDUCE-INTEGERP-+))
 (135 135 (:REWRITE INTEGERP-MINUS-X))
 (135 135 (:META META-INTEGERP-CORRECT))
 (133 133 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (132 6 (:LINEAR MOD-BOUNDS-3))
 (86 86 (:REWRITE DEFAULT-MOD-2))
 (82 82 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (82 82 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (82 82 (:REWRITE |(< (/ x) 0)|))
 (82 82 (:REWRITE |(< (* x y) 0)|))
 (81 81 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (81 81 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (81 81 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (81 81 (:REWRITE |(equal c (/ x))|))
 (81 81 (:REWRITE |(equal c (- x))|))
 (81 81 (:REWRITE |(equal (/ x) c)|))
 (81 81 (:REWRITE |(equal (/ x) (/ y))|))
 (81 81 (:REWRITE |(equal (- x) c)|))
 (81 81 (:REWRITE |(equal (- x) (- y))|))
 (60 60 (:REWRITE RATIONALP-MINUS-X))
 (60 12 (:LINEAR MOD-BOUNDS-2))
 (59 23 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (56 56 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (56 56 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (56 56 (:REWRITE |(mod x (- y))| . 3))
 (56 56 (:REWRITE |(mod x (- y))| . 2))
 (56 56 (:REWRITE |(mod x (- y))| . 1))
 (56 56 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (56 56 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (56 56 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (51 51 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (51 51 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (51 51 (:REWRITE |(< 0 (/ x))|))
 (51 51 (:REWRITE |(< 0 (* x y))|))
 (45 9 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (44 44 (:REWRITE REDUCE-RATIONALP-+))
 (44 44 (:META META-RATIONALP-CORRECT))
 (38 38 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (27 27 (:REWRITE |(< (+ c/d x) y)|))
 (27 27 (:REWRITE |(< (+ (- c) x) y)|))
 (24 24 (:TYPE-PRESCRIPTION BOOLEANP))
 (12 12 (:REWRITE |(equal (+ (- c) x) y)|))
 (9 9 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (9 9 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (9 9 (:REWRITE |(* (- x) y)|))
 (6 6 (:LINEAR RTL::MOD-BND-3))
 (3 3 (:REWRITE FOLD-CONSTS-IN-+))
 )
(YEARLENGTH-EQUAL-MUL
 (34 34 (:REWRITE DEFAULT-PLUS-2))
 (34 34 (:REWRITE DEFAULT-PLUS-1))
 (24 24 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (24 24 (:REWRITE NORMALIZE-ADDENDS))
 (19 19 (:REWRITE DEFAULT-TIMES-2))
 (19 19 (:REWRITE DEFAULT-TIMES-1))
 (12 12 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (12 4 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (12 4 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (12 4 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (8 8 (:REWRITE THE-FLOOR-BELOW))
 (8 8 (:REWRITE THE-FLOOR-ABOVE))
 (8 8 (:REWRITE SIMPLIFY-SUMS-<))
 (8 8 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (8 8 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (8 8 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (8 8 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (8 8 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (8 8 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (8 8 (:REWRITE INTEGERP-<-CONSTANT))
 (8 8 (:REWRITE DEFAULT-LESS-THAN-2))
 (8 8 (:REWRITE DEFAULT-LESS-THAN-1))
 (8 8 (:REWRITE CONSTANT-<-INTEGERP))
 (8 8 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (8 8 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (8 8 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (8 8 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (8 8 (:REWRITE |(< c (- x))|))
 (8 8 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (8 8 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (8 8 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (8 8 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (8 8 (:REWRITE |(< (/ x) (/ y))|))
 (8 8 (:REWRITE |(< (- x) c)|))
 (8 8 (:REWRITE |(< (- x) (- y))|))
 (8 4 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (6 6 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (6 6 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (6 6 (:REWRITE |(< 0 (/ x))|))
 (6 6 (:REWRITE |(< 0 (* x y))|))
 (5 5 (:REWRITE REDUCE-INTEGERP-+))
 (5 5 (:REWRITE INTEGERP-MINUS-X))
 (5 5 (:META META-INTEGERP-CORRECT))
 (4 4 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (4 4 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (4 4 (:REWRITE FOLD-CONSTS-IN-+))
 (4 4 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (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))|))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (2 2 (:REWRITE |(< (/ x) 0)|))
 (2 2 (:REWRITE |(< (* x y) 0)|))
 (1 1 (:REWRITE |(< y (+ (- c) x))|))
 (1 1 (:REWRITE |(< x (+ c/d y))|))
 )
(YEARLENGTH-EQUAL-MOD
 (1123 38 (:LINEAR RTL::FL-DEF))
 (875 11 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (812 1 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (806 1 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (673 7 (:REWRITE |(equal (+ (- c) x) y)|))
 (646 646 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (646 646 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (646 646 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (646 646 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (634 41 (:REWRITE RTL::INTEGERP-FL))
 (520 104 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (520 104 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (411 19 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (372 17 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (340 104 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (340 104 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (292 104 (:TYPE-PRESCRIPTION MOD-ZERO . 4))
 (270 270 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (270 270 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (270 270 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (270 270 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (213 101 (:REWRITE DEFAULT-PLUS-2))
 (212 9 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (205 9 (:REWRITE MOD-X-Y-=-X . 3))
 (189 101 (:REWRITE DEFAULT-PLUS-1))
 (177 9 (:REWRITE RTL::MOD-DOES-NOTHING))
 (137 15 (:REWRITE |(equal (- x) c)|))
 (110 84 (:REWRITE DEFAULT-TIMES-2))
 (104 104 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (104 104 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (104 104 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (104 104 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (104 104 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (101 9 (:REWRITE MOD-ZERO . 3))
 (98 14 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (93 84 (:REWRITE DEFAULT-TIMES-1))
 (90 45 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (79 9 (:REWRITE DEFAULT-MOD-RATIO))
 (52 52 (:REWRITE REDUCE-INTEGERP-+))
 (52 52 (:REWRITE INTEGERP-MINUS-X))
 (52 52 (:META META-INTEGERP-CORRECT))
 (49 9 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (47 47 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (45 45 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (45 45 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (45 45 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (45 45 (:TYPE-PRESCRIPTION NATP))
 (45 45 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (45 9 (:REWRITE MOD-ZERO . 4))
 (45 9 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (45 9 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (45 9 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (45 9 (:REWRITE MOD-X-Y-=-X . 4))
 (45 9 (:REWRITE MOD-X-Y-=-X . 2))
 (45 9 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (45 9 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (44 44 (:LINEAR RTL::FL-MONOTONE-LINEAR))
 (38 38 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (30 30 (:REWRITE THE-FLOOR-BELOW))
 (30 30 (:REWRITE THE-FLOOR-ABOVE))
 (30 29 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (30 29 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (30 29 (:REWRITE DEFAULT-LESS-THAN-1))
 (29 29 (:REWRITE SIMPLIFY-SUMS-<))
 (29 29 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (29 29 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (29 29 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (29 29 (:REWRITE INTEGERP-<-CONSTANT))
 (29 29 (:REWRITE DEFAULT-LESS-THAN-2))
 (29 29 (:REWRITE CONSTANT-<-INTEGERP))
 (29 29 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (29 29 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (29 29 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (29 29 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (29 29 (:REWRITE |(< c (- x))|))
 (29 29 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (29 29 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (29 29 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (29 29 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (29 29 (:REWRITE |(< (/ x) (/ y))|))
 (29 29 (:REWRITE |(< (- x) c)|))
 (29 29 (:REWRITE |(< (- x) (- y))|))
 (22 22 (:LINEAR RTL::N<=FL-LINEAR))
 (22 2 (:LINEAR MOD-BOUNDS-3))
 (20 4 (:LINEAR MOD-BOUNDS-2))
 (16 15 (:REWRITE |(equal (- x) (- y))|))
 (15 15 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (15 15 (:REWRITE |(equal c (/ x))|))
 (15 15 (:REWRITE |(equal c (- x))|))
 (15 15 (:REWRITE |(equal (/ x) c)|))
 (15 15 (:REWRITE |(equal (/ x) (/ y))|))
 (14 14 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (14 2 (:REWRITE BUBBLE-DOWN-+-MATCH-3))
 (14 2 (:REWRITE |(* c (* d x))|))
 (10 7 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (9 9 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (9 9 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (9 9 (:REWRITE DEFAULT-MOD-2))
 (9 9 (:REWRITE DEFAULT-MOD-1))
 (9 9 (:REWRITE |(mod x (- y))| . 3))
 (9 9 (:REWRITE |(mod x (- y))| . 2))
 (9 9 (:REWRITE |(mod x (- y))| . 1))
 (9 9 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (9 9 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (9 9 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (6 3 (:REWRITE DEFAULT-MINUS))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (5 5 (:REWRITE |(< 0 (/ x))|))
 (5 5 (:REWRITE |(< 0 (* x y))|))
 (4 4 (:REWRITE |(+ x (- x))|))
 (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 |(< (/ x) 0)|))
 (3 3 (:REWRITE |(< (* x y) 0)|))
 (3 3 (:REWRITE |(* (- x) y)|))
 (3 1 (:REWRITE |(* -1 x)|))
 (2 2 (:TYPE-PRESCRIPTION ABS))
 (2 2 (:REWRITE FOLD-CONSTS-IN-+))
 (2 2 (:REWRITE |(< (+ c/d x) y)|))
 (2 2 (:REWRITE |(< (+ (- c) x) y)|))
 (2 1 (:REWRITE |(- (- x))|))
 (2 1 (:REWRITE |(* 1 x)|))
 (1 1 (:REWRITE MOD-POSITIVE . 3))
 (1 1 (:REWRITE MOD-POSITIVE . 2))
 (1 1 (:REWRITE |(equal (mod (+ x y) z) x)|))
 )
(CHECK-RH
 (10 2 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (10 2 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (4 2 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (2 2 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (2 2 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (2 2 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:TYPE-PRESCRIPTION MOD-ZERO . 4))
 (2 2 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (2 2 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (2 2 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (2 2 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (2 2 (:TYPE-PRESCRIPTION MOD-NONNEGATIVE))
 (2 2 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (2 2 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-MOD-1))
 (2 2 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 )
(CHECK-YEARLENGTH
 (2447 1327 (:REWRITE DEFAULT-PLUS-2))
 (1904 56 (:REWRITE MOD-X-Y-=-X . 4))
 (1904 56 (:REWRITE MOD-X-Y-=-X . 3))
 (1848 56 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (1680 56 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (1400 56 (:REWRITE RTL::MOD-DOES-NOTHING))
 (1232 56 (:REWRITE MOD-ZERO . 3))
 (1064 56 (:REWRITE MOD-ZERO . 4))
 (839 839 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (726 218 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (678 117 (:REWRITE RATIONALP-X))
 (616 616 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (616 616 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (616 616 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (616 616 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (613 119 (:REWRITE ACL2-NUMBERP-X))
 (364 200 (:REWRITE DEFAULT-MINUS))
 (336 272 (:REWRITE DEFAULT-TIMES-2))
 (326 230 (:REWRITE |(equal (- x) (- y))|))
 (299 299 (:REWRITE THE-FLOOR-BELOW))
 (299 299 (:REWRITE THE-FLOOR-ABOVE))
 (299 299 (:REWRITE SIMPLIFY-SUMS-<))
 (299 299 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (299 299 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (299 299 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (299 299 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (299 299 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (299 299 (:REWRITE INTEGERP-<-CONSTANT))
 (299 299 (:REWRITE DEFAULT-LESS-THAN-2))
 (299 299 (:REWRITE DEFAULT-LESS-THAN-1))
 (299 299 (:REWRITE CONSTANT-<-INTEGERP))
 (299 299 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (299 299 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (299 299 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (299 299 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (299 299 (:REWRITE |(< c (- x))|))
 (299 299 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (299 299 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (299 299 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (299 299 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (299 299 (:REWRITE |(< (/ x) (/ y))|))
 (299 299 (:REWRITE |(< (- x) c)|))
 (299 299 (:REWRITE |(< (- x) (- y))|))
 (287 134 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (280 56 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (280 56 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (280 56 (:REWRITE MOD-X-Y-=-X . 2))
 (280 56 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (280 56 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (272 272 (:REWRITE DEFAULT-TIMES-1))
 (264 264 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (264 264 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (264 264 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (264 264 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (253 134 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (230 230 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (230 230 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (230 230 (:REWRITE |(equal c (/ x))|))
 (230 230 (:REWRITE |(equal c (- x))|))
 (230 230 (:REWRITE |(equal (/ x) c)|))
 (230 230 (:REWRITE |(equal (/ x) (/ y))|))
 (226 2 (:DEFINITION MEMBER-EQUAL))
 (218 218 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (192 192 (:REWRITE REDUCE-INTEGERP-+))
 (192 192 (:REWRITE INTEGERP-MINUS-X))
 (192 192 (:META META-INTEGERP-CORRECT))
 (187 187 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (152 152 (:REWRITE FOLD-CONSTS-IN-+))
 (144 84 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (128 128 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (126 126 (:REWRITE |(equal (+ (- c) x) y)|))
 (112 112 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (112 112 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (112 112 (:REWRITE |(< (/ x) 0)|))
 (112 112 (:REWRITE |(< (* x y) 0)|))
 (111 111 (:REWRITE RATIONALP-MINUS-X))
 (95 95 (:REWRITE REDUCE-RATIONALP-+))
 (95 95 (:META META-RATIONALP-CORRECT))
 (84 84 (:REWRITE SUBSETP-MEMBER . 4))
 (84 84 (:REWRITE SUBSETP-MEMBER . 3))
 (84 84 (:REWRITE SUBSETP-MEMBER . 2))
 (84 84 (:REWRITE SUBSETP-MEMBER . 1))
 (84 84 (:REWRITE INTERSECTP-MEMBER . 3))
 (84 84 (:REWRITE INTERSECTP-MEMBER . 2))
 (75 75 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (75 75 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (75 75 (:REWRITE |(< 0 (/ x))|))
 (75 75 (:REWRITE |(< 0 (* x y))|))
 (72 72 (:REWRITE DEFAULT-MOD-2))
 (68 68 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (56 56 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (56 56 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (56 56 (:REWRITE |(mod x (- y))| . 3))
 (56 56 (:REWRITE |(mod x (- y))| . 2))
 (56 56 (:REWRITE |(mod x (- y))| . 1))
 (56 56 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (56 56 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (56 56 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (38 38 (:TYPE-PRESCRIPTION BOOLEANP))
 (4 4 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-ATOM-LISTP))
 )
(CHECK-ALL
 (62 54 (:REWRITE DEFAULT-PLUS-1))
 (54 54 (:REWRITE DEFAULT-PLUS-2))
 (18 18 (:REWRITE THE-FLOOR-BELOW))
 (18 18 (:REWRITE THE-FLOOR-ABOVE))
 (18 18 (:REWRITE DEFAULT-LESS-THAN-2))
 (18 18 (:REWRITE DEFAULT-LESS-THAN-1))
 (15 15 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (15 15 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (15 15 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (15 15 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (15 15 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (15 15 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (15 15 (:REWRITE |(< c (- x))|))
 (15 15 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (15 15 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (15 15 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (15 15 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (15 15 (:REWRITE |(< (/ x) (/ y))|))
 (15 15 (:REWRITE |(< (- x) (- y))|))
 (13 13 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (13 13 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (13 13 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (13 13 (:REWRITE INTEGERP-<-CONSTANT))
 (13 13 (:REWRITE CONSTANT-<-INTEGERP))
 (11 11 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (10 10 (:REWRITE DEFAULT-MINUS))
 (8 8 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (7 7 (:REWRITE |(+ c (+ d x))|))
 (6 6 (:REWRITE |(< y (+ (- c) x))|))
 (6 6 (:REWRITE |(< x (+ c/d y))|))
 (5 5 (:REWRITE |(< 0 (/ x))|))
 (5 5 (:REWRITE |(< 0 (* x y))|))
 (5 5 (:REWRITE |(< (+ c/d x) y)|))
 (5 5 (:REWRITE |(< (+ (- c) x) y)|))
 (4 2 (:REWRITE GL::NFIX-NATP))
 (3 3 (:REWRITE FOLD-CONSTS-IN-+))
 (3 3 (:REWRITE |(< (/ x) 0)|))
 (3 3 (:REWRITE |(< (* x y) 0)|))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (2 2 (:REWRITE REDUCE-INTEGERP-+))
 (2 2 (:REWRITE INTEGERP-MINUS-X))
 (2 2 (:META META-INTEGERP-CORRECT))
 )
(CHECK-ALL-LEMMA
 (27 27 (:REWRITE THE-FLOOR-BELOW))
 (27 27 (:REWRITE THE-FLOOR-ABOVE))
 (27 27 (:REWRITE SIMPLIFY-SUMS-<))
 (27 27 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (27 27 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (27 27 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (27 27 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (27 27 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (27 27 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (27 27 (:REWRITE INTEGERP-<-CONSTANT))
 (27 27 (:REWRITE DEFAULT-LESS-THAN-2))
 (27 27 (:REWRITE DEFAULT-LESS-THAN-1))
 (27 27 (:REWRITE CONSTANT-<-INTEGERP))
 (27 27 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (27 27 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (27 27 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (27 27 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (27 27 (:REWRITE |(< c (- x))|))
 (27 27 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (27 27 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (27 27 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (27 27 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (27 27 (:REWRITE |(< (/ x) (/ y))|))
 (27 27 (:REWRITE |(< (- x) c)|))
 (27 27 (:REWRITE |(< (- x) (- y))|))
 (13 13 (:REWRITE REDUCE-INTEGERP-+))
 (13 13 (:REWRITE INTEGERP-MINUS-X))
 (13 13 (:META META-INTEGERP-CORRECT))
 (12 12 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (12 12 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (12 12 (:REWRITE |(< 0 (/ x))|))
 (12 12 (:REWRITE |(< 0 (* x y))|))
 (11 3 (:REWRITE ACL2-NUMBERP-X))
 (10 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (4 4 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (4 4 (:REWRITE NORMALIZE-ADDENDS))
 (4 4 (:REWRITE DEFAULT-PLUS-2))
 (4 4 (:REWRITE DEFAULT-PLUS-1))
 (4 1 (:REWRITE RATIONALP-X))
 (3 1 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (2 2 (:TYPE-PRESCRIPTION BOOLEANP))
 (2 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (2 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE REDUCE-RATIONALP-+))
 (1 1 (:REWRITE REDUCE-RATIONALP-*))
 (1 1 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (1 1 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (1 1 (:REWRITE RATIONALP-MINUS-X))
 (1 1 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (1 1 (:REWRITE |(equal c (/ x))|))
 (1 1 (:REWRITE |(equal c (- x))|))
 (1 1 (:REWRITE |(equal (/ x) c)|))
 (1 1 (:REWRITE |(equal (/ x) (/ y))|))
 (1 1 (:REWRITE |(equal (- x) c)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:META META-RATIONALP-CORRECT))
 )
(CHECK-SMALL-YEARLENGTH
 (2 2 (:REWRITE THE-FLOOR-BELOW))
 (2 2 (:REWRITE THE-FLOOR-ABOVE))
 (2 2 (:REWRITE SIMPLIFY-SUMS-<))
 (2 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (2 2 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (2 2 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (2 2 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (2 2 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (2 2 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (2 2 (:REWRITE INTEGERP-<-CONSTANT))
 (2 2 (:REWRITE DEFAULT-LESS-THAN-2))
 (2 2 (:REWRITE DEFAULT-LESS-THAN-1))
 (2 2 (:REWRITE CONSTANT-<-INTEGERP))
 (2 2 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (2 2 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (2 2 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (2 2 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (2 2 (:REWRITE |(< c (- x))|))
 (2 2 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (2 2 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (2 2 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (2 2 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (2 2 (:REWRITE |(< (/ x) (/ y))|))
 (2 2 (:REWRITE |(< (- x) c)|))
 (2 2 (:REWRITE |(< (- x) (- y))|))
 (2 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (2 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (2 1 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (1 1 (:REWRITE SUBSETP-TRANS2))
 (1 1 (:REWRITE SUBSETP-TRANS))
 (1 1 (:REWRITE SUBSETP-MEMBER . 4))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (1 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1 1 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (1 1 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (1 1 (:REWRITE INTERSECTP-MEMBER . 3))
 (1 1 (:REWRITE INTERSECTP-MEMBER . 2))
 (1 1 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (1 1 (:REWRITE |(equal c (/ x))|))
 (1 1 (:REWRITE |(equal c (- x))|))
 (1 1 (:REWRITE |(equal (/ x) c)|))
 (1 1 (:REWRITE |(equal (/ x) (/ y))|))
 (1 1 (:REWRITE |(equal (- x) c)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 )
(LEGAL-YEAR-LENGTHS
 (22922 18 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (11739 9 (:REWRITE |(equal (+ (- c) x) y)|))
 (7668 18 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (7622 227 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (7451 7451 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (7451 7451 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (7451 7451 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (7411 215 (:REWRITE MOD-X-Y-=-X . 3))
 (7001 215 (:REWRITE RTL::MOD-DOES-NOTHING))
 (5155 1031 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (5155 1031 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (4475 1031 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (4475 1031 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (3664 227 (:REWRITE MOD-ZERO . 4))
 (3550 215 (:REWRITE MOD-X-Y-=-X . 4))
 (2181 227 (:REWRITE DEFAULT-MOD-RATIO))
 (1327 227 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (1267 215 (:REWRITE MOD-X-Y-=-X . 2))
 (1231 227 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (1231 227 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (1185 929 (:REWRITE DEFAULT-TIMES-2))
 (1185 929 (:REWRITE DEFAULT-TIMES-1))
 (1031 1031 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (1031 1031 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (1031 1031 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (1031 1031 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (1031 1031 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (1006 462 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (947 215 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (947 215 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (927 511 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (927 511 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (823 26 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (823 26 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (799 511 (:REWRITE DEFAULT-LESS-THAN-1))
 (673 3 (:REWRITE |(equal (mod a n) (mod b n))|))
 (639 511 (:REWRITE DEFAULT-LESS-THAN-2))
 (626 26 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (540 108 (:LINEAR MOD-BOUNDS-2))
 (512 512 (:REWRITE THE-FLOOR-BELOW))
 (512 512 (:REWRITE THE-FLOOR-ABOVE))
 (511 511 (:REWRITE SIMPLIFY-SUMS-<))
 (511 511 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (511 511 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (511 511 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (511 511 (:REWRITE INTEGERP-<-CONSTANT))
 (511 511 (:REWRITE CONSTANT-<-INTEGERP))
 (511 511 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (511 511 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (511 511 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (511 511 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (511 511 (:REWRITE |(< c (- x))|))
 (511 511 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (511 511 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (511 511 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (511 511 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (511 511 (:REWRITE |(< (/ x) (/ y))|))
 (511 511 (:REWRITE |(< (- x) c)|))
 (511 511 (:REWRITE |(< (- x) (- y))|))
 (506 26 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (466 466 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (462 462 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (462 462 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (462 462 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (439 215 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (439 215 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (345 33 (:REWRITE DEFAULT-PLUS-2))
 (340 170 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (323 227 (:REWRITE DEFAULT-MOD-1))
 (276 12 (:REWRITE |(+ y x)|))
 (249 33 (:REWRITE DEFAULT-PLUS-1))
 (227 227 (:REWRITE DEFAULT-MOD-2))
 (215 215 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (215 215 (:REWRITE |(mod x (- y))| . 3))
 (215 215 (:REWRITE |(mod x (- y))| . 2))
 (215 215 (:REWRITE |(mod x (- y))| . 1))
 (215 215 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (215 215 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (170 170 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (170 170 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (170 170 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (170 170 (:TYPE-PRESCRIPTION NATP))
 (170 170 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (163 2 (:DEFINITION MEMBER-EQUAL))
 (161 161 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (119 119 (:REWRITE REDUCE-INTEGERP-+))
 (119 119 (:REWRITE INTEGERP-MINUS-X))
 (119 119 (:META META-INTEGERP-CORRECT))
 (105 6 (:REWRITE MOD-ZERO . 1))
 (86 32 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (82 18 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (60 6 (:REWRITE ACL2-NUMBERP-X))
 (48 48 (:LINEAR RTL::MOD-BND-3))
 (42 6 (:REWRITE RATIONALP-X))
 (40 11 (:REWRITE SUBSETP-MEMBER . 3))
 (32 32 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (30 6 (:REWRITE MOD-ZERO . 2))
 (28 4 (:REWRITE MOD-POSITIVE . 3))
 (26 26 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (26 26 (:REWRITE |(equal c (/ x))|))
 (26 26 (:REWRITE |(equal c (- x))|))
 (26 26 (:REWRITE |(equal (/ x) c)|))
 (26 26 (:REWRITE |(equal (/ x) (/ y))|))
 (26 26 (:REWRITE |(equal (- x) c)|))
 (26 26 (:REWRITE |(equal (- x) (- y))|))
 (15 15 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (15 15 (:REWRITE NORMALIZE-ADDENDS))
 (15 3 (:REWRITE MOD-NONPOSITIVE))
 (15 3 (:REWRITE DEFAULT-MINUS))
 (15 3 (:REWRITE |(- (* c x))|))
 (12 3 (:REWRITE |(+ c (+ d x))|))
 (11 11 (:REWRITE SUBSETP-MEMBER . 4))
 (11 11 (:REWRITE SUBSETP-MEMBER . 2))
 (11 11 (:REWRITE INTERSECTP-MEMBER . 3))
 (11 11 (:REWRITE INTERSECTP-MEMBER . 2))
 (10 3 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (9 9 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (9 9 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (9 9 (:REWRITE |(< 0 (/ x))|))
 (9 9 (:REWRITE |(< 0 (* x y))|))
 (9 1 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (8 8 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-ATOM-LISTP))
 (6 3 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (4 4 (:REWRITE MOD-POSITIVE . 2))
 (3 3 (:REWRITE SUBSETP-TRANS2))
 (3 3 (:REWRITE SUBSETP-TRANS))
 (3 3 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (3 3 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (3 3 (:REWRITE |(+ 0 x)|))
 (3 3 (:REWRITE |(* (- x) y)|))
 )
(COMP-TIME)
(NEXT-MOLAD
 (29845 5969 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (29845 5969 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (22381 22381 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (22381 22381 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (20537 5969 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (11250 2508 (:REWRITE DEFAULT-PLUS-2))
 (7099 91 (:LINEAR MOD-BOUNDS-3))
 (6328 6328 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (6328 6328 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (5969 5969 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (5969 5969 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (5969 5969 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (5847 2508 (:REWRITE DEFAULT-PLUS-1))
 (5658 5658 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (5658 5658 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (4654 2327 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (4478 65 (:REWRITE MOD-ZERO . 3))
 (4381 94 (:REWRITE DEFAULT-MOD-RATIO))
 (3585 803 (:META META-INTEGERP-CORRECT))
 (2578 1904 (:REWRITE DEFAULT-TIMES-2))
 (2426 65 (:REWRITE MOD-X-Y-=-X . 4))
 (2327 2327 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (2327 2327 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (2327 2327 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (2327 2327 (:TYPE-PRESCRIPTION NATP))
 (2327 2327 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (2102 170 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (1941 1904 (:REWRITE DEFAULT-TIMES-1))
 (1709 1709 (:REWRITE ARITH-NORMALIZE-ADDENDS))
 (1629 65 (:REWRITE MOD-ZERO . 4))
 (1554 1554 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (1450 1450 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (1427 33 (:REWRITE RTL::MOD-DOES-NOTHING))
 (1365 227 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1336 10 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (1318 552 (:REWRITE DEFAULT-LESS-THAN-1))
 (1256 10 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (1086 1086 (:REWRITE ARITH-NORMALIZE-FACTORS-SCATTER-EXPONENTS))
 (938 182 (:LINEAR MOD-BOUNDS-2))
 (936 539 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (835 803 (:REWRITE REDUCE-INTEGERP-+))
 (803 803 (:REWRITE INTEGERP-MINUS-X))
 (713 149 (:REWRITE |(equal (+ (- c) x) y)|))
 (700 544 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (700 544 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (645 645 (:REWRITE FOLD-CONSTS-IN-+))
 (560 552 (:REWRITE DEFAULT-LESS-THAN-2))
 (552 552 (:REWRITE THE-FLOOR-BELOW))
 (552 552 (:REWRITE THE-FLOOR-ABOVE))
 (552 552 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (552 552 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (544 544 (:REWRITE INTEGERP-<-CONSTANT))
 (544 544 (:REWRITE CONSTANT-<-INTEGERP))
 (544 544 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (544 544 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (544 544 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (544 544 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (544 544 (:REWRITE |(< c (- x))|))
 (544 544 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (544 544 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (544 544 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (544 544 (:REWRITE |(< (/ x) (/ y))|))
 (544 544 (:REWRITE |(< (- x) c)|))
 (544 544 (:REWRITE |(< (- x) (- y))|))
 (478 94 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (448 120 (:REWRITE ACL2-NUMBERP-X))
 (446 446 (:REWRITE |arith (+ c (+ d x))|))
 (432 432 (:LINEAR RTL::FL-MONOTONE-LINEAR))
 (343 67 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (310 33 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (292 292 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (292 292 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (261 261 (:REWRITE |(< (+ c/d x) y)|))
 (258 6 (:REWRITE MOD-ZERO . 1))
 (248 245 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (227 227 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (227 227 (:REWRITE |(equal c (/ x))|))
 (227 227 (:REWRITE |(equal c (- x))|))
 (227 227 (:REWRITE |(equal (/ x) c)|))
 (227 227 (:REWRITE |(equal (/ x) (/ y))|))
 (227 227 (:REWRITE |(equal (- x) c)|))
 (227 227 (:REWRITE |(equal (- x) (- y))|))
 (216 216 (:LINEAR RTL::N<=FL-LINEAR))
 (198 198 (:REWRITE |(< (* x y) 0)|))
 (195 195 (:REWRITE |(< (/ x) 0)|))
 (178 178 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (173 33 (:REWRITE MOD-X-Y-=-X . 2))
 (169 168 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (169 33 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (169 33 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (164 41 (:REWRITE RATIONALP-X))
 (102 94 (:REWRITE DEFAULT-MOD-1))
 (94 94 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (94 94 (:REWRITE DEFAULT-MOD-2))
 (91 91 (:LINEAR RTL::MOD-BND-3))
 (82 82 (:TYPE-PRESCRIPTION BOOLEANP))
 (59 59 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (59 59 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (59 59 (:REWRITE |(< 0 (/ x))|))
 (59 59 (:REWRITE |(< 0 (* x y))|))
 (42 6 (:REWRITE MOD-ZERO . 2))
 (41 41 (:REWRITE REDUCE-RATIONALP-+))
 (41 41 (:REWRITE REDUCE-RATIONALP-*))
 (41 41 (:REWRITE RATIONALP-MINUS-X))
 (41 41 (:META META-RATIONALP-CORRECT))
 (39 39 (:REWRITE |(< y (+ (- c) x))|))
 (39 39 (:REWRITE |(< x (+ c/d y))|))
 (33 33 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (33 33 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (33 33 (:REWRITE |(mod x (- y))| . 3))
 (33 33 (:REWRITE |(mod x (- y))| . 2))
 (33 33 (:REWRITE |(mod x (- y))| . 1))
 (33 33 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (33 33 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (33 33 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (33 33 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (33 33 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (27 23 (:REWRITE DEFAULT-MINUS))
 (3 3 (:TYPE-PRESCRIPTION ABS))
 )
(NEXT-MOLAD-COMMON
 (2408 536 (:REWRITE ACL2-NUMBERP-X))
 (1852 331 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (936 234 (:REWRITE RATIONALP-X))
 (704 331 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (540 331 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (469 331 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (391 391 (:REWRITE THE-FLOOR-BELOW))
 (391 391 (:REWRITE THE-FLOOR-ABOVE))
 (391 391 (:REWRITE DEFAULT-LESS-THAN-2))
 (389 389 (:REWRITE REDUCE-INTEGERP-+))
 (389 389 (:REWRITE INTEGERP-MINUS-X))
 (389 389 (:META META-INTEGERP-CORRECT))
 (377 359 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (359 359 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (359 359 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (359 359 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (359 359 (:REWRITE INTEGERP-<-CONSTANT))
 (359 359 (:REWRITE CONSTANT-<-INTEGERP))
 (359 359 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (359 359 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (359 359 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (359 359 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (359 359 (:REWRITE |(< c (- x))|))
 (359 359 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (359 359 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (359 359 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (359 359 (:REWRITE |(< (/ x) (/ y))|))
 (359 359 (:REWRITE |(< (- x) c)|))
 (359 359 (:REWRITE |(< (- x) (- y))|))
 (331 331 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (331 331 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (331 331 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (331 331 (:REWRITE |(equal c (/ x))|))
 (331 331 (:REWRITE |(equal c (- x))|))
 (331 331 (:REWRITE |(equal (/ x) c)|))
 (331 331 (:REWRITE |(equal (/ x) (/ y))|))
 (331 331 (:REWRITE |(equal (- x) c)|))
 (331 331 (:REWRITE |(equal (- x) (- y))|))
 (328 328 (:TYPE-PRESCRIPTION BOOLEANP))
 (321 321 (:REWRITE SIMPLIFY-SUMS-<))
 (321 321 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (321 321 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (234 234 (:REWRITE REDUCE-RATIONALP-+))
 (234 234 (:REWRITE REDUCE-RATIONALP-*))
 (234 234 (:REWRITE RATIONALP-MINUS-X))
 (234 234 (:META META-RATIONALP-CORRECT))
 (137 137 (:REWRITE DEFAULT-PLUS-2))
 (137 137 (:REWRITE DEFAULT-PLUS-1))
 (133 133 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (125 125 (:REWRITE |(< (/ x) 0)|))
 (125 125 (:REWRITE |(< (* x y) 0)|))
 (119 119 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (119 119 (:REWRITE NORMALIZE-ADDENDS))
 (89 89 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (89 89 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (48 48 (:REWRITE |(equal (+ (- c) x) y)|))
 (24 24 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (24 24 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (24 24 (:REWRITE |(< 0 (/ x))|))
 (24 24 (:REWRITE |(< 0 (* x y))|))
 )
(NEXT-MOLAD-LEAP
 (336 48 (:REWRITE ACL2-NUMBERP-X))
 (144 36 (:REWRITE RATIONALP-X))
 (142 58 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (86 58 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (81 81 (:REWRITE THE-FLOOR-BELOW))
 (81 81 (:REWRITE THE-FLOOR-ABOVE))
 (81 81 (:REWRITE DEFAULT-LESS-THAN-2))
 (78 58 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (63 63 (:REWRITE SIMPLIFY-SUMS-<))
 (63 63 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (63 63 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (63 63 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (63 63 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (63 63 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (63 63 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (63 63 (:REWRITE INTEGERP-<-CONSTANT))
 (63 63 (:REWRITE CONSTANT-<-INTEGERP))
 (63 63 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (63 63 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (63 63 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (63 63 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (63 63 (:REWRITE |(< c (- x))|))
 (63 63 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (63 63 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (63 63 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (63 63 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (63 63 (:REWRITE |(< (/ x) (/ y))|))
 (63 63 (:REWRITE |(< (- x) c)|))
 (63 63 (:REWRITE |(< (- x) (- y))|))
 (62 58 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (58 58 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (58 58 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (58 58 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (58 58 (:REWRITE |(equal c (/ x))|))
 (58 58 (:REWRITE |(equal c (- x))|))
 (58 58 (:REWRITE |(equal (/ x) c)|))
 (58 58 (:REWRITE |(equal (/ x) (/ y))|))
 (58 58 (:REWRITE |(equal (- x) c)|))
 (58 58 (:REWRITE |(equal (- x) (- y))|))
 (51 51 (:REWRITE REDUCE-INTEGERP-+))
 (51 51 (:REWRITE INTEGERP-MINUS-X))
 (51 51 (:META META-INTEGERP-CORRECT))
 (43 43 (:REWRITE DEFAULT-PLUS-2))
 (43 43 (:REWRITE DEFAULT-PLUS-1))
 (36 36 (:REWRITE REDUCE-RATIONALP-+))
 (36 36 (:REWRITE REDUCE-RATIONALP-*))
 (36 36 (:REWRITE RATIONALP-MINUS-X))
 (36 36 (:META META-RATIONALP-CORRECT))
 (28 28 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (28 28 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (28 28 (:REWRITE NORMALIZE-ADDENDS))
 (16 16 (:TYPE-PRESCRIPTION BOOLEANP))
 (12 12 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (12 12 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (12 12 (:REWRITE |(< 0 (/ x))|))
 (12 12 (:REWRITE |(< 0 (* x y))|))
 (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 |(< (/ x) 0)|))
 (3 3 (:REWRITE |(< (* x y) 0)|))
 (2 2 (:REWRITE |(equal (+ (- c) x) y)|))
 )
(DAYOFWEEK-PLUS
 (239811 9 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (120360 129 (:REWRITE |(equal (+ (- c) x) y)|))
 (88027 1460 (:REWRITE RTL::MOD-DOES-NOTHING))
 (77907 9 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (71804 1460 (:REWRITE MOD-X-Y-=-X . 4))
 (71016 1460 (:REWRITE MOD-X-Y-=-X . 3))
 (67616 1460 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (66612 1460 (:REWRITE MOD-ZERO . 4))
 (52910 52910 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (52910 52910 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (52910 52910 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (42895 8579 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (42895 8579 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (42759 8579 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (42759 8579 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (35241 1460 (:REWRITE MOD-ZERO . 3))
 (30830 1460 (:REWRITE DEFAULT-MOD-RATIO))
 (15908 4892 (:REWRITE DEFAULT-TIMES-2))
 (11892 1460 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (11892 1460 (:REWRITE MOD-X-Y-=-X . 2))
 (10971 1823 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (10676 1823 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (10240 4892 (:REWRITE DEFAULT-TIMES-1))
 (9596 1460 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (9596 1460 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (9072 364 (:LINEAR MOD-BOUNDS-3))
 (8756 1460 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (8756 1460 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (8676 1824 (:REWRITE DEFAULT-LESS-THAN-1))
 (8579 8579 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (8579 8579 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (8579 8579 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (8579 8579 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (8579 8579 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (8428 564 (:REWRITE DEFAULT-PLUS-2))
 (4872 728 (:LINEAR MOD-BOUNDS-2))
 (4120 1824 (:REWRITE DEFAULT-LESS-THAN-2))
 (3957 3957 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (3957 3957 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (3957 3957 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (3756 1460 (:REWRITE DEFAULT-MOD-1))
 (3347 463 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (3347 463 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (2843 463 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (2735 2735 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (2388 120 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (2388 120 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (2300 1460 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (2300 1460 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (1970 564 (:REWRITE DEFAULT-PLUS-1))
 (1828 1824 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (1828 1824 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (1824 1824 (:REWRITE THE-FLOOR-BELOW))
 (1824 1824 (:REWRITE THE-FLOOR-ABOVE))
 (1824 1824 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (1824 1824 (:REWRITE INTEGERP-<-CONSTANT))
 (1824 1824 (:REWRITE CONSTANT-<-INTEGERP))
 (1824 1824 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (1824 1824 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (1824 1824 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (1824 1824 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (1824 1824 (:REWRITE |(< c (- x))|))
 (1824 1824 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (1824 1824 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (1824 1824 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (1824 1824 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (1824 1824 (:REWRITE |(< (/ x) (/ y))|))
 (1824 1824 (:REWRITE |(< (- x) c)|))
 (1824 1824 (:REWRITE |(< (- x) (- y))|))
 (1460 1460 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (1460 1460 (:REWRITE DEFAULT-MOD-2))
 (1460 1460 (:REWRITE |(mod x (- y))| . 3))
 (1460 1460 (:REWRITE |(mod x (- y))| . 2))
 (1460 1460 (:REWRITE |(mod x (- y))| . 1))
 (1460 1460 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (1460 1460 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (1108 120 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (1051 463 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (810 600 (:META META-INTEGERP-CORRECT))
 (601 601 (:REWRITE INTEGERP-MINUS-X))
 (479 464 (:REWRITE |(equal (/ x) c)|))
 (467 467 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (467 467 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (464 464 (:REWRITE |(equal c (/ x))|))
 (464 464 (:REWRITE |(equal (/ x) (/ y))|))
 (464 464 (:REWRITE |(equal (- x) (- y))|))
 (463 463 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (463 463 (:REWRITE |(equal c (- x))|))
 (463 463 (:REWRITE |(equal (- x) c)|))
 (454 454 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (453 453 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (453 453 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (453 453 (:REWRITE |(< 0 (/ x))|))
 (453 453 (:REWRITE |(< 0 (* x y))|))
 (399 399 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (361 361 (:LINEAR RTL::MOD-BND-3))
 (358 358 (:REWRITE |(< (+ c/d x) y)|))
 (358 358 (:REWRITE |(< (+ (- c) x) y)|))
 (241 13 (:REWRITE DEFAULT-MINUS))
 (177 9 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (154 154 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (153 153 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (121 121 (:REWRITE |(< y (+ (- c) x))|))
 (121 121 (:REWRITE |(< x (+ c/d y))|))
 (68 34 (:TYPE-PRESCRIPTION RTL::NATP-MOD))
 (42 18 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (39 3 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (37 37 (:REWRITE |(+ c (+ d x))|))
 (34 34 (:TYPE-PRESCRIPTION RTL::RATIONALP-MOD))
 (34 34 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (34 34 (:TYPE-PRESCRIPTION RTL::NATP-MOD-2))
 (34 34 (:TYPE-PRESCRIPTION NATP))
 (34 34 (:TYPE-PRESCRIPTION RTL::INTEGERP-MOD))
 (29 29 (:REWRITE FOLD-CONSTS-IN-+))
 (27 3 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (27 3 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 1))
 (27 3 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (21 21 (:REWRITE |(< (/ x) 0)|))
 (21 21 (:REWRITE |(< (* x y) 0)|))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-ZERO . 4))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 3))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 2))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 3))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE . 2))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE . 3))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 3))
 (15 3 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (9 9 (:REWRITE |(* (- x) y)|))
 (8 8 (:TYPE-PRESCRIPTION ABS))
 (3 3 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 (1 1 (:REWRITE DEFAULT-DIVIDE))
 (1 1 (:REWRITE |(not (equal x (/ y)))|))
 (1 1 (:REWRITE |(equal x (/ y))|))
 (1 1 (:REWRITE |(< 0 (* x y)) rationalp (* x y)|))
 (1 1 (:REWRITE |(/ (/ x))|))
 )
(DAYS-OF-WEEK
 (231 7 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (192 31 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (170 5 (:REWRITE MOD-X-Y-=-X . 4))
 (150 5 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (134 134 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (134 134 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (134 134 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (134 134 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (117 5 (:REWRITE MOD-X-Y-=-X . 3))
 (115 7 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (110 5 (:REWRITE MOD-ZERO . 3))
 (101 5 (:REWRITE RTL::MOD-DOES-NOTHING))
 (95 5 (:REWRITE MOD-ZERO . 4))
 (65 13 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (65 13 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (65 13 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (65 13 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (60 12 (:REWRITE |(+ y x)|))
 (55 5 (:REWRITE DEFAULT-MOD-RATIO))
 (53 12 (:REWRITE |(+ c (+ d x))|))
 (48 48 (:REWRITE DEFAULT-PLUS-2))
 (48 48 (:REWRITE DEFAULT-PLUS-1))
 (47 19 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (47 19 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (47 19 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (31 31 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (28 28 (:REWRITE DEFAULT-TIMES-2))
 (28 28 (:REWRITE DEFAULT-TIMES-1))
 (26 1 (:REWRITE MOD-ZERO . 1))
 (25 5 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (25 5 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (25 5 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (25 5 (:REWRITE MOD-X-Y-=-X . 2))
 (25 5 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (25 5 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (24 24 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (24 24 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (24 24 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (24 24 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (24 20 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (24 20 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (24 20 (:REWRITE DEFAULT-LESS-THAN-1))
 (22 1 (:LINEAR MOD-BOUNDS-3))
 (21 20 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (21 20 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (20 20 (:REWRITE THE-FLOOR-BELOW))
 (20 20 (:REWRITE THE-FLOOR-ABOVE))
 (20 20 (:REWRITE SIMPLIFY-SUMS-<))
 (20 20 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (20 20 (:REWRITE INTEGERP-<-CONSTANT))
 (20 20 (:REWRITE DEFAULT-LESS-THAN-2))
 (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))|))
 (19 19 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (19 19 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (19 19 (:REWRITE |(equal c (/ x))|))
 (19 19 (:REWRITE |(equal c (- x))|))
 (19 19 (:REWRITE |(equal (/ x) c)|))
 (19 19 (:REWRITE |(equal (/ x) (/ y))|))
 (19 19 (:REWRITE |(equal (- x) c)|))
 (19 19 (:REWRITE |(equal (- x) (- y))|))
 (17 17 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (17 17 (:REWRITE NORMALIZE-ADDENDS))
 (14 14 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (13 13 (:TYPE-PRESCRIPTION MOD-ZERO . 4))
 (13 13 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (13 13 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (13 13 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (13 13 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (13 13 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (12 12 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (10 2 (:LINEAR MOD-BOUNDS-2))
 (8 8 (:REWRITE SUBSETP-MEMBER . 4))
 (8 8 (:REWRITE SUBSETP-MEMBER . 3))
 (8 8 (:REWRITE SUBSETP-MEMBER . 2))
 (8 8 (:REWRITE SUBSETP-MEMBER . 1))
 (8 8 (:REWRITE REDUCE-INTEGERP-+))
 (8 8 (:REWRITE INTERSECTP-MEMBER . 3))
 (8 8 (:REWRITE INTERSECTP-MEMBER . 2))
 (8 8 (:REWRITE INTEGERP-MINUS-X))
 (8 8 (:META META-INTEGERP-CORRECT))
 (7 7 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (7 7 (:REWRITE |(+ 0 x)|))
 (6 6 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (5 5 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (5 5 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (5 5 (:REWRITE DEFAULT-MOD-2))
 (5 5 (:REWRITE DEFAULT-MOD-1))
 (5 5 (:REWRITE |(mod x (- y))| . 3))
 (5 5 (:REWRITE |(mod x (- y))| . 2))
 (5 5 (:REWRITE |(mod x (- y))| . 1))
 (5 5 (:REWRITE |(mod x (* y (/ z))) rewriting-goal-literal|))
 (5 5 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (5 5 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (5 5 (:REWRITE |(< 0 (/ x))|))
 (5 5 (:REWRITE |(< 0 (* x y))|))
 (5 1 (:REWRITE MOD-ZERO . 2))
 (2 2 (:TYPE-PRESCRIPTION ABS))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (2 2 (:REWRITE |(< (/ x) 0)|))
 (2 2 (:REWRITE |(< (* x y) 0)|))
 (1 1 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 (1 1 (:LINEAR RTL::MOD-BND-3))
 )
(LEGAL-YEAR-LENGTHS-ALT
 (10431 9609 (:REWRITE DEFAULT-PLUS-1))
 (9722 9609 (:REWRITE DEFAULT-PLUS-2))
 (5427 3939 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (4140 4140 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (4140 4140 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (4140 4140 (:REWRITE |(equal c (/ x))|))
 (4140 4140 (:REWRITE |(equal c (- x))|))
 (4140 4140 (:REWRITE |(equal (/ x) c)|))
 (4140 4140 (:REWRITE |(equal (/ x) (/ y))|))
 (4140 4140 (:REWRITE |(equal (- x) (- y))|))
 (4013 3241 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (3939 3939 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (3664 3664 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (1836 364 (:REWRITE ACL2-NUMBERP-X))
 (1700 1700 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (1683 1683 (:REWRITE THE-FLOOR-BELOW))
 (1683 1683 (:REWRITE THE-FLOOR-ABOVE))
 (1683 1683 (:REWRITE DEFAULT-LESS-THAN-2))
 (1652 1628 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (1628 1628 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (1628 1628 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (1628 1628 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (1628 1628 (:REWRITE INTEGERP-<-CONSTANT))
 (1628 1628 (:REWRITE CONSTANT-<-INTEGERP))
 (1628 1628 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (1628 1628 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (1628 1628 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (1628 1628 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (1628 1628 (:REWRITE |(< c (- x))|))
 (1628 1628 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (1628 1628 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (1628 1628 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (1628 1628 (:REWRITE |(< (/ x) (/ y))|))
 (1628 1628 (:REWRITE |(< (- x) c)|))
 (1628 1628 (:REWRITE |(< (- x) (- y))|))
 (1532 1532 (:REWRITE SIMPLIFY-SUMS-<))
 (1532 1532 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (1532 1532 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (1399 1399 (:REWRITE |(equal (+ (- c) x) y)|))
 (1301 1285 (:REWRITE DEFAULT-MINUS))
 (1297 1297 (:REWRITE SUBSETP-MEMBER . 4))
 (1297 1297 (:REWRITE SUBSETP-MEMBER . 3))
 (1297 1297 (:REWRITE SUBSETP-MEMBER . 2))
 (1297 1297 (:REWRITE SUBSETP-MEMBER . 1))
 (1297 1297 (:REWRITE INTERSECTP-MEMBER . 3))
 (1297 1297 (:REWRITE INTERSECTP-MEMBER . 2))
 (775 775 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (736 184 (:REWRITE RATIONALP-X))
 (518 518 (:REWRITE FOLD-CONSTS-IN-+))
 (473 473 (:REWRITE REDUCE-INTEGERP-+))
 (473 473 (:REWRITE INTEGERP-MINUS-X))
 (473 473 (:META META-INTEGERP-CORRECT))
 (196 196 (:TYPE-PRESCRIPTION BOOLEANP))
 (184 184 (:REWRITE REDUCE-RATIONALP-+))
 (184 184 (:REWRITE REDUCE-RATIONALP-*))
 (184 184 (:REWRITE RATIONALP-MINUS-X))
 (184 184 (:META META-RATIONALP-CORRECT))
 (128 128 (:REWRITE |(< (/ x) 0)|))
 (128 128 (:REWRITE |(< (* x y) 0)|))
 (124 124 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (124 124 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (124 124 (:REWRITE |(< 0 (/ x))|))
 (124 124 (:REWRITE |(< 0 (* x y))|))
 (104 104 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (104 104 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 )
(DAYOFWEEK-ROSHHASHANAH
 (99 44 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (81 44 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (78 44 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (47 44 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (44 44 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (44 44 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (44 44 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (44 44 (:REWRITE |(equal c (/ x))|))
 (44 44 (:REWRITE |(equal c (- x))|))
 (44 44 (:REWRITE |(equal (/ x) c)|))
 (44 44 (:REWRITE |(equal (/ x) (/ y))|))
 (44 44 (:REWRITE |(equal (- x) c)|))
 (44 44 (:REWRITE |(equal (- x) (- y))|))
 (33 9 (:REWRITE ACL2-NUMBERP-X))
 (26 26 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (24 24 (:REWRITE THE-FLOOR-BELOW))
 (24 24 (:REWRITE THE-FLOOR-ABOVE))
 (24 24 (:REWRITE SIMPLIFY-SUMS-<))
 (24 24 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (24 24 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (24 24 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (24 24 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (24 24 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (24 24 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (24 24 (:REWRITE INTEGERP-<-CONSTANT))
 (24 24 (:REWRITE DEFAULT-LESS-THAN-2))
 (24 24 (:REWRITE DEFAULT-LESS-THAN-1))
 (24 24 (:REWRITE CONSTANT-<-INTEGERP))
 (24 24 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (24 24 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (24 24 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (24 24 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (24 24 (:REWRITE |(< c (- x))|))
 (24 24 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (24 24 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (24 24 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (24 24 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (24 24 (:REWRITE |(< (/ x) (/ y))|))
 (24 24 (:REWRITE |(< (- x) c)|))
 (24 24 (:REWRITE |(< (- x) (- y))|))
 (22 22 (:REWRITE DEFAULT-PLUS-2))
 (22 22 (:REWRITE DEFAULT-PLUS-1))
 (21 21 (:REWRITE REDUCE-INTEGERP-+))
 (21 21 (:REWRITE INTEGERP-MINUS-X))
 (21 21 (:META META-INTEGERP-CORRECT))
 (18 18 (:REWRITE SUBSETP-MEMBER . 4))
 (18 18 (:REWRITE SUBSETP-MEMBER . 3))
 (18 18 (:REWRITE SUBSETP-MEMBER . 2))
 (18 18 (:REWRITE SUBSETP-MEMBER . 1))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 3))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 2))
 (17 17 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (17 17 (:REWRITE NORMALIZE-ADDENDS))
 (12 3 (:REWRITE RATIONALP-X))
 (9 9 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (9 9 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (9 9 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (9 9 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (9 9 (:REWRITE |(< 0 (/ x))|))
 (9 9 (:REWRITE |(< 0 (* x y))|))
 (9 9 (:REWRITE |(< (/ x) 0)|))
 (9 9 (:REWRITE |(< (* x y) 0)|))
 (6 6 (:TYPE-PRESCRIPTION BOOLEANP))
 (3 3 (:REWRITE REDUCE-RATIONALP-+))
 (3 3 (:REWRITE REDUCE-RATIONALP-*))
 (3 3 (:REWRITE RATIONALP-MINUS-X))
 (3 3 (:META META-RATIONALP-CORRECT))
 )
(KEVIYOT
 (111835 111730 (:REWRITE DEFAULT-PLUS-2))
 (68385 34020 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (50482 50482 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (47990 27554 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (37481 37481 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (37023 37023 (:REWRITE |(equal c (/ x))|))
 (37023 37023 (:REWRITE |(equal c (- x))|))
 (37023 37023 (:REWRITE |(equal (/ x) c)|))
 (37023 37023 (:REWRITE |(equal (/ x) (/ y))|))
 (37023 37023 (:REWRITE |(equal (- x) (- y))|))
 (36201 7518 (:REWRITE ACL2-NUMBERP-X))
 (34020 34020 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (16905 16905 (:REWRITE |(equal (+ (- c) x) y)|))
 (14349 3396 (:REWRITE RATIONALP-X))
 (12920 12920 (:REWRITE THE-FLOOR-BELOW))
 (12920 12920 (:REWRITE THE-FLOOR-ABOVE))
 (12920 12920 (:REWRITE SIMPLIFY-SUMS-<))
 (12920 12920 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (12920 12920 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (12920 12920 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (12920 12920 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (12920 12920 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (12920 12920 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (12920 12920 (:REWRITE INTEGERP-<-CONSTANT))
 (12920 12920 (:REWRITE DEFAULT-LESS-THAN-2))
 (12920 12920 (:REWRITE DEFAULT-LESS-THAN-1))
 (12920 12920 (:REWRITE CONSTANT-<-INTEGERP))
 (12920 12920 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (12920 12920 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (12920 12920 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (12920 12920 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (12920 12920 (:REWRITE |(< c (- x))|))
 (12920 12920 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (12920 12920 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (12920 12920 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (12920 12920 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (12920 12920 (:REWRITE |(< (/ x) (/ y))|))
 (12920 12920 (:REWRITE |(< (- x) c)|))
 (12920 12920 (:REWRITE |(< (- x) (- y))|))
 (12126 12126 (:REWRITE REDUCE-INTEGERP-+))
 (12126 12126 (:REWRITE INTEGERP-MINUS-X))
 (12126 12126 (:META META-INTEGERP-CORRECT))
 (11407 11407 (:REWRITE SUBSETP-MEMBER . 4))
 (11407 11407 (:REWRITE SUBSETP-MEMBER . 3))
 (11407 11407 (:REWRITE SUBSETP-MEMBER . 2))
 (11407 11407 (:REWRITE SUBSETP-MEMBER . 1))
 (11407 11407 (:REWRITE INTERSECTP-MEMBER . 3))
 (11407 11407 (:REWRITE INTERSECTP-MEMBER . 2))
 (10996 10996 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (7064 7064 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (6645 6645 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (6645 6645 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (6645 6645 (:REWRITE |(< (/ x) 0)|))
 (6645 6645 (:REWRITE |(< (* x y) 0)|))
 (5214 5214 (:REWRITE FOLD-CONSTS-IN-+))
 (4122 4122 (:TYPE-PRESCRIPTION BOOLEANP))
 (3393 3393 (:REWRITE REDUCE-RATIONALP-+))
 (3393 3393 (:REWRITE REDUCE-RATIONALP-*))
 (3393 3393 (:REWRITE RATIONALP-MINUS-X))
 (3393 3393 (:META META-RATIONALP-CORRECT))
 (2085 2085 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (2085 2085 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (2085 2085 (:REWRITE |(< 0 (/ x))|))
 (2085 2085 (:REWRITE |(< 0 (* x y))|))
 (1631 1 (:DEFINITION MEMBER-EQUAL))
 (360 360 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-ATOM-LISTP))
 )
(NATP-ROSHHASHANAH
 (58 24 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (57 24 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (44 24 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (25 24 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (24 24 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (24 24 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (24 24 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (24 24 (:REWRITE |(equal c (/ x))|))
 (24 24 (:REWRITE |(equal c (- x))|))
 (24 24 (:REWRITE |(equal (/ x) c)|))
 (24 24 (:REWRITE |(equal (/ x) (/ y))|))
 (24 24 (:REWRITE |(equal (- x) c)|))
 (24 24 (:REWRITE |(equal (- x) (- y))|))
 (18 18 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (11 3 (:REWRITE ACL2-NUMBERP-X))
 (8 8 (:REWRITE THE-FLOOR-BELOW))
 (8 8 (:REWRITE THE-FLOOR-ABOVE))
 (8 8 (:REWRITE SIMPLIFY-SUMS-<))
 (8 8 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (8 8 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (8 8 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (8 8 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (8 8 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (8 8 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (8 8 (:REWRITE INTEGERP-<-CONSTANT))
 (8 8 (:REWRITE DEFAULT-LESS-THAN-2))
 (8 8 (:REWRITE DEFAULT-LESS-THAN-1))
 (8 8 (:REWRITE CONSTANT-<-INTEGERP))
 (8 8 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (8 8 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (8 8 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (8 8 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (8 8 (:REWRITE |(< c (- x))|))
 (8 8 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (8 8 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (8 8 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (8 8 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (8 8 (:REWRITE |(< (/ x) (/ y))|))
 (8 8 (:REWRITE |(< (- x) c)|))
 (8 8 (:REWRITE |(< (- x) (- y))|))
 (7 7 (:REWRITE DEFAULT-PLUS-2))
 (7 7 (:REWRITE DEFAULT-PLUS-1))
 (6 6 (:REWRITE REDUCE-INTEGERP-+))
 (6 6 (:REWRITE INTEGERP-MINUS-X))
 (6 6 (:META META-INTEGERP-CORRECT))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (5 5 (:REWRITE |(< (/ x) 0)|))
 (5 5 (:REWRITE |(< (* x y) 0)|))
 (4 4 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (4 4 (:REWRITE NORMALIZE-ADDENDS))
 (4 1 (:REWRITE RATIONALP-X))
 (2 2 (:TYPE-PRESCRIPTION BOOLEANP))
 (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 REDUCE-RATIONALP-+))
 (1 1 (:REWRITE REDUCE-RATIONALP-*))
 (1 1 (:REWRITE RATIONALP-MINUS-X))
 (1 1 (:REWRITE |(< 0 (/ x))|))
 (1 1 (:REWRITE |(< 0 (* x y))|))
 (1 1 (:META META-RATIONALP-CORRECT))
 )
(MOLAD-ROSHHASHANAH
 (13979 13979 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (13979 13979 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (13979 13979 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (13600 2720 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (13600 2720 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (13600 2720 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (13600 2720 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (11790 320 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (11787 320 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (11308 754 (:REWRITE DEFAULT-TIMES-2))
 (6844 1188 (:REWRITE DEFAULT-PLUS-2))
 (5489 231 (:REWRITE DEFAULT-LESS-THAN-2))
 (2720 2720 (:TYPE-PRESCRIPTION MOD-ZERO . 3))
 (2720 2720 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (2720 2720 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (2720 2720 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (2720 2720 (:TYPE-PRESCRIPTION INTEGERP-MOD-2))
 (1264 1188 (:REWRITE DEFAULT-PLUS-1))
 (1259 1259 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (1259 1259 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (1259 1259 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (955 320 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (867 203 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (835 203 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (754 754 (:REWRITE DEFAULT-TIMES-1))
 (752 352 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (704 16 (:REWRITE MOD-X-Y-=-X-Y . 1))
 (666 666 (:REWRITE ARITH-NORMALIZE-ADDENDS))
 (546 546 (:REWRITE ARITH-NORMALIZE-FACTORS-SCATTER-EXPONENTS))
 (512 16 (:REWRITE MOD-X-Y-=-X+Y . 1))
 (464 16 (:REWRITE MOD-ZERO . 3))
 (448 448 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (448 26 (:REWRITE RTL::INTEGERP-FL))
 (426 426 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (352 352 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (322 320 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (320 320 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (320 320 (:REWRITE |(equal c (/ x))|))
 (320 320 (:REWRITE |(equal c (- x))|))
 (320 320 (:REWRITE |(equal (/ x) c)|))
 (320 320 (:REWRITE |(equal (/ x) (/ y))|))
 (320 320 (:REWRITE |(equal (- x) c)|))
 (320 320 (:REWRITE |(equal (- x) (- y))|))
 (312 16 (:REWRITE MOD-X-Y-=-X . 4))
 (304 16 (:REWRITE MOD-X-Y-=-X-Y . 2))
 (272 16 (:REWRITE DEFAULT-MOD-RATIO))
 (238 238 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (231 231 (:REWRITE THE-FLOOR-BELOW))
 (231 231 (:REWRITE THE-FLOOR-ABOVE))
 (228 32 (:REWRITE RTL::FL+INT-REWRITE))
 (224 8 (:REWRITE RTL::MOD-DOES-NOTHING))
 (217 205 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (217 205 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (203 203 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (203 203 (:REWRITE INTEGERP-<-CONSTANT))
 (203 203 (:REWRITE CONSTANT-<-INTEGERP))
 (203 203 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (203 203 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (203 203 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (203 203 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (203 203 (:REWRITE |(< c (- x))|))
 (203 203 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (203 203 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (203 203 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (203 203 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (203 203 (:REWRITE |(< (/ x) (/ y))|))
 (203 203 (:REWRITE |(< (- x) c)|))
 (203 203 (:REWRITE |(< (- x) (- y))|))
 (192 16 (:REWRITE MOD-ZERO . 4))
 (183 183 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (124 4 (:REWRITE MOMENTP-MOLAD))
 (112 112 (:REWRITE |(< (+ c/d x) y)|))
 (112 112 (:REWRITE |(< (+ (- c) x) y)|))
 (90 90 (:TYPE-PRESCRIPTION NATP))
 (80 80 (:REWRITE REDUCE-INTEGERP-+))
 (80 80 (:REWRITE INTEGERP-MINUS-X))
 (80 80 (:META META-INTEGERP-CORRECT))
 (80 16 (:REWRITE MOD-X-Y-=-X-Y . 3))
 (80 16 (:REWRITE MOD-X-Y-=-X+Y . 3))
 (80 16 (:REWRITE MOD-X-Y-=-X+Y . 2))
 (68 12 (:REWRITE ACL2-NUMBERP-X))
 (64 64 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (48 48 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (48 48 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (48 48 (:REWRITE |(< (/ x) 0)|))
 (48 48 (:REWRITE |(< (* x y) 0)|))
 (40 40 (:REWRITE |(< y (+ (- c) x))|))
 (40 40 (:REWRITE |(< x (+ c/d y))|))
 (40 8 (:REWRITE MOD-X-Y-=-X . 2))
 (40 8 (:REWRITE MOD-CANCEL-*-REWRITING-GOAL-LITERAL))
 (40 8 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 1))
 (40 8 (:REWRITE |(mod (* x (/ y)) z) rewriting-goal-literal|))
 (36 36 (:REWRITE FOLD-CONSTS-IN-+))
 (28 7 (:REWRITE RATIONALP-X))
 (24 24 (:TYPE-PRESCRIPTION ABS))
 (24 24 (:REWRITE REDUCE-INTEGERP-+-CONSTANT))
 (24 24 (:REWRITE INTEGERP-+-REDUCE-CONSTANT))
 (16 16 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (16 16 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (16 16 (:REWRITE DEFAULT-MOD-2))
 (16 16 (:REWRITE DEFAULT-MOD-1))
 (16 16 (:REWRITE |(equal (mod (+ x y) z) x)|))
 (16 16 (:REWRITE |(< 0 (/ x))|))
 (16 16 (:REWRITE |(< 0 (* x y))|))
 (10 10 (:REWRITE |(< (* x y) 0) rationalp (* x y)|))
 (8 8 (:REWRITE THIS-NEEDS-TO-BE-ADDED-TO-QUOTIENT-REMAINDER-LEMMAS))
 (8 8 (:REWRITE MOD-CANCEL-*-NOT-REWRITING-GOAL-LITERAL))
 (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 (/ z))) rewriting-goal-literal|))
 (8 8 (:REWRITE |(mod x (* y (/ z))) not rewriting-goal-literal|))
 (8 8 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 3))
 (8 8 (:REWRITE |(mod (+ x y) z) where (<= z 0)| . 2))
 (8 8 (:REWRITE |(mod (* x (/ y)) z) not rewriting-goal-literal|))
 (7 7 (:REWRITE REDUCE-RATIONALP-+))
 (7 7 (:REWRITE REDUCE-RATIONALP-*))
 (7 7 (:REWRITE RATIONALP-MINUS-X))
 (7 7 (:META META-RATIONALP-CORRECT))
 (6 6 (:TYPE-PRESCRIPTION BOOLEANP))
 (4 4 (:TYPE-PRESCRIPTION POSP))
 (2 2 (:REWRITE |(< (* (/ x) y) 1) with (< x 0)|))
 )
(MOLAD-ROSHHASHANAH-NEXT
 (5105 761 (:REWRITE ACL2-NUMBERP-X))
 (3437 2723 (:REWRITE DEFAULT-PLUS-1))
 (2172 543 (:REWRITE RATIONALP-X))
 (1803 1803 (:REWRITE DEFAULT-TIMES-1))
 (1537 1537 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (1371 282 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1244 1244 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (665 390 (:REWRITE DEFAULT-LESS-THAN-2))
 (656 656 (:REWRITE REDUCE-INTEGERP-+))
 (656 656 (:REWRITE INTEGERP-MINUS-X))
 (656 656 (:META META-INTEGERP-CORRECT))
 (608 282 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (571 343 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (571 343 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (543 543 (:REWRITE REDUCE-RATIONALP-+))
 (543 543 (:REWRITE REDUCE-RATIONALP-*))
 (543 543 (:REWRITE RATIONALP-MINUS-X))
 (543 543 (:META META-RATIONALP-CORRECT))
 (499 282 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (497 343 (:REWRITE SIMPLIFY-SUMS-<))
 (391 282 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (390 390 (:REWRITE THE-FLOOR-BELOW))
 (390 390 (:REWRITE THE-FLOOR-ABOVE))
 (390 390 (:REWRITE DEFAULT-LESS-THAN-1))
 (353 348 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (353 348 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (343 343 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (343 343 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (343 343 (:REWRITE INTEGERP-<-CONSTANT))
 (343 343 (:REWRITE CONSTANT-<-INTEGERP))
 (343 343 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (343 343 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (343 343 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (343 343 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (343 343 (:REWRITE |(< c (- x))|))
 (343 343 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (343 343 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (343 343 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (343 343 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (343 343 (:REWRITE |(< (/ x) (/ y))|))
 (343 343 (:REWRITE |(< (- x) c)|))
 (343 343 (:REWRITE |(< (- x) (- y))|))
 (307 289 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (282 282 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (282 282 (:REWRITE |(equal c (/ x))|))
 (282 282 (:REWRITE |(equal c (- x))|))
 (282 282 (:REWRITE |(equal (/ x) c)|))
 (282 282 (:REWRITE |(equal (/ x) (/ y))|))
 (282 282 (:REWRITE |(equal (- x) c)|))
 (282 282 (:REWRITE |(equal (- x) (- y))|))
 (228 228 (:REWRITE |(< x (+ c/d y))|))
 (218 218 (:TYPE-PRESCRIPTION BOOLEANP))
 (210 105 (:TYPE-PRESCRIPTION BUBBLE-DOWN))
 (210 105 (:REWRITE DEFAULT-MINUS))
 (170 170 (:REWRITE |(< 0 (* x y))|))
 (165 165 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (165 165 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (165 165 (:REWRITE |(< 0 (/ x))|))
 (93 93 (:REWRITE |(< (+ c/d x) y)|))
 (93 93 (:REWRITE |(< (+ (- c) x) y)|))
 (91 91 (:REWRITE FOLD-CONSTS-IN-+))
 (58 58 (:REWRITE |(equal (+ (- c) x) y)|))
 (28 28 (:TYPE-PRESCRIPTION ABS))
 (3 3 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-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 |(< (/ x) 0)|))
 (3 3 (:REWRITE |(< (* x y) 0)|))
 )
(FIRSTOFMONTH)
(EXPAND-MONTHLYMOLAD
 (3630 952 (:REWRITE DEFAULT-PLUS-2))
 (2276 491 (:REWRITE DEFAULT-TIMES-2))
 (2225 404 (:REWRITE DEFAULT-LESS-THAN-2))
 (1894 952 (:REWRITE DEFAULT-PLUS-1))
 (1337 1337 (:TYPE-PRESCRIPTION NATP))
 (677 404 (:REWRITE DEFAULT-LESS-THAN-1))
 (598 258 (:REWRITE SIMPLIFY-SUMS-<))
 (598 258 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (598 258 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (491 491 (:REWRITE DEFAULT-TIMES-1))
 (404 404 (:REWRITE THE-FLOOR-BELOW))
 (404 404 (:REWRITE THE-FLOOR-ABOVE))
 (383 383 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (383 383 (:REWRITE NORMALIZE-ADDENDS))
 (285 285 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (285 285 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (285 285 (:REWRITE INTEGERP-<-CONSTANT))
 (285 285 (:REWRITE CONSTANT-<-INTEGERP))
 (285 285 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (285 285 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (285 285 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (285 285 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (285 285 (:REWRITE |(< c (- x))|))
 (285 285 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (285 285 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (285 285 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (285 285 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (285 285 (:REWRITE |(< (/ x) (/ y))|))
 (285 285 (:REWRITE |(< (- x) c)|))
 (285 285 (:REWRITE |(< (- x) (- y))|))
 (274 274 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (151 151 (:REWRITE |(< y (+ (- c) x))|))
 (151 151 (:REWRITE |(< x (+ c/d y))|))
 (129 129 (:REWRITE |(< (+ c/d x) y)|))
 (129 129 (:REWRITE |(< (+ (- c) x) y)|))
 (114 58 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (102 58 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (101 58 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (71 58 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (71 1 (:DEFINITION MEMBER-EQUAL))
 (58 58 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (58 58 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (58 58 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (58 58 (:REWRITE |(equal c (/ x))|))
 (58 58 (:REWRITE |(equal c (- x))|))
 (58 58 (:REWRITE |(equal (/ x) c)|))
 (58 58 (:REWRITE |(equal (/ x) (/ y))|))
 (58 58 (:REWRITE |(equal (- x) c)|))
 (58 58 (:REWRITE |(equal (- x) (- y))|))
 (30 3 (:REWRITE ACL2-NUMBERP-X))
 (28 28 (:REWRITE FOLD-CONSTS-IN-+))
 (23 23 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (22 22 (:REWRITE REDUCE-INTEGERP-+))
 (22 22 (:REWRITE INTEGERP-MINUS-X))
 (22 22 (:META META-INTEGERP-CORRECT))
 (21 3 (:REWRITE RATIONALP-X))
 (19 19 (:REWRITE |(< 0 (/ x))|))
 (19 19 (:REWRITE |(< 0 (* x y))|))
 (16 16 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (16 16 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (14 14 (:REWRITE SUBSETP-MEMBER . 4))
 (14 14 (:REWRITE SUBSETP-MEMBER . 3))
 (14 14 (:REWRITE SUBSETP-MEMBER . 2))
 (14 14 (:REWRITE SUBSETP-MEMBER . 1))
 (14 14 (:REWRITE INTERSECTP-MEMBER . 3))
 (14 14 (:REWRITE INTERSECTP-MEMBER . 2))
 (2 2 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-ATOM-LISTP))
 )
(EXPAND-DAY
 (14 14 (:REWRITE DEFAULT-TIMES-2))
 (14 14 (:REWRITE DEFAULT-TIMES-1))
 (12 12 (:REWRITE DEFAULT-PLUS-2))
 (12 12 (:REWRITE DEFAULT-PLUS-1))
 (11 3 (:REWRITE ACL2-NUMBERP-X))
 (10 10 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (10 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (8 8 (:REWRITE THE-FLOOR-BELOW))
 (8 8 (:REWRITE THE-FLOOR-ABOVE))
 (8 8 (:REWRITE SIMPLIFY-SUMS-<))
 (8 8 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (8 8 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (8 8 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (8 8 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (8 8 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (8 8 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (8 8 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (8 8 (:REWRITE NORMALIZE-ADDENDS))
 (8 8 (:REWRITE INTEGERP-<-CONSTANT))
 (8 8 (:REWRITE DEFAULT-LESS-THAN-2))
 (8 8 (:REWRITE DEFAULT-LESS-THAN-1))
 (8 8 (:REWRITE CONSTANT-<-INTEGERP))
 (8 8 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (8 8 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (8 8 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (8 8 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (8 8 (:REWRITE |(< c (- x))|))
 (8 8 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (8 8 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (8 8 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (8 8 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (8 8 (:REWRITE |(< (/ x) (/ y))|))
 (8 8 (:REWRITE |(< (- x) c)|))
 (8 8 (:REWRITE |(< (- x) (- y))|))
 (5 5 (:REWRITE REDUCE-INTEGERP-+))
 (5 5 (:REWRITE INTEGERP-MINUS-X))
 (5 5 (:META META-INTEGERP-CORRECT))
 (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)|))
 (4 1 (:REWRITE RATIONALP-X))
 (3 1 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (2 2 (:TYPE-PRESCRIPTION BOOLEANP))
 (2 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (2 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE REDUCE-RATIONALP-+))
 (1 1 (:REWRITE REDUCE-RATIONALP-*))
 (1 1 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (1 1 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (1 1 (:REWRITE RATIONALP-MINUS-X))
 (1 1 (:REWRITE FOLD-CONSTS-IN-+))
 (1 1 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (1 1 (:REWRITE |(equal c (/ x))|))
 (1 1 (:REWRITE |(equal c (- x))|))
 (1 1 (:REWRITE |(equal (/ x) c)|))
 (1 1 (:REWRITE |(equal (/ x) (/ y))|))
 (1 1 (:REWRITE |(equal (- x) c)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:REWRITE |(< y (+ (- c) x))|))
 (1 1 (:REWRITE |(< x (+ c/d y))|))
 (1 1 (:REWRITE |(< (+ c/d x) y)|))
 (1 1 (:REWRITE |(< (+ (- c) x) y)|))
 (1 1 (:REWRITE |(+ c (+ d x))|))
 (1 1 (:META META-RATIONALP-CORRECT))
 )
(NATP-H2A
 (5594 1032 (:REWRITE DEFAULT-PLUS-2))
 (3669 1032 (:REWRITE DEFAULT-PLUS-1))
 (382 382 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (382 382 (:REWRITE NORMALIZE-ADDENDS))
 (191 191 (:REWRITE FOLD-CONSTS-IN-+))
 (32 17 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (32 17 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (27 17 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (18 18 (:REWRITE THE-FLOOR-BELOW))
 (18 18 (:REWRITE THE-FLOOR-ABOVE))
 (18 18 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (18 18 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (18 18 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (18 18 (:REWRITE INTEGERP-<-CONSTANT))
 (18 18 (:REWRITE DEFAULT-LESS-THAN-2))
 (18 18 (:REWRITE DEFAULT-LESS-THAN-1))
 (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))|))
 (17 17 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (17 17 (:REWRITE SIMPLIFY-SUMS-<))
 (17 17 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (17 17 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (17 17 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (17 17 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (17 17 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (17 17 (:REWRITE |(equal c (/ x))|))
 (17 17 (:REWRITE |(equal c (- x))|))
 (17 17 (:REWRITE |(equal (/ x) c)|))
 (17 17 (:REWRITE |(equal (/ x) (/ y))|))
 (17 17 (:REWRITE |(equal (- x) c)|))
 (17 17 (:REWRITE |(equal (- x) (- y))|))
 (11 11 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (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 REDUCE-INTEGERP-+))
 (3 3 (:REWRITE INTEGERP-MINUS-X))
 (3 3 (:REWRITE |(< 0 (/ x))|))
 (3 3 (:REWRITE |(< 0 (* x y))|))
 (3 3 (:META META-INTEGERP-CORRECT))
 )
(LANDAU-THM
 (252 28 (:REWRITE ACL2-NUMBERP-X))
 (201 180 (:REWRITE DEFAULT-LESS-THAN-1))
 (199 199 (:REWRITE THE-FLOOR-BELOW))
 (199 199 (:REWRITE THE-FLOOR-ABOVE))
 (196 177 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (196 177 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (192 177 (:REWRITE SIMPLIFY-SUMS-<))
 (177 177 (:REWRITE REMOVE-WEAK-INEQUALITIES))
 (177 177 (:REWRITE REMOVE-STRICT-INEQUALITIES))
 (177 177 (:REWRITE REDUCE-RATIONAL-MULTIPLICATIVE-CONSTANT-<))
 (177 177 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-<))
 (177 177 (:REWRITE INTEGERP-<-CONSTANT))
 (177 177 (:REWRITE CONSTANT-<-INTEGERP))
 (177 177 (:REWRITE |(< c (/ x)) positive c --- present in goal|))
 (177 177 (:REWRITE |(< c (/ x)) positive c --- obj t or nil|))
 (177 177 (:REWRITE |(< c (/ x)) negative c --- present in goal|))
 (177 177 (:REWRITE |(< c (/ x)) negative c --- obj t or nil|))
 (177 177 (:REWRITE |(< c (- x))|))
 (177 177 (:REWRITE |(< (/ x) c) positive c --- present in goal|))
 (177 177 (:REWRITE |(< (/ x) c) positive c --- obj t or nil|))
 (177 177 (:REWRITE |(< (/ x) c) negative c --- present in goal|))
 (177 177 (:REWRITE |(< (/ x) c) negative c --- obj t or nil|))
 (177 177 (:REWRITE |(< (/ x) (/ y))|))
 (177 177 (:REWRITE |(< (- x) c)|))
 (177 177 (:REWRITE |(< (- x) (- y))|))
 (112 28 (:REWRITE RATIONALP-X))
 (93 93 (:REWRITE REDUCE-INTEGERP-+))
 (93 93 (:REWRITE INTEGERP-MINUS-X))
 (93 93 (:META META-INTEGERP-CORRECT))
 (77 70 (:REWRITE DEFAULT-TIMES-2))
 (70 70 (:REWRITE DEFAULT-TIMES-1))
 (56 56 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-REMAINDER))
 (56 56 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-AX+BX-RATIONAL-COMMON))
 (56 56 (:REWRITE |(< 0 (/ x))|))
 (56 56 (:REWRITE |(< 0 (* x y))|))
 (55 52 (:REWRITE DEFAULT-PLUS-2))
 (52 52 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (52 52 (:REWRITE NORMALIZE-ADDENDS))
 (52 52 (:REWRITE DEFAULT-PLUS-1))
 (50 50 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (28 28 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-REMAINDER))
 (28 28 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-<-0-RATIONAL-COMMON))
 (28 28 (:REWRITE REDUCE-RATIONALP-+))
 (28 28 (:REWRITE REDUCE-RATIONALP-*))
 (28 28 (:REWRITE RATIONALP-MINUS-X))
 (28 28 (:REWRITE |(< (/ x) 0)|))
 (28 28 (:REWRITE |(< (* x y) 0)|))
 (28 28 (:META META-RATIONALP-CORRECT))
 (25 17 (:REWRITE EQUAL-OF-BOOLEANS-REWRITE))
 (24 17 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (23 17 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (17 17 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (17 17 (:REWRITE REDUCE-MULTIPLICATIVE-CONSTANT-EQUAL))
 (17 17 (:REWRITE REDUCE-ADDITIVE-CONSTANT-EQUAL))
 (17 17 (:REWRITE EQUAL-OF-PREDICATES-REWRITE))
 (17 17 (:REWRITE |(equal c (/ x))|))
 (17 17 (:REWRITE |(equal c (- x))|))
 (17 17 (:REWRITE |(equal (/ x) c)|))
 (17 17 (:REWRITE |(equal (/ x) (/ y))|))
 (17 17 (:REWRITE |(equal (- x) c)|))
 (17 17 (:REWRITE |(equal (- x) (- y))|))
 (13 13 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-AX+BX-=-0))
 (10 10 (:REWRITE |(< y (+ (- c) x))|))
 (10 10 (:REWRITE |(< x (+ c/d y))|))
 )
