(ILOG2-HELP
 (17 1 (:REWRITE CANCEL-FLOOR-+))
 (8 1 (:REWRITE FLOOR-ZERO . 3))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 2))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-2))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-1))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE-2))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (7 7 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (4 4 (:REWRITE SIMPLIFY-SUMS-<))
 (4 4 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 4 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (4 4 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 4 (:REWRITE DEFAULT-<-2))
 (4 4 (:REWRITE DEFAULT-<-1))
 (4 4 (:REWRITE |(< (- x) (- y))|))
 (4 1 (:REWRITE |(* y x)|))
 (3 3 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (2 2 (:REWRITE |(< (- x) 0)|))
 (1 1 (:REWRITE ZP-OPEN))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE REDUCE-INTEGERP-+))
 (1 1 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (1 1 (:REWRITE INTEGERP-MINUS-X))
 (1 1 (:REWRITE FLOOR-ZERO . 4))
 (1 1 (:REWRITE FLOOR-ZERO . 2))
 (1 1 (:REWRITE FLOOR-NEGATIVE . 3))
 (1 1 (:REWRITE FLOOR-NEGATIVE . 2))
 (1 1 (:REWRITE FLOOR-MINUS-WEAK))
 (1 1 (:REWRITE FLOOR-MINUS-2))
 (1 1 (:REWRITE FLOOR-COMPLETION))
 (1 1 (:REWRITE FLOOR-CANCEL-*-WEAK))
 (1 1 (:REWRITE DEFAULT-*-2))
 (1 1 (:REWRITE DEFAULT-*-1))
 (1 1 (:REWRITE |(integerp (* c x))|))
 (1 1 (:REWRITE |(< 0 (- x))|))
 (1 1 (:META META-INTEGERP-CORRECT))
 )
(ILOG2)
(ILOG2-HELP>1
 (153 9 (:REWRITE CANCEL-FLOOR-+))
 (72 9 (:REWRITE FLOOR-ZERO . 3))
 (42 2 (:LINEAR FLOOR-BOUNDS-3))
 (42 2 (:LINEAR FLOOR-BOUNDS-2))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (21 8 (:REWRITE DEFAULT-+-2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE-2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (17 17 (:REWRITE SIMPLIFY-SUMS-<))
 (17 17 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (17 17 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (17 17 (:REWRITE REDUCE-INTEGERP-+))
 (17 17 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (17 17 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (17 17 (:REWRITE INTEGERP-MINUS-X))
 (17 17 (:REWRITE DEFAULT-<-2))
 (17 17 (:REWRITE DEFAULT-<-1))
 (17 17 (:REWRITE DEFAULT-*-2))
 (17 17 (:REWRITE DEFAULT-*-1))
 (17 17 (:REWRITE |(< (- x) (- y))|))
 (17 17 (:META META-INTEGERP-CORRECT))
 (13 13 (:REWRITE |(integerp (* c x))|))
 (10 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (10 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (10 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (9 9 (:REWRITE FLOOR-ZERO . 4))
 (9 9 (:REWRITE FLOOR-ZERO . 2))
 (9 9 (:REWRITE FLOOR-MINUS-WEAK))
 (9 9 (:REWRITE FLOOR-MINUS-2))
 (9 9 (:REWRITE FLOOR-COMPLETION))
 (9 9 (:REWRITE FLOOR-CANCEL-*-WEAK))
 (8 8 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (8 8 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (8 8 (:REWRITE NORMALIZE-ADDENDS))
 (8 8 (:REWRITE DEFAULT-+-1))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (5 5 (:REWRITE |(equal (- x) 0)|))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (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))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE |(< 0 (- x))|))
 (1 1 (:REWRITE |(< (- x) 0)|))
 )
(NATP-ILOG-TO-HELP)
(ILOG2-HELP-IMPLICATIONS)
(ILOG2-IMPLICATIONS
 (34 2 (:REWRITE CANCEL-FLOOR-+))
 (24 2 (:REWRITE FLOOR-ZERO . 4))
 (20 2 (:REWRITE FLOOR-ZERO . 3))
 (16 2 (:REWRITE |(< (+ c x) d)|))
 (14 14 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (10 10 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (8 8 (:REWRITE SIMPLIFY-SUMS-<))
 (8 8 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (8 8 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (8 8 (:REWRITE DEFAULT-<-2))
 (8 8 (:REWRITE DEFAULT-<-1))
 (8 8 (:REWRITE |(< (- x) (- y))|))
 (8 2 (:REWRITE |(* y x)|))
 (5 3 (:REWRITE DEFAULT-+-2))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (3 3 (:REWRITE REDUCE-INTEGERP-+))
 (3 3 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (3 3 (:REWRITE NORMALIZE-ADDENDS))
 (3 3 (:REWRITE INTEGERP-MINUS-X))
 (3 3 (:REWRITE DEFAULT-+-1))
 (3 3 (:META META-INTEGERP-CORRECT))
 (2 2 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (2 2 (:REWRITE FLOOR-ZERO . 2))
 (2 2 (:REWRITE FLOOR-MINUS-WEAK))
 (2 2 (:REWRITE FLOOR-MINUS-2))
 (2 2 (:REWRITE FLOOR-COMPLETION))
 (2 2 (:REWRITE FLOOR-CANCEL-*-WEAK))
 (2 2 (:REWRITE DEFAULT-*-2))
 (2 2 (:REWRITE DEFAULT-*-1))
 (2 2 (:REWRITE |(integerp (* c x))|))
 (2 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (2 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (2 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (1 1 (:REWRITE |(equal (- x) 0)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 )
(CROCK)
(ONE)
(TWO
 (153 9 (:REWRITE CANCEL-FLOOR-+))
 (72 9 (:REWRITE FLOOR-ZERO . 3))
 (42 2 (:LINEAR FLOOR-BOUNDS-3))
 (42 2 (:LINEAR FLOOR-BOUNDS-2))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (32 13 (:REWRITE DEFAULT-+-2))
 (24 24 (:REWRITE REDUCE-INTEGERP-+))
 (24 24 (:REWRITE INTEGERP-MINUS-X))
 (24 24 (:META META-INTEGERP-CORRECT))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE-2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (18 18 (:REWRITE SIMPLIFY-SUMS-<))
 (18 18 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (18 18 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (18 18 (:REWRITE DEFAULT-<-2))
 (18 18 (:REWRITE DEFAULT-<-1))
 (18 18 (:REWRITE |(< (- x) (- y))|))
 (17 17 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (17 17 (:REWRITE DEFAULT-*-2))
 (17 17 (:REWRITE DEFAULT-*-1))
 (14 7 (:REWRITE DEFAULT-EXPT-2))
 (14 7 (:REWRITE |(expt 2^i n)|))
 (13 13 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (13 13 (:REWRITE NORMALIZE-ADDENDS))
 (13 13 (:REWRITE DEFAULT-+-1))
 (13 13 (:REWRITE |(integerp (* c x))|))
 (9 9 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (9 9 (:REWRITE FLOOR-ZERO . 4))
 (9 9 (:REWRITE FLOOR-ZERO . 2))
 (9 9 (:REWRITE FLOOR-MINUS-WEAK))
 (9 9 (:REWRITE FLOOR-MINUS-2))
 (9 9 (:REWRITE FLOOR-COMPLETION))
 (9 9 (:REWRITE FLOOR-CANCEL-*-WEAK))
 (7 7 (:REWRITE DEFAULT-EXPT-1))
 (7 7 (:REWRITE |(expt x (- n))|))
 (7 7 (:REWRITE |(expt 1/c n)|))
 (7 7 (:REWRITE |(expt (- x) n)|))
 (6 6 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (6 6 (:REWRITE |(< 0 (- x))|))
 (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))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (1 1 (:REWRITE |(< (- x) 0)|))
 )
(EXPT-SMALLER-HELPER
 (2342 27 (:LINEAR EXPT-X->=-X))
 (2342 27 (:LINEAR EXPT-X->-X))
 (1424 27 (:LINEAR EXPT-<-1-TWO))
 (952 56 (:REWRITE CANCEL-FLOOR-+))
 (879 326 (:REWRITE DEFAULT-<-1))
 (767 16 (:REWRITE |(< (+ c x) d)|))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 2))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-2))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-1))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE-2))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (622 622 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (462 326 (:REWRITE DEFAULT-<-2))
 (420 56 (:REWRITE FLOOR-ZERO . 3))
 (333 333 (:REWRITE |(< (- x) (- y))|))
 (272 126 (:REWRITE DEFAULT-+-2))
 (256 8 (:REWRITE FLOOR-FLOOR-INTEGER-ALT))
 (243 243 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (243 243 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (243 243 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (189 189 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (189 189 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (147 7 (:LINEAR FLOOR-BOUNDS-3))
 (147 7 (:LINEAR FLOOR-BOUNDS-2))
 (144 8 (:REWRITE FLOOR-POSITIVE . 1))
 (126 126 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (126 126 (:REWRITE DEFAULT-+-1))
 (125 125 (:REWRITE DEFAULT-*-2))
 (125 125 (:REWRITE DEFAULT-*-1))
 (84 84 (:REWRITE INTEGERP-MINUS-X))
 (84 84 (:META META-INTEGERP-CORRECT))
 (71 71 (:REWRITE |(integerp (* c x))|))
 (60 30 (:REWRITE DEFAULT-EXPT-2))
 (57 30 (:REWRITE |(expt 2^i n)|))
 (56 56 (:REWRITE FLOOR-ZERO . 4))
 (56 56 (:REWRITE FLOOR-ZERO . 2))
 (56 56 (:REWRITE FLOOR-MINUS-WEAK))
 (56 56 (:REWRITE FLOOR-MINUS-2))
 (56 56 (:REWRITE FLOOR-COMPLETION))
 (56 56 (:REWRITE FLOOR-CANCEL-*-WEAK))
 (54 54 (:LINEAR EXPT-IS-WEAKLY-INCREASING-FOR-BASE->-1))
 (54 54 (:LINEAR EXPT-IS-WEAKLY-DECREASING-FOR-POS-BASE-<-1))
 (54 54 (:LINEAR EXPT-IS-INCREASING-FOR-BASE->-1))
 (54 54 (:LINEAR EXPT-IS-DECREASING-FOR-POS-BASE-<-1))
 (30 30 (:REWRITE DEFAULT-EXPT-1))
 (30 30 (:REWRITE |(expt x (- n))|))
 (30 30 (:REWRITE |(expt 1/c n)|))
 (30 30 (:REWRITE |(expt (- x) n)|))
 (27 27 (:LINEAR EXPT->-1-TWO))
 (27 27 (:LINEAR EXPT-<-1-ONE))
 (17 17 (:REWRITE |arith (expt x c)|))
 (17 17 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (17 17 (:REWRITE ARITH-NORMALIZE-ADDENDS))
 (17 17 (:REWRITE |(< 0 (- x))|))
 (15 15 (:REWRITE ARITH-NORMALIZE-FACTORS-SCATTER-EXPONENTS))
 (15 3 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (15 3 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (12 12 (:REWRITE |arith (expt x (- n))|))
 (12 12 (:REWRITE |arith (expt 1/c n)|))
 (9 9 (:REWRITE DEFAULT-UNARY-MINUS))
 (8 8 (:REWRITE FLOOR-POSITIVE . 3))
 (8 8 (:REWRITE FLOOR-POSITIVE . 2))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (5 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (5 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (5 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (5 5 (:REWRITE |(equal (- x) 0)|))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (5 5 (:REWRITE |(< (- x) 0)|))
 (4 4 (:REWRITE NORMALIZE-TERMS-SUCH-AS-1/AX+BX))
 (4 4 (:REWRITE DEFAULT-UNARY-/))
 (3 3 (:TYPE-PRESCRIPTION MOD-ZERO . 2))
 (3 3 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (3 3 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (3 3 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (3 3 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (2 2 (:REWRITE FOLD-CONSTS-IN-+))
 (1 1 (:REWRITE INTEGERP-+-REDUCE-LEADING-RATIONAL-CONSTANT))
 (1 1 (:REWRITE |(< d (+ c x y))|))
 (1 1 (:REWRITE |(< (+ d x) (+ c y))|))
 (1 1 (:REWRITE |(< (+ c x) (+ d y))|))
 (1 1 (:REWRITE |(< (+ c x y) d)|))
 )
(EXPT-SMALLER-LOG2-HELPER
 (102 5 (:REWRITE |(< d (+ c x))|))
 (96 8 (:LINEAR ILOG2-HELP>1))
 (63 1 (:DEFINITION ILOG2-HELP))
 (54 54 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (45 1 (:LINEAR EXPT-X->=-X))
 (45 1 (:LINEAR EXPT-X->-X))
 (45 1 (:LINEAR EXPT->-1-ONE))
 (45 1 (:LINEAR EXPT-<-1-TWO))
 (33 33 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (19 15 (:REWRITE SIMPLIFY-SUMS-<))
 (19 15 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (19 15 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (18 15 (:REWRITE DEFAULT-<-2))
 (17 1 (:REWRITE CANCEL-FLOOR-+))
 (16 15 (:REWRITE DEFAULT-<-1))
 (15 15 (:REWRITE |(< (- x) (- y))|))
 (13 1 (:REWRITE ZP-OPEN))
 (12 1 (:REWRITE FLOOR-ZERO . 4))
 (10 1 (:REWRITE FLOOR-ZERO . 3))
 (8 6 (:REWRITE DEFAULT-+-2))
 (6 6 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (6 6 (:REWRITE NORMALIZE-ADDENDS))
 (6 6 (:REWRITE DEFAULT-+-1))
 (4 1 (:REWRITE |(* y x)|))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (2 2 (:LINEAR EXPT-IS-WEAKLY-INCREASING-FOR-BASE->-1))
 (2 2 (:LINEAR EXPT-IS-WEAKLY-DECREASING-FOR-POS-BASE-<-1))
 (2 2 (:LINEAR EXPT-IS-INCREASING-FOR-BASE->-1))
 (2 2 (:LINEAR EXPT-IS-DECREASING-FOR-POS-BASE-<-1))
 (2 1 (:REWRITE DEFAULT-EXPT-2))
 (2 1 (:REWRITE |(expt 2^i n)|))
 (1 1 (:REWRITE REDUCE-INTEGERP-+))
 (1 1 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (1 1 (:REWRITE INTEGERP-MINUS-X))
 (1 1 (:REWRITE FLOOR-ZERO . 2))
 (1 1 (:REWRITE FLOOR-MINUS-WEAK))
 (1 1 (:REWRITE FLOOR-MINUS-2))
 (1 1 (:REWRITE FLOOR-COMPLETION))
 (1 1 (:REWRITE FLOOR-CANCEL-*-WEAK))
 (1 1 (:REWRITE DEFAULT-EXPT-1))
 (1 1 (:REWRITE DEFAULT-*-2))
 (1 1 (:REWRITE DEFAULT-*-1))
 (1 1 (:REWRITE |(integerp (* c x))|))
 (1 1 (:REWRITE |(expt x (- n))|))
 (1 1 (:REWRITE |(expt 1/c n)|))
 (1 1 (:REWRITE |(expt (- x) n)|))
 (1 1 (:META META-INTEGERP-CORRECT))
 (1 1 (:LINEAR EXPT->-1-TWO))
 (1 1 (:LINEAR EXPT-<-1-ONE))
 )
(EXPT-SMALLER-ILOG2
 (66 5 (:REWRITE |(< d (+ c x))|))
 (62 1 (:DEFINITION ILOG2-HELP))
 (40 40 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (24 2 (:REWRITE |(< (+ c x) d)|))
 (21 1 (:LINEAR EXPT-X->=-X))
 (21 1 (:LINEAR EXPT-X->-X))
 (21 1 (:LINEAR EXPT->-1-ONE))
 (21 1 (:LINEAR EXPT-<-1-TWO))
 (17 1 (:REWRITE CANCEL-FLOOR-+))
 (16 16 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (13 9 (:REWRITE SIMPLIFY-SUMS-<))
 (13 9 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (13 9 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (12 9 (:REWRITE DEFAULT-<-2))
 (12 1 (:REWRITE ZP-OPEN))
 (12 1 (:REWRITE FLOOR-ZERO . 4))
 (10 9 (:REWRITE DEFAULT-<-1))
 (10 1 (:REWRITE FLOOR-ZERO . 3))
 (9 9 (:REWRITE |(< (- x) (- y))|))
 (6 6 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (5 3 (:REWRITE DEFAULT-+-2))
 (4 4 (:TYPE-PRESCRIPTION ILOG2-HELP))
 (4 1 (:REWRITE |(* y x)|))
 (3 3 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (3 3 (:REWRITE NORMALIZE-ADDENDS))
 (3 3 (:REWRITE DEFAULT-+-1))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (2 2 (:REWRITE REDUCE-INTEGERP-+))
 (2 2 (:REWRITE INTEGERP-MINUS-X))
 (2 2 (:META META-INTEGERP-CORRECT))
 (2 2 (:LINEAR EXPT-IS-WEAKLY-INCREASING-FOR-BASE->-1))
 (2 2 (:LINEAR EXPT-IS-WEAKLY-DECREASING-FOR-POS-BASE-<-1))
 (2 2 (:LINEAR EXPT-IS-INCREASING-FOR-BASE->-1))
 (2 2 (:LINEAR EXPT-IS-DECREASING-FOR-POS-BASE-<-1))
 (2 1 (:REWRITE DEFAULT-EXPT-2))
 (2 1 (:REWRITE |(expt 2^i n)|))
 (1 1 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (1 1 (:REWRITE FLOOR-ZERO . 2))
 (1 1 (:REWRITE FLOOR-MINUS-WEAK))
 (1 1 (:REWRITE FLOOR-MINUS-2))
 (1 1 (:REWRITE FLOOR-COMPLETION))
 (1 1 (:REWRITE FLOOR-CANCEL-*-WEAK))
 (1 1 (:REWRITE DEFAULT-EXPT-1))
 (1 1 (:REWRITE DEFAULT-*-2))
 (1 1 (:REWRITE DEFAULT-*-1))
 (1 1 (:REWRITE |(integerp (* c x))|))
 (1 1 (:REWRITE |(expt x (- n))|))
 (1 1 (:REWRITE |(expt 1/c n)|))
 (1 1 (:REWRITE |(expt (- x) n)|))
 (1 1 (:LINEAR EXPT->-1-TWO))
 (1 1 (:LINEAR EXPT-<-1-ONE))
 )
(BITS-TO-TREE
 (6 6 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (6 6 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (5 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (5 5 (:REWRITE |(< (- x) (- y))|))
 (3 3 (:REWRITE DEFAULT-<-2))
 (3 3 (:REWRITE DEFAULT-<-1))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (2 2 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (2 2 (:REWRITE DEFAULT-UNARY-MINUS))
 (2 2 (:REWRITE DEFAULT-+-2))
 (2 2 (:REWRITE DEFAULT-+-1))
 (2 2 (:REWRITE |(< (- x) 0)|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (1 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1 1 (:REWRITE REDUCE-INTEGERP-+))
 (1 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE INTEGERP-MINUS-X))
 (1 1 (:REWRITE |(equal (- x) 0)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:REWRITE |(< d (+ c x))|))
 (1 1 (:META META-INTEGERP-CORRECT))
 )
(TAXA-LIST-TO-TREE-ALIST-HELP)
(TAXA-LIST-TO-TREE-ALIST-HELP-WHEN-NOT-CONSP)
(TAXA-LIST-TO-TREE-ALIST-HELP-OF-CONSP
 (683 5 (:DEFINITION BITS-TO-TREE))
 (278 10 (:DEFINITION EVENP))
 (164 5 (:DEFINITION ODDP))
 (75 19 (:REWRITE REDUCE-INTEGERP-+))
 (63 26 (:REWRITE DEFAULT-+-2))
 (52 4 (:REWRITE EVEN-AND-ODD-ALTERNATE))
 (52 4 (:REWRITE |(* (+ x y) z)|))
 (40 10 (:REWRITE |(* y x)|))
 (39 39 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (39 39 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (39 39 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (39 39 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (38 38 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (38 38 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (38 38 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (34 2 (:REWRITE |(+ (+ x y) z)|))
 (26 26 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (26 26 (:REWRITE NORMALIZE-ADDENDS))
 (26 26 (:REWRITE DEFAULT-+-1))
 (25 10 (:REWRITE DEFAULT-<-2))
 (20 5 (:REWRITE DEFAULT-UNARY-MINUS))
 (19 19 (:REWRITE INTEGERP-MINUS-X))
 (19 19 (:META META-INTEGERP-CORRECT))
 (16 10 (:REWRITE SIMPLIFY-SUMS-<))
 (16 10 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (16 10 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (15 15 (:DEFINITION HONS))
 (14 14 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (14 14 (:REWRITE DEFAULT-*-2))
 (14 14 (:REWRITE DEFAULT-*-1))
 (12 4 (:REWRITE |(+ c (+ d x))|))
 (10 10 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (10 10 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (10 10 (:REWRITE DEFAULT-<-1))
 (10 10 (:REWRITE |(integerp (* c x))|))
 (10 10 (:REWRITE |(< (- x) (- y))|))
 (6 6 (:REWRITE TAXA-LIST-TO-TREE-ALIST-HELP-WHEN-NOT-CONSP))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (5 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (5 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (5 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (5 5 (:REWRITE DEFAULT-EXPT-2))
 (5 5 (:REWRITE DEFAULT-EXPT-1))
 (5 5 (:REWRITE |(expt x (- n))|))
 (5 5 (:REWRITE |(expt 2^i n)|))
 (5 5 (:REWRITE |(expt 1/c n)|))
 (5 5 (:REWRITE |(expt (- x) n)|))
 (5 5 (:REWRITE |(equal (- x) 0)|))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (5 5 (:REWRITE |(< (- x) 0)|))
 (4 4 (:REWRITE INTEGERP-+-REDUCE-LEADING-RATIONAL-CONSTANT))
 (3 3 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE DEFAULT-CAR))
 (2 2 (:REWRITE FOLD-CONSTS-IN-+))
 (2 2 (:REWRITE |(< (+ c x) d)|))
 )
(TAXA-LIST-TO-TREE-ALIST)
(BUILD-TAXA-LIST-TREE-HELP)
(BUILD-TAXA-LIST-TREE)
(ALISTP-TAXA-LIST-TO-TREE-ALIST-HELP
 (239 15 (:REWRITE INTEGER-HALISTP-HALISTP))
 (195 15 (:DEFINITION INTEGER-HALISTP))
 (119 15 (:REWRITE GOOD-TAXON-INTEGER-LISTP-ALISTP-GEN))
 (115 115 (:TYPE-PRESCRIPTION TAXA-LIST-TO-TREE-ALIST-HELP))
 (99 1 (:DEFINITION BITS-TO-TREE))
 (71 71 (:TYPE-PRESCRIPTION INTEGER-HALISTP))
 (56 14 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (56 14 (:REWRITE ALISTP-GEN-OF-NOT-CONSP))
 (38 33 (:REWRITE DEFAULT-CAR))
 (34 32 (:REWRITE DEFAULT-CDR))
 (29 29 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (26 2 (:DEFINITION EVENP))
 (19 1 (:REWRITE GOOD-TAXON-INDEX-HALIST-OF-CONSP))
 (18 18 (:REWRITE REDUCE-INTEGERP-+))
 (18 18 (:REWRITE INTEGERP-MINUS-X))
 (18 18 (:META META-INTEGERP-CORRECT))
 (18 1 (:DEFINITION ODDP))
 (12 12 (:REWRITE TAXA-LIST-TO-TREE-ALIST-HELP-WHEN-NOT-CONSP))
 (10 7 (:REWRITE DEFAULT-+-2))
 (8 2 (:REWRITE |(* y x)|))
 (7 7 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (7 7 (:REWRITE NORMALIZE-ADDENDS))
 (7 7 (:REWRITE DEFAULT-+-1))
 (6 6 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (6 6 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (6 6 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (5 5 (:REWRITE CAR-CONS))
 (5 2 (:REWRITE DEFAULT-<-2))
 (4 1 (:REWRITE DEFAULT-UNARY-MINUS))
 (3 3 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (3 3 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (3 3 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (3 3 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (3 3 (:DEFINITION HONS))
 (2 2 (:REWRITE SIMPLIFY-SUMS-<))
 (2 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (2 2 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (2 2 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (2 2 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (2 2 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (2 2 (:REWRITE DEFAULT-<-1))
 (2 2 (:REWRITE DEFAULT-*-2))
 (2 2 (:REWRITE DEFAULT-*-1))
 (2 2 (:REWRITE CDR-CONS))
 (2 2 (:REWRITE |(integerp (* c x))|))
 (2 2 (:REWRITE |(< (- x) (- y))|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (1 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE DEFAULT-EXPT-2))
 (1 1 (:REWRITE DEFAULT-EXPT-1))
 (1 1 (:REWRITE |(expt x (- n))|))
 (1 1 (:REWRITE |(expt 2^i n)|))
 (1 1 (:REWRITE |(expt 1/c n)|))
 (1 1 (:REWRITE |(expt (- x) n)|))
 (1 1 (:REWRITE |(equal (- x) 0)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:REWRITE |(< (- x) 0)|))
 )
(ALISTP-TAXA-LIST-TO-TREE-ALIST
 (7 1 (:DEFINITION LEN))
 (4 2 (:REWRITE DEFAULT-+-2))
 (2 2 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (2 2 (:REWRITE NORMALIZE-ADDENDS))
 (2 2 (:REWRITE DEFAULT-+-1))
 (1 1 (:TYPE-PRESCRIPTION LEN))
 (1 1 (:TYPE-PRESCRIPTION ILOG2))
 (1 1 (:REWRITE TAXA-LIST-TO-TREE-ALIST-HELP-WHEN-NOT-CONSP))
 (1 1 (:REWRITE DEFAULT-CDR))
 )
(CONSP-BUILD-TAXA-LIST-TREE-HELP-FROM-ILOG2-HELP
 (257 9 (:DEFINITION HONS-GET))
 (212 9 (:DEFINITION HONS-ASSOC-EQUAL))
 (171 9 (:REWRITE ZP-OPEN))
 (153 9 (:REWRITE CANCEL-FLOOR-+))
 (119 50 (:REWRITE DEFAULT-+-2))
 (108 27 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (72 9 (:REWRITE FLOOR-ZERO . 3))
 (71 9 (:DEFINITION HONS-EQUAL))
 (56 50 (:REWRITE DEFAULT-+-1))
 (54 54 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (54 27 (:REWRITE DEFAULT-CDR))
 (50 50 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (50 50 (:REWRITE NORMALIZE-ADDENDS))
 (46 2 (:REWRITE |(+ (+ x y) z)|))
 (42 2 (:LINEAR FLOOR-BOUNDS-3))
 (42 2 (:LINEAR FLOOR-BOUNDS-2))
 (37 28 (:REWRITE SIMPLIFY-SUMS-<))
 (37 28 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (37 28 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (37 28 (:REWRITE DEFAULT-<-2))
 (36 36 (:REWRITE DEFAULT-CAR))
 (33 29 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (32 32 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (29 29 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (29 29 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (28 28 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (28 28 (:REWRITE DEFAULT-<-1))
 (28 28 (:REWRITE |(< (- x) (- y))|))
 (27 27 (:TYPE-PRESCRIPTION HONS-ASSOC-EQUAL))
 (27 27 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 3))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-ZERO . 1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-POSITIVE . 1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONPOSITIVE-1))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NONNEGATIVE-2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 2))
 (19 19 (:TYPE-PRESCRIPTION FLOOR-NEGATIVE . 1))
 (19 19 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (19 19 (:REWRITE REDUCE-INTEGERP-+))
 (19 19 (:REWRITE INTEGERP-MINUS-X))
 (19 19 (:META META-INTEGERP-CORRECT))
 (17 17 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (17 17 (:REWRITE DEFAULT-*-2))
 (17 17 (:REWRITE DEFAULT-*-1))
 (17 13 (:REWRITE DEFAULT-EXPT-2))
 (17 13 (:REWRITE |(expt 2^i n)|))
 (15 9 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (15 9 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (15 9 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (13 13 (:REWRITE DEFAULT-EXPT-1))
 (13 13 (:REWRITE |(integerp (* c x))|))
 (13 13 (:REWRITE |(expt x (- n))|))
 (13 13 (:REWRITE |(expt 1/c n)|))
 (13 13 (:REWRITE |(expt (- x) n)|))
 (10 10 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (10 10 (:REWRITE |(< 0 (- x))|))
 (9 9 (:REWRITE FLOOR-ZERO . 4))
 (9 9 (:REWRITE FLOOR-ZERO . 2))
 (9 9 (:REWRITE FLOOR-MINUS-WEAK))
 (9 9 (:REWRITE FLOOR-MINUS-2))
 (9 9 (:REWRITE FLOOR-COMPLETION))
 (9 9 (:REWRITE FLOOR-CANCEL-*-WEAK))
 (9 9 (:REWRITE |(equal (- x) (- y))|))
 (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))
 (2 2 (:REWRITE FOLD-CONSTS-IN-+))
 (2 2 (:REWRITE |(equal (+ c x) d)|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (1 1 (:REWRITE |(< (- x) 0)|))
 )
(CONSP-BUILD-TAXA-LIST-TREE-HELP-FROM-ILOG2
 (78 1 (:DEFINITION BUILD-TAXA-LIST-TREE-HELP))
 (25 1 (:DEFINITION HONS-GET))
 (20 1 (:DEFINITION HONS-ASSOC-EQUAL))
 (19 1 (:REWRITE ZP-OPEN))
 (12 3 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (10 10 (:TYPE-PRESCRIPTION ILOG2-HELP))
 (8 5 (:REWRITE DEFAULT-+-2))
 (6 6 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (6 3 (:REWRITE DEFAULT-CDR))
 (5 5 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (5 5 (:REWRITE NORMALIZE-ADDENDS))
 (5 5 (:REWRITE DEFAULT-+-1))
 (5 1 (:DEFINITION HONS-EQUAL))
 (4 4 (:REWRITE DEFAULT-CAR))
 (4 3 (:REWRITE SIMPLIFY-SUMS-<))
 (4 3 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 3 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 3 (:REWRITE DEFAULT-<-2))
 (3 3 (:TYPE-PRESCRIPTION HONS-ASSOC-EQUAL))
 (3 3 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (3 3 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (3 3 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (3 3 (:REWRITE DEFAULT-<-1))
 (3 3 (:REWRITE |(< (- x) (- y))|))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1 1 (:REWRITE REDUCE-INTEGERP-+))
 (1 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE INTEGERP-MINUS-X))
 (1 1 (:REWRITE DEFAULT-EXPT-2))
 (1 1 (:REWRITE DEFAULT-EXPT-1))
 (1 1 (:REWRITE |(expt x (- n))|))
 (1 1 (:REWRITE |(expt 2^i n)|))
 (1 1 (:REWRITE |(expt 1/c n)|))
 (1 1 (:REWRITE |(expt (- x) n)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:REWRITE |(< 0 (- x))|))
 (1 1 (:META META-INTEGERP-CORRECT))
 (1 1 (:DEFINITION HONS))
 )
(CONSP-BUILD-TAXA-LIST-TREE-FROM-LEN-TAXA-LIST
 (82 1 (:DEFINITION BUILD-TAXA-LIST-TREE-HELP))
 (32 1 (:DEFINITION HONS-GET))
 (24 1 (:DEFINITION HONS-ASSOC-EQUAL))
 (19 1 (:REWRITE ZP-OPEN))
 (15 3 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (14 2 (:DEFINITION LEN))
 (10 10 (:TYPE-PRESCRIPTION ILOG2))
 (8 5 (:REWRITE DEFAULT-CDR))
 (7 5 (:REWRITE DEFAULT-+-2))
 (7 1 (:DEFINITION HONS-EQUAL))
 (6 6 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (6 3 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (5 5 (:TYPE-PRESCRIPTION TAXA-LIST-TO-INDEX-TAXON))
 (5 5 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (5 5 (:REWRITE NORMALIZE-ADDENDS))
 (5 5 (:REWRITE DEFAULT-+-1))
 (4 4 (:REWRITE DEFAULT-CAR))
 (4 2 (:REWRITE SIMPLIFY-SUMS-<))
 (4 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 2 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (4 2 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 1 (:REWRITE |(+ 0 x)|))
 (3 3 (:TYPE-PRESCRIPTION HONS-ASSOC-EQUAL))
 (3 2 (:REWRITE DEFAULT-<-2))
 (3 2 (:REWRITE DEFAULT-<-1))
 (2 2 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (2 2 (:REWRITE |(< (- x) (- y))|))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE DEFAULT-EXPT-2))
 (1 1 (:REWRITE DEFAULT-EXPT-1))
 (1 1 (:REWRITE |(expt x (- n))|))
 (1 1 (:REWRITE |(expt 2^i n)|))
 (1 1 (:REWRITE |(expt 1/c n)|))
 (1 1 (:REWRITE |(expt (- x) n)|))
 (1 1 (:REWRITE |(equal (- x) 0)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:REWRITE |(< 0 (- x))|))
 (1 1 (:DEFINITION HONS))
 )
(BALANCED-TREE-HELPER)
(BALANCED-TREE-HELPER-WHEN-NOT-CONSP
 (4 4 (:REWRITE ZP-OPEN))
 )
(BALANCED-TREE-HELPER-OF-CONSP
 (55 7 (:REWRITE ZP-OPEN))
 (40 8 (:REWRITE |(+ c (+ d x))|))
 (36 4 (:REWRITE |(< d (+ c x))|))
 (15 15 (:REWRITE BALANCED-TREE-HELPER-WHEN-NOT-CONSP))
 (14 14 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (14 14 (:REWRITE NORMALIZE-ADDENDS))
 (14 14 (:REWRITE DEFAULT-+-2))
 (14 14 (:REWRITE DEFAULT-+-1))
 (8 8 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (8 8 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (5 5 (:REWRITE DEFAULT-CDR))
 (5 5 (:REWRITE DEFAULT-CAR))
 (4 4 (:REWRITE SIMPLIFY-SUMS-<))
 (4 4 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 4 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 4 (:REWRITE DEFAULT-<-2))
 (4 4 (:REWRITE DEFAULT-<-1))
 (4 4 (:REWRITE |(< (- x) (- y))|))
 (4 4 (:DEFINITION NOT))
 )
(DEPTH)
(DEPTH-WHEN-NOT-CONSP)
(DEPTH-OF-CONSP
 (27 18 (:REWRITE DEFAULT-+-2))
 (27 9 (:REWRITE SIMPLIFY-SUMS-<))
 (27 9 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (27 9 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (21 21 (:REWRITE DEPTH-WHEN-NOT-CONSP))
 (18 18 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (18 18 (:REWRITE NORMALIZE-ADDENDS))
 (18 18 (:REWRITE DEFAULT-+-1))
 (18 9 (:REWRITE DEFAULT-<-2))
 (18 9 (:REWRITE DEFAULT-<-1))
 (9 9 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (9 9 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (9 9 (:REWRITE |(< (- x) (- y))|))
 (7 7 (:REWRITE DEFAULT-CDR))
 (7 7 (:REWRITE DEFAULT-CAR))
 )
(BALANCED-TREE)
(BALANCED-TREE-WHEN-NOT-CONSP)
(BALANCED-TREE-HELPER-LEVEL-ZERO-GIVES-ATOM
 (1 1 (:REWRITE BALANCED-TREE-HELPER-WHEN-NOT-CONSP))
 )
(BALANCED-TREE-HELPER-GIVES-DEPTH
 (105 56 (:REWRITE DEFAULT-+-2))
 (90 37 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (84 34 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (56 56 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (56 56 (:REWRITE NORMALIZE-ADDENDS))
 (56 56 (:REWRITE DEFAULT-+-1))
 (41 22 (:REWRITE |(equal (+ c x) d)|))
 (37 37 (:REWRITE |(equal (- x) (- y))|))
 (32 32 (:REWRITE DEFAULT-CAR))
 (18 6 (:REWRITE |(equal (+ d x) (+ c y))|))
 (18 6 (:REWRITE |(equal (+ c x) (+ d y))|))
 (8 8 (:REWRITE ARITH-NORMALIZE-ADDENDS))
 (7 7 (:REWRITE DEFAULT-CDR))
 (4 2 (:REWRITE SIMPLIFY-SUMS-<))
 (4 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 2 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (3 3 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (3 3 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (3 2 (:REWRITE DEFAULT-<-2))
 (3 2 (:REWRITE DEFAULT-<-1))
 (2 2 (:REWRITE |(< (- x) (- y))|))
 )
(BALANCED-TREE-OF-CONSP
 (282 152 (:REWRITE DEFAULT-<-2))
 (224 152 (:REWRITE SIMPLIFY-SUMS-<))
 (224 152 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (186 165 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (173 152 (:REWRITE DEFAULT-<-1))
 (165 165 (:REWRITE |(< (- x) (- y))|))
 (144 114 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (131 131 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (131 131 (:REWRITE |(< 0 (- x))|))
 (79 79 (:REWRITE BALANCED-TREE-HELPER-WHEN-NOT-CONSP))
 (77 77 (:REWRITE DEPTH-WHEN-NOT-CONSP))
 (33 14 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (33 14 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (33 14 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (26 26 (:REWRITE NORMALIZE-TERMS-SUCH-AS-1/AX+BX))
 (26 26 (:REWRITE DEFAULT-UNARY-/))
 (23 22 (:REWRITE DEFAULT-+-2))
 (22 22 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (22 22 (:REWRITE NORMALIZE-ADDENDS))
 (22 22 (:REWRITE DEFAULT-+-1))
 (20 20 (:REWRITE DEFAULT-CAR))
 (14 14 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:REWRITE BALANCED-TREE-WHEN-NOT-CONSP))
 )
(BALANCED-TREE-OF-CONS-GIVES-BALANCED-TREE-EACH
 (202 108 (:REWRITE DEFAULT-<-2))
 (165 108 (:REWRITE SIMPLIFY-SUMS-<))
 (165 108 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (130 115 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (125 125 (:REWRITE BALANCED-TREE-OF-CONSP))
 (125 108 (:REWRITE DEFAULT-<-1))
 (115 115 (:REWRITE |(< (- x) (- y))|))
 (102 76 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (91 91 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (91 91 (:REWRITE |(< 0 (- x))|))
 (74 74 (:REWRITE BALANCED-TREE-HELPER-WHEN-NOT-CONSP))
 (57 57 (:REWRITE DEPTH-WHEN-NOT-CONSP))
 (15 14 (:REWRITE DEFAULT-+-2))
 (14 14 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (14 14 (:REWRITE NORMALIZE-TERMS-SUCH-AS-1/AX+BX))
 (14 14 (:REWRITE NORMALIZE-ADDENDS))
 (14 14 (:REWRITE DEFAULT-UNARY-/))
 (14 14 (:REWRITE DEFAULT-+-1))
 (12 12 (:REWRITE DEFAULT-CAR))
 (5 5 (:REWRITE BALANCED-TREE-WHEN-NOT-CONSP))
 )
(GOOD-DEPTHS)
(GOOD-DEPTHS-WHEN-NOT-CONSP)
(GOOD-DEPTHS-OF-CONSP
 (15 5 (:REWRITE SIMPLIFY-SUMS-<))
 (15 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (15 5 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (10 10 (:REWRITE DEPTH-WHEN-NOT-CONSP))
 (10 10 (:REWRITE BALANCED-TREE-OF-CONSP))
 (10 10 (:REWRITE BALANCED-TREE-HELPER-GIVES-DEPTH))
 (10 5 (:REWRITE DEFAULT-<-2))
 (10 5 (:REWRITE DEFAULT-<-1))
 (6 6 (:REWRITE GOOD-DEPTHS-WHEN-NOT-CONSP))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (5 5 (:REWRITE |(< (- x) (- y))|))
 (3 3 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE DEFAULT-CAR))
 )
(GOOD-DEPTHS-CONSP-GOOD-DEPTH-CAR
 (21 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (14 5 (:REWRITE SIMPLIFY-SUMS-<))
 (14 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (14 5 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (10 5 (:REWRITE DEFAULT-<-1))
 (9 9 (:REWRITE DEPTH-WHEN-NOT-CONSP))
 (9 9 (:REWRITE BALANCED-TREE-OF-CONSP))
 (9 9 (:REWRITE BALANCED-TREE-HELPER-GIVES-DEPTH))
 (9 5 (:REWRITE DEFAULT-<-2))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (5 5 (:REWRITE |(< (- x) (- y))|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (1 1 (:REWRITE |(< (- x) 0)|))
 )
(GOOD-DEPTHS-CDR)
(CONSP-GIVES-DEPTH<0
 (72 36 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (72 36 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (72 36 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (36 36 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (36 36 (:REWRITE |(equal (- x) 0)|))
 (36 36 (:REWRITE |(equal (- x) (- y))|))
 (28 28 (:REWRITE DEPTH-WHEN-NOT-CONSP))
 (28 28 (:REWRITE BALANCED-TREE-OF-CONSP))
 (28 28 (:REWRITE BALANCED-TREE-HELPER-GIVES-DEPTH))
 (12 12 (:REWRITE DEFAULT-CDR))
 (12 12 (:REWRITE DEFAULT-CAR))
 )
(DEPTH-BUILD-TAXA-LIST-DEPTH
 (100 5 (:DEFINITION HONS-ASSOC-EQUAL))
 (60 15 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (37 22 (:REWRITE DEFAULT-+-2))
 (30 30 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (30 15 (:REWRITE DEFAULT-CDR))
 (25 5 (:DEFINITION HONS-EQUAL))
 (22 22 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (22 22 (:REWRITE NORMALIZE-ADDENDS))
 (22 22 (:REWRITE DEFAULT-+-1))
 (21 13 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (20 20 (:REWRITE DEFAULT-CAR))
 (18 18 (:LINEAR CONSP-GIVES-DEPTH<0))
 (17 11 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (15 15 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (13 13 (:REWRITE |(equal (- x) (- y))|))
 (10 10 (:REWRITE BALANCED-TREE-OF-CONSP))
 (10 10 (:REWRITE BALANCED-TREE-HELPER-GIVES-DEPTH))
 (7 5 (:REWRITE SIMPLIFY-SUMS-<))
 (7 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (7 5 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (6 6 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (6 6 (:REWRITE GOOD-INDEX-TAXON-HALIST-WHEN-NOT-CONSP))
 (6 5 (:REWRITE DEFAULT-<-2))
 (6 5 (:REWRITE DEFAULT-<-1))
 (6 4 (:REWRITE |(equal (+ c x) d)|))
 (5 5 (:REWRITE ZP-OPEN))
 (5 5 (:REWRITE |(< (- x) (- y))|))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (4 4 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (4 4 (:REWRITE REDUCE-INTEGERP-+))
 (4 4 (:REWRITE INTEGERP-MINUS-X))
 (4 4 (:REWRITE DEFAULT-EXPT-2))
 (4 4 (:REWRITE DEFAULT-EXPT-1))
 (4 4 (:REWRITE |(expt x (- n))|))
 (4 4 (:REWRITE |(expt 2^i n)|))
 (4 4 (:REWRITE |(expt 1/c n)|))
 (4 4 (:REWRITE |(expt (- x) n)|))
 (4 4 (:REWRITE |(< (- x) 0)|))
 (4 4 (:META META-INTEGERP-CORRECT))
 (4 2 (:TYPE-PRESCRIPTION INTEGER-ASSOC-HQUAL-INTEGER-HALISTP))
 (2 2 (:TYPE-PRESCRIPTION INTEGER-HALISTP))
 )
(DEPTH-BUILD-TAXA-LIST-TREE
 (82 1 (:DEFINITION BUILD-TAXA-LIST-TREE-HELP))
 (32 1 (:DEFINITION HONS-GET))
 (25 1 (:LINEAR CONSP-GIVES-DEPTH<0))
 (24 1 (:REWRITE CONSP-BUILD-TAXA-LIST-TREE-FROM-LEN-TAXA-LIST))
 (24 1 (:DEFINITION HONS-ASSOC-EQUAL))
 (21 3 (:DEFINITION LEN))
 (19 1 (:REWRITE ZP-OPEN))
 (15 3 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (9 6 (:REWRITE DEFAULT-CDR))
 (9 6 (:REWRITE DEFAULT-+-2))
 (7 1 (:DEFINITION HONS-EQUAL))
 (6 6 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (6 6 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (6 6 (:REWRITE NORMALIZE-ADDENDS))
 (6 6 (:REWRITE DEFAULT-+-1))
 (6 3 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (5 5 (:TYPE-PRESCRIPTION TAXA-LIST-TO-INDEX-TAXON))
 (4 4 (:REWRITE DEFAULT-CAR))
 (4 2 (:REWRITE SIMPLIFY-SUMS-<))
 (4 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 2 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 1 (:REWRITE |(+ 0 x)|))
 (3 3 (:TYPE-PRESCRIPTION HONS-ASSOC-EQUAL))
 (3 2 (:REWRITE DEFAULT-<-2))
 (3 2 (:REWRITE DEFAULT-<-1))
 (2 2 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (2 2 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (2 2 (:REWRITE |(< (- x) (- y))|))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE INT-SYMLIST-WHEN-NOT-CONSP))
 (1 1 (:REWRITE DEFAULT-EXPT-2))
 (1 1 (:REWRITE DEFAULT-EXPT-1))
 (1 1 (:REWRITE |(expt x (- n))|))
 (1 1 (:REWRITE |(expt 2^i n)|))
 (1 1 (:REWRITE |(expt 1/c n)|))
 (1 1 (:REWRITE |(expt (- x) n)|))
 (1 1 (:REWRITE |(equal (- x) 0)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:REWRITE |(< 0 (- x))|))
 (1 1 (:DEFINITION HONS))
 )
(BALANCED-TREE-HELPER-BUILD-TAXA-LIST-TREE-HELP
 (100 5 (:DEFINITION HONS-ASSOC-EQUAL))
 (60 15 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (32 20 (:REWRITE DEFAULT-+-2))
 (30 30 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (30 15 (:REWRITE DEFAULT-CDR))
 (25 5 (:DEFINITION HONS-EQUAL))
 (20 20 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (20 20 (:REWRITE NORMALIZE-ADDENDS))
 (20 20 (:REWRITE DEFAULT-CAR))
 (20 20 (:REWRITE DEFAULT-+-1))
 (15 15 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (6 6 (:REWRITE GOOD-INDEX-TAXON-HALIST-WHEN-NOT-CONSP))
 (5 5 (:REWRITE ZP-OPEN))
 (5 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (5 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (5 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (4 4 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (4 4 (:REWRITE SIMPLIFY-SUMS-<))
 (4 4 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 4 (:REWRITE REDUCE-INTEGERP-+))
 (4 4 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 4 (:REWRITE INTEGERP-MINUS-X))
 (4 4 (:REWRITE DEFAULT-EXPT-2))
 (4 4 (:REWRITE DEFAULT-EXPT-1))
 (4 4 (:REWRITE DEFAULT-<-2))
 (4 4 (:REWRITE DEFAULT-<-1))
 (4 4 (:REWRITE |(expt x (- n))|))
 (4 4 (:REWRITE |(expt 2^i n)|))
 (4 4 (:REWRITE |(expt 1/c n)|))
 (4 4 (:REWRITE |(expt (- x) n)|))
 (4 4 (:REWRITE |(< (- x) 0)|))
 (4 4 (:REWRITE |(< (- x) (- y))|))
 (4 4 (:META META-INTEGERP-CORRECT))
 (4 2 (:TYPE-PRESCRIPTION INTEGER-ASSOC-HQUAL-INTEGER-HALISTP))
 (2 2 (:TYPE-PRESCRIPTION INTEGER-HALISTP))
 )
(BALANCED-TREE-HELPER-BUILD-TAXA-LIST-TREE
 (164 2 (:DEFINITION BUILD-TAXA-LIST-TREE-HELP))
 (64 2 (:DEFINITION HONS-GET))
 (48 2 (:DEFINITION HONS-ASSOC-EQUAL))
 (38 2 (:REWRITE ZP-OPEN))
 (30 6 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (21 3 (:DEFINITION LEN))
 (15 9 (:REWRITE DEFAULT-CDR))
 (14 2 (:DEFINITION HONS-EQUAL))
 (12 12 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (12 9 (:REWRITE DEFAULT-+-2))
 (12 6 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (10 10 (:TYPE-PRESCRIPTION TAXA-LIST-TO-INDEX-TAXON))
 (9 9 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (9 9 (:REWRITE NORMALIZE-ADDENDS))
 (9 9 (:REWRITE DEFAULT-+-1))
 (8 8 (:REWRITE DEFAULT-CAR))
 (8 2 (:REWRITE |(+ 0 x)|))
 (6 6 (:TYPE-PRESCRIPTION HONS-ASSOC-EQUAL))
 (6 3 (:REWRITE SIMPLIFY-SUMS-<))
 (6 3 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (6 3 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (5 3 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (5 3 (:REWRITE DEFAULT-<-2))
 (4 3 (:REWRITE DEFAULT-<-1))
 (3 3 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (3 3 (:REWRITE |(< (- x) (- y))|))
 (2 2 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (2 2 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (2 2 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (2 2 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (2 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (2 2 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (2 2 (:REWRITE DEFAULT-EXPT-2))
 (2 2 (:REWRITE DEFAULT-EXPT-1))
 (2 2 (:REWRITE |(expt x (- n))|))
 (2 2 (:REWRITE |(expt 2^i n)|))
 (2 2 (:REWRITE |(expt 1/c n)|))
 (2 2 (:REWRITE |(expt (- x) n)|))
 (2 2 (:REWRITE |(equal (- x) 0)|))
 (2 2 (:REWRITE |(equal (- x) (- y))|))
 (2 2 (:REWRITE |(< 0 (- x))|))
 (2 2 (:DEFINITION HONS))
 (1 1 (:REWRITE INT-SYMLIST-WHEN-NOT-CONSP))
 )
(BALANCED-TREE-BUILD-TAXA-LIST-TREE
 (82 1 (:DEFINITION BUILD-TAXA-LIST-TREE-HELP))
 (32 1 (:DEFINITION HONS-GET))
 (24 1 (:DEFINITION HONS-ASSOC-EQUAL))
 (19 1 (:REWRITE ZP-OPEN))
 (15 3 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (14 2 (:DEFINITION LEN))
 (8 5 (:REWRITE DEFAULT-CDR))
 (7 5 (:REWRITE DEFAULT-+-2))
 (7 1 (:DEFINITION HONS-EQUAL))
 (6 6 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (6 3 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (5 5 (:TYPE-PRESCRIPTION TAXA-LIST-TO-INDEX-TAXON))
 (5 5 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (5 5 (:REWRITE NORMALIZE-ADDENDS))
 (5 5 (:REWRITE DEFAULT-+-1))
 (4 4 (:REWRITE DEFAULT-CAR))
 (4 2 (:REWRITE SIMPLIFY-SUMS-<))
 (4 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 2 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (4 2 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 1 (:REWRITE |(+ 0 x)|))
 (3 3 (:TYPE-PRESCRIPTION HONS-ASSOC-EQUAL))
 (3 2 (:REWRITE DEFAULT-<-2))
 (3 2 (:REWRITE DEFAULT-<-1))
 (2 2 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (2 2 (:REWRITE BALANCED-TREE-OF-CONS-GIVES-BALANCED-TREE-EACH))
 (2 2 (:REWRITE |(< (- x) (- y))|))
 (2 1 (:REWRITE BALANCED-TREE-WHEN-NOT-CONSP))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (1 1 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (1 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (1 1 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (1 1 (:REWRITE INT-SYMLIST-WHEN-NOT-CONSP))
 (1 1 (:REWRITE DEFAULT-EXPT-2))
 (1 1 (:REWRITE DEFAULT-EXPT-1))
 (1 1 (:REWRITE CONSP-BUILD-TAXA-LIST-TREE-HELP-FROM-ILOG2))
 (1 1 (:REWRITE |(expt x (- n))|))
 (1 1 (:REWRITE |(expt 2^i n)|))
 (1 1 (:REWRITE |(expt 1/c n)|))
 (1 1 (:REWRITE |(expt (- x) n)|))
 (1 1 (:REWRITE |(equal (- x) 0)|))
 (1 1 (:REWRITE |(equal (- x) (- y))|))
 (1 1 (:REWRITE |(< 0 (- x))|))
 (1 1 (:DEFINITION HONS))
 )
(CONSP-BUILD-TAXA-LIST-TREE-HELP
 (41 2 (:DEFINITION HONS-ASSOC-EQUAL))
 (30 18 (:REWRITE DEFAULT-+-2))
 (24 6 (:REWRITE NOT-CONSP-ASSOC-NOT-ASSOC-HQUAL))
 (18 18 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (18 18 (:REWRITE NORMALIZE-ADDENDS))
 (18 18 (:REWRITE DEFAULT-+-1))
 (12 12 (:TYPE-PRESCRIPTION GOOD-TAXON-INDEX-HALIST))
 (12 6 (:REWRITE DEFAULT-CDR))
 (11 2 (:DEFINITION HONS-EQUAL))
 (8 8 (:REWRITE DEFAULT-CAR))
 (6 6 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (5 5 (:REWRITE SIMPLIFY-SUMS-<))
 (5 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (5 5 (:REWRITE REDUCE-INTEGERP-+))
 (5 5 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (5 5 (:REWRITE INTEGERP-MINUS-X))
 (5 5 (:REWRITE DEFAULT-<-2))
 (5 5 (:REWRITE DEFAULT-<-1))
 (5 5 (:REWRITE |(< (- x) (- y))|))
 (5 5 (:META META-INTEGERP-CORRECT))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-POSITIVE-BASE))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-NONNEGATIVE-BASE))
 (4 4 (:TYPE-PRESCRIPTION EXPT-TYPE-PRESCRIPTION-INTEGERP-BASE))
 (4 4 (:REWRITE DEFAULT-EXPT-2))
 (4 4 (:REWRITE DEFAULT-EXPT-1))
 (4 4 (:REWRITE |(expt x (- n))|))
 (4 4 (:REWRITE |(expt 2^i n)|))
 (4 4 (:REWRITE |(expt 1/c n)|))
 (4 4 (:REWRITE |(expt (- x) n)|))
 (2 2 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (2 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (2 2 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (2 2 (:REWRITE |(equal (- x) (- y))|))
 (2 1 (:TYPE-PRESCRIPTION INTEGER-ASSOC-HQUAL-INTEGER-HALISTP))
 (1 1 (:TYPE-PRESCRIPTION INTEGER-HALISTP))
 (1 1 (:REWRITE |(equal (+ c x) d)|))
 )
(CONSP-BUILD-TAXA-LIST-TREE-WHEN-CONSP)
(GOOD-DEPTHS-WITH-BUILD-TAXA-LIST-TREE
 (53 8 (:LINEAR CONSP-GIVES-DEPTH<0))
 (49 7 (:DEFINITION LEN))
 (24 1 (:REWRITE CONSP-BUILD-TAXA-LIST-TREE-WHEN-CONSP))
 (21 1 (:REWRITE CONSP-BUILD-TAXA-LIST-TREE-FROM-LEN-TAXA-LIST))
 (15 6 (:REWRITE SIMPLIFY-SUMS-<))
 (15 6 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (15 6 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (14 7 (:REWRITE DEFAULT-+-2))
 (12 6 (:REWRITE DEFAULT-<-1))
 (10 6 (:REWRITE DEFAULT-<-2))
 (7 7 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (7 7 (:REWRITE NORMALIZE-ADDENDS))
 (7 7 (:REWRITE DEFAULT-CDR))
 (7 7 (:REWRITE DEFAULT-+-1))
 (6 6 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (6 6 (:REWRITE |(< (- x) (- y))|))
 (5 5 (:REWRITE INT-SYMLIST-WHEN-NOT-CONSP))
 (5 5 (:REWRITE DEPTH-WHEN-NOT-CONSP))
 (5 5 (:REWRITE BALANCED-TREE-OF-CONSP))
 (5 5 (:REWRITE BALANCED-TREE-HELPER-GIVES-DEPTH))
 (4 4 (:REWRITE GOOD-DEPTHS-WHEN-NOT-CONSP))
 (4 4 (:REWRITE DEFAULT-CAR))
 )
(CONSP-BITS-TO-TREE
 (34 16 (:REWRITE DEFAULT-<-2))
 (24 12 (:REWRITE DEFAULT-+-2))
 (16 16 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (16 16 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (16 16 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (16 16 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (16 16 (:REWRITE SIMPLIFY-SUMS-<))
 (16 16 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (16 16 (:REWRITE REDUCE-INTEGERP-+))
 (16 16 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (16 16 (:REWRITE INTEGERP-MINUS-X))
 (16 16 (:REWRITE DEFAULT-<-1))
 (16 16 (:REWRITE |(< (- x) (- y))|))
 (16 16 (:META META-INTEGERP-CORRECT))
 (16 4 (:REWRITE DEFAULT-UNARY-MINUS))
 (16 2 (:LINEAR EXPT-X->=-X))
 (16 2 (:LINEAR EXPT-X->-X))
 (12 12 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (12 12 (:REWRITE NORMALIZE-ADDENDS))
 (12 12 (:REWRITE DEFAULT-EXPT-2))
 (12 12 (:REWRITE DEFAULT-EXPT-1))
 (12 12 (:REWRITE DEFAULT-+-1))
 (12 12 (:REWRITE |(expt x (- n))|))
 (12 12 (:REWRITE |(expt 2^i n)|))
 (12 12 (:REWRITE |(expt 1/c n)|))
 (12 12 (:REWRITE |(expt (- x) n)|))
 (10 10 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (10 10 (:REWRITE DEFAULT-*-2))
 (10 10 (:REWRITE DEFAULT-*-1))
 (10 10 (:REWRITE |(integerp (* c x))|))
 (6 6 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (6 6 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (6 6 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (6 6 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (6 6 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (6 6 (:REWRITE |(equal (- x) 0)|))
 (6 6 (:REWRITE |(equal (- x) (- y))|))
 (6 6 (:REWRITE |(< (- x) 0)|))
 (4 4 (:LINEAR EXPT-IS-WEAKLY-DECREASING-FOR-POS-BASE-<-1))
 (4 4 (:LINEAR EXPT-IS-INCREASING-FOR-BASE->-1))
 (4 4 (:LINEAR EXPT-IS-DECREASING-FOR-POS-BASE-<-1))
 (2 2 (:LINEAR EXPT->-1-TWO))
 (2 2 (:LINEAR EXPT-<-1-TWO))
 (2 2 (:LINEAR EXPT-<-1-ONE))
 )
(GOOD-DEPTHS-THROUGH-EVENS
 (16 16 (:REWRITE DEFAULT-CDR))
 (13 13 (:REWRITE EVENS-GEN-WHEN-NOT-CONSP))
 (10 10 (:REWRITE DEPTH-WHEN-NOT-CONSP))
 (10 10 (:REWRITE BALANCED-TREE-OF-CONSP))
 (10 10 (:REWRITE BALANCED-TREE-HELPER-GIVES-DEPTH))
 (9 3 (:REWRITE SIMPLIFY-SUMS-<))
 (9 3 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (9 3 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (6 3 (:REWRITE DEFAULT-<-2))
 (6 3 (:REWRITE DEFAULT-<-1))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (3 3 (:REWRITE |(< (- x) (- y))|))
 (2 2 (:LINEAR CONSP-GIVES-DEPTH<0))
 )
