(BUILD-UNROOTED-BINARY-TREE-HELPER
 (29 29 (:REWRITE DEFAULT-CDR))
 (27 14 (:REWRITE DEFAULT-+-2))
 (14 14 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (14 14 (:REWRITE NORMALIZE-ADDENDS))
 (14 14 (:REWRITE DEFAULT-+-1))
 (10 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (10 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (10 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (5 5 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (5 5 (:REWRITE |(equal (- x) 0)|))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (4 4 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (4 4 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (4 2 (:REWRITE SIMPLIFY-SUMS-<))
 (4 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (4 2 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (4 2 (:REWRITE DEFAULT-<-1))
 (2 2 (:REWRITE DEFAULT-<-2))
 (2 2 (:REWRITE |(< (- x) (- y))|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (1 1 (:REWRITE |(< (- x) 0)|))
 )
(BUILD-UNROOTED-BINARY-TREE
 (12 6 (:REWRITE DEFAULT-+-2))
 (9 9 (:REWRITE DEFAULT-CDR))
 (6 6 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (6 6 (:REWRITE NORMALIZE-ADDENDS))
 (6 6 (:REWRITE DEFAULT-+-1))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (5 5 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (2 1 (:REWRITE SIMPLIFY-SUMS-<))
 (2 1 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (2 1 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (2 1 (:REWRITE DEFAULT-<-2))
 (1 1 (:TYPE-PRESCRIPTION BUILD-UNROOTED-BINARY-TREE))
 (1 1 (:REWRITE DEFAULT-<-1))
 (1 1 (:REWRITE |(< (- x) (- y))|))
 )
(BUILD-ARBITRARYTREE-HELPER
 (481 26 (:DEFINITION INTEGER-ABS))
 (358 117 (:REWRITE DEFAULT-+-2))
 (247 13 (:REWRITE |(+ (if a b c) x)|))
 (155 117 (:REWRITE DEFAULT-+-1))
 (143 13 (:REWRITE NUMERATOR-NEGATIVE))
 (130 13 (:DEFINITION LENGTH))
 (117 117 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (91 13 (:DEFINITION LEN))
 (82 28 (:REWRITE DEFAULT-UNARY-MINUS))
 (60 5 (:REWRITE SUBTREEP-SMALLER))
 (58 50 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (55 35 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (55 35 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-POSITIVE . 2))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-POSITIVE . 1))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-NEGATIVE . 2))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-NEGATIVE . 1))
 (50 50 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (48 48 (:REWRITE |(< (- x) (- y))|))
 (43 34 (:REWRITE DEFAULT-<-2))
 (42 42 (:REWRITE FOLD-CONSTS-IN-+))
 (42 42 (:REWRITE DEFAULT-CDR))
 (41 34 (:REWRITE DEFAULT-<-1))
 (39 39 (:REWRITE |(< (- x) 0)|))
 (26 26 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (25 5 (:REWRITE SUBTREE-P-WHEN-NOT-EQUAL))
 (20 20 (:REWRITE DEFAULT-CAR))
 (20 5 (:REWRITE PROPER-GIVES-SUBTREE))
 (16 4 (:LINEAR MEMBER-OF-ALL-IMPLIES-SMALLER-THAN-SMALLEST))
 (13 13 (:TYPE-PRESCRIPTION LEN))
 (13 13 (:REWRITE REDUCE-INTEGERP-+))
 (13 13 (:REWRITE INTEGERP==>NUMERATOR-=-X))
 (13 13 (:REWRITE INTEGERP==>DENOMINATOR-=-1))
 (13 13 (:REWRITE INTEGERP-MINUS-X))
 (13 13 (:REWRITE DEFAULT-REALPART))
 (13 13 (:REWRITE DEFAULT-NUMERATOR))
 (13 13 (:REWRITE DEFAULT-IMAGPART))
 (13 13 (:REWRITE DEFAULT-DENOMINATOR))
 (13 13 (:REWRITE DEFAULT-COERCE-2))
 (13 13 (:REWRITE DEFAULT-COERCE-1))
 (13 13 (:META META-INTEGERP-CORRECT))
 (12 12 (:TYPE-PRESCRIPTION MEMBER-OF-ALL))
 (10 10 (:TYPE-PRESCRIPTION SUBTREEP))
 (10 10 (:TYPE-PRESCRIPTION PROPER-SUBTREEP))
 (8 8 (:LINEAR SUBTREEP-SMALLER))
 (8 8 (:LINEAR MEMBER-HQUAL-IMPLIES-SMALLER))
 (8 8 (:LINEAR MEMBER-EQUAL-IMPLIES-SMALLER))
 (8 2 (:REWRITE MEMBER-OF-ALL-IMPLIES-SMALLER-THAN-SMALLEST))
 (7 2 (:REWRITE |(< d (+ c x))|))
 (6 6 (:REWRITE MEMBER-OF-ALL-WHEN-NOT-CONSP))
 (5 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (5 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (5 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (5 5 (:REWRITE NOT-SUBTREE-NOT-NOT-SUBTREE-GIVES-PROPER-SUBTREEP))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (4 4 (:LINEAR BIGGEST-CDR-ASSOC-HQUAL))
 (4 2 (:REWRITE |(< d (+ c x y))|))
 (1 1 (:REWRITE SMALLEST-IN-LIST-WHEN-NOT-CONSP))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE |(< 0 (- x))|))
 )
(BUILD-ARBITRARYTREE
 (5 5 (:TYPE-PRESCRIPTION BUILD-ARBITRARYTREE-HELPER))
 )
(BUILD-ARBITRARYTREE1
 (5 5 (:TYPE-PRESCRIPTION BUILD-ARBITRARYTREE-HELPER))
 )
(SPLICE)
(ORDERLY-SPLICE
 (316 7 (:REWRITE SUBSET-REV-FLATTEN-SUBSET-MYTIPS))
 (268 4 (:REWRITE CONSP-SUBSET-MEMBER-FIRST-TAXON))
 (109 7 (:REWRITE SUBSET-X-SUBSET-REV))
 (83 27 (:REWRITE PERM-WHEN-NOT-CONSP))
 (69 23 (:REWRITE SUBSET-WHEN-NOT-CONS))
 (50 50 (:TYPE-PRESCRIPTION PERM))
 (49 7 (:REWRITE PERM-REV-FIX-TRUE))
 (42 42 (:TYPE-PRESCRIPTION TASPI-FLATTEN))
 (42 7 (:DEFINITION TRUE-LIST-FIX))
 (39 39 (:REWRITE GET-TAXA-FROM-TAXON-INDEX-WHEN-NOT-CONSP))
 (36 3 (:REWRITE PERM-OF-CONSP))
 (33 5 (:REWRITE TIP-P-WHEN-NOT-CONSP))
 (30 23 (:REWRITE DEFAULT-CAR))
 (30 12 (:REWRITE TIP-P-NOT-INTEGER-GIVES-SYMBOLP))
 (24 24 (:REWRITE SUBSET-APPEND-GIVES-2))
 (24 24 (:REWRITE SUBSET-APPEND-GIVES-1))
 (24 3 (:REWRITE TIP-P-GIVES-TASPIP-T))
 (23 1 (:REWRITE SUBSET-OF-CONSP))
 (21 21 (:TYPE-PRESCRIPTION TRUE-LIST-FIX))
 (21 21 (:REWRITE TASPI-FLATTEN-WHEN-NOT-CONSP))
 (16 9 (:REWRITE DEFAULT-CDR))
 (16 4 (:REWRITE MEMBER-GEN-WHEN-NOT-CONS))
 (14 14 (:TYPE-PRESCRIPTION TASPI-REV))
 (14 7 (:REWRITE TASPI-REV-WHEN-NOT-CONSP))
 (12 3 (:REWRITE DEL-WHEN-NOT-CONSP))
 (10 10 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (10 2 (:DEFINITION TRUE-LISTP))
 (9 9 (:REWRITE SUBSET-SAME-MEMBERS))
 (9 9 (:REWRITE MEMBER-PERM-GIVES-MEMBER))
 (9 9 (:REWRITE MEMBER-DIFFERENCE-MEMBER))
 (8 8 (:REWRITE TASPIP-FLG-CONSP-GIVES-TASPIP-NIL))
 (7 7 (:REWRITE NOT-INTERSECT-TOPS-NOT-SUBSET))
 (7 7 (:REWRITE CONSP-REV-FLATTEN))
 (6 6 (:REWRITE REDUCE-INTEGERP-+))
 (6 6 (:REWRITE INTEGERP-MINUS-X))
 (6 6 (:META META-INTEGERP-CORRECT))
 (4 4 (:REWRITE PROPER-SUBTREE-MEMBER-GEN))
 (4 4 (:REWRITE NOT-MEMBER-SUBSET))
 (4 4 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (4 4 (:REWRITE FIRST-TAXON-WHEN-NOT-CONSP))
 (3 3 (:REWRITE TASPIP-FLG-AND-FLG-GIVES-T))
 )
(SPLICE2)
(ORDERLY-SPLICE2
 (502 11 (:REWRITE SUBSET-REV-FLATTEN-SUBSET-MYTIPS))
 (174 11 (:REWRITE SUBSET-X-SUBSET-REV))
 (139 45 (:REWRITE PERM-WHEN-NOT-CONSP))
 (105 37 (:REWRITE SUBSET-WHEN-NOT-CONS))
 (82 82 (:TYPE-PRESCRIPTION PERM))
 (77 11 (:REWRITE PERM-REV-FIX-TRUE))
 (76 65 (:REWRITE DEFAULT-CAR))
 (71 71 (:REWRITE GET-TAXA-FROM-TAXON-INDEX-WHEN-NOT-CONSP))
 (70 14 (:REWRITE TIP-P-WHEN-NOT-CONSP))
 (69 3 (:REWRITE SUBSET-OF-CONSP))
 (66 66 (:TYPE-PRESCRIPTION TASPI-FLATTEN))
 (66 11 (:DEFINITION TRUE-LIST-FIX))
 (64 10 (:REWRITE TIP-P-GIVES-TASPIP-T))
 (60 24 (:REWRITE TIP-P-NOT-INTEGER-GIVES-SYMBOLP))
 (60 5 (:REWRITE PERM-OF-CONSP))
 (40 40 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (40 40 (:REWRITE SUBSET-APPEND-GIVES-2))
 (40 40 (:REWRITE SUBSET-APPEND-GIVES-1))
 (40 8 (:DEFINITION TRUE-LISTP))
 (33 33 (:TYPE-PRESCRIPTION TRUE-LIST-FIX))
 (33 33 (:REWRITE TASPI-FLATTEN-WHEN-NOT-CONSP))
 (30 19 (:REWRITE DEFAULT-CDR))
 (24 6 (:REWRITE MEMBER-GEN-WHEN-NOT-CONS))
 (22 22 (:TYPE-PRESCRIPTION TASPI-REV))
 (22 11 (:REWRITE TASPI-REV-WHEN-NOT-CONSP))
 (20 20 (:REWRITE TASPIP-FLG-CONSP-GIVES-TASPIP-NIL))
 (20 5 (:REWRITE DEL-WHEN-NOT-CONSP))
 (17 17 (:REWRITE SUBSET-SAME-MEMBERS))
 (17 17 (:REWRITE NOT-INTERSECT-TOPS-NOT-SUBSET))
 (17 17 (:REWRITE MEMBER-PERM-GIVES-MEMBER))
 (17 17 (:REWRITE MEMBER-DIFFERENCE-MEMBER))
 (12 12 (:REWRITE REDUCE-INTEGERP-+))
 (12 12 (:REWRITE INTEGERP-MINUS-X))
 (12 12 (:META META-INTEGERP-CORRECT))
 (11 11 (:REWRITE CONSP-REV-FLATTEN))
 (6 6 (:REWRITE PROPER-SUBTREE-MEMBER-GEN))
 (6 6 (:REWRITE NOT-MEMBER-SUBSET))
 (6 6 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FIRST-TAXON-WHEN-NOT-CONSP))
 (6 6 (:REWRITE CONSP-SUBSET-MEMBER-FIRST-TAXON))
 )
(ADDTAXA-ROOTED
 (481 26 (:DEFINITION INTEGER-ABS))
 (360 118 (:REWRITE DEFAULT-+-2))
 (247 13 (:REWRITE |(+ (if a b c) x)|))
 (157 118 (:REWRITE DEFAULT-+-1))
 (143 13 (:REWRITE NUMERATOR-NEGATIVE))
 (130 13 (:DEFINITION LENGTH))
 (118 118 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (91 13 (:DEFINITION LEN))
 (82 28 (:REWRITE DEFAULT-UNARY-MINUS))
 (60 5 (:REWRITE SUBTREEP-SMALLER))
 (58 50 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (55 35 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (55 35 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-POSITIVE . 2))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-POSITIVE . 1))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-NEGATIVE . 2))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-NEGATIVE . 1))
 (50 50 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (48 48 (:REWRITE |(< (- x) (- y))|))
 (43 34 (:REWRITE DEFAULT-<-2))
 (42 42 (:REWRITE FOLD-CONSTS-IN-+))
 (41 34 (:REWRITE DEFAULT-<-1))
 (39 39 (:REWRITE DEFAULT-CDR))
 (39 39 (:REWRITE |(< (- x) 0)|))
 (26 26 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (25 5 (:REWRITE SUBTREE-P-WHEN-NOT-EQUAL))
 (23 23 (:REWRITE DEFAULT-CAR))
 (20 5 (:REWRITE PROPER-GIVES-SUBTREE))
 (16 4 (:LINEAR MEMBER-OF-ALL-IMPLIES-SMALLER-THAN-SMALLEST))
 (13 13 (:TYPE-PRESCRIPTION LEN))
 (13 13 (:REWRITE REDUCE-INTEGERP-+))
 (13 13 (:REWRITE INTEGERP==>NUMERATOR-=-X))
 (13 13 (:REWRITE INTEGERP==>DENOMINATOR-=-1))
 (13 13 (:REWRITE INTEGERP-MINUS-X))
 (13 13 (:REWRITE DEFAULT-REALPART))
 (13 13 (:REWRITE DEFAULT-NUMERATOR))
 (13 13 (:REWRITE DEFAULT-IMAGPART))
 (13 13 (:REWRITE DEFAULT-DENOMINATOR))
 (13 13 (:REWRITE DEFAULT-COERCE-2))
 (13 13 (:REWRITE DEFAULT-COERCE-1))
 (13 13 (:META META-INTEGERP-CORRECT))
 (12 12 (:TYPE-PRESCRIPTION MEMBER-OF-ALL))
 (10 10 (:TYPE-PRESCRIPTION SUBTREEP))
 (10 10 (:TYPE-PRESCRIPTION PROPER-SUBTREEP))
 (8 8 (:LINEAR SUBTREEP-SMALLER))
 (8 8 (:LINEAR MEMBER-HQUAL-IMPLIES-SMALLER))
 (8 8 (:LINEAR MEMBER-EQUAL-IMPLIES-SMALLER))
 (8 2 (:REWRITE MEMBER-OF-ALL-IMPLIES-SMALLER-THAN-SMALLEST))
 (7 2 (:REWRITE |(< d (+ c x))|))
 (6 6 (:REWRITE MEMBER-OF-ALL-WHEN-NOT-CONSP))
 (5 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (5 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (5 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (5 5 (:REWRITE NOT-SUBTREE-NOT-NOT-SUBTREE-GIVES-PROPER-SUBTREEP))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (4 4 (:LINEAR BIGGEST-CDR-ASSOC-HQUAL))
 (4 2 (:REWRITE |(< d (+ c x y))|))
 (1 1 (:REWRITE SMALLEST-IN-LIST-WHEN-NOT-CONSP))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE |(< 0 (- x))|))
 )
(ORDERLY-ADDTAXA-ROOTED
 (481 26 (:DEFINITION INTEGER-ABS))
 (440 10 (:REWRITE SUBSET-REV-FLATTEN-SUBSET-MYTIPS))
 (382 33 (:REWRITE PERM-IMPLIES-SUBSET))
 (360 118 (:REWRITE DEFAULT-+-2))
 (320 5 (:REWRITE CONSP-SUBSET-MEMBER-FIRST-TAXON))
 (247 13 (:REWRITE |(+ (if a b c) x)|))
 (157 118 (:REWRITE DEFAULT-+-1))
 (150 10 (:REWRITE SUBSET-X-SUBSET-REV))
 (143 13 (:REWRITE NUMERATOR-NEGATIVE))
 (130 13 (:DEFINITION LENGTH))
 (129 33 (:REWRITE PERM-WHEN-NOT-CONSP))
 (123 32 (:REWRITE SUBSET-WHEN-NOT-CONS))
 (118 118 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (91 13 (:DEFINITION LEN))
 (82 28 (:REWRITE DEFAULT-UNARY-MINUS))
 (70 10 (:REWRITE PERM-REV-FIX-TRUE))
 (64 64 (:TYPE-PRESCRIPTION PERM))
 (64 54 (:REWRITE DEFAULT-CDR))
 (63 1 (:REWRITE SUBSET-SUBSET-GIVES-SUBSET-APPEND))
 (60 60 (:TYPE-PRESCRIPTION TASPI-FLATTEN))
 (60 10 (:REWRITE GOOD-INDEX-FLATTEN-TASPIP))
 (60 10 (:DEFINITION TRUE-LIST-FIX))
 (60 5 (:REWRITE SUBTREEP-SMALLER))
 (58 50 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (55 35 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (55 35 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-POSITIVE . 2))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-POSITIVE . 1))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-NEGATIVE . 2))
 (52 52 (:TYPE-PRESCRIPTION NUMERATOR-NEGATIVE . 1))
 (50 50 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (48 48 (:REWRITE |(< (- x) (- y))|))
 (47 37 (:REWRITE DEFAULT-CAR))
 (44 44 (:REWRITE GET-TAXA-FROM-TAXON-INDEX-WHEN-NOT-CONSP))
 (43 34 (:REWRITE DEFAULT-<-2))
 (42 42 (:REWRITE FOLD-CONSTS-IN-+))
 (41 34 (:REWRITE DEFAULT-<-1))
 (39 39 (:REWRITE |(< (- x) 0)|))
 (36 12 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (33 33 (:REWRITE SUBSET-TRANSITIVE))
 (33 33 (:REWRITE SUBSET-APPEND-GIVES-2))
 (33 33 (:REWRITE SUBSET-APPEND-GIVES-1))
 (30 30 (:TYPE-PRESCRIPTION TRUE-LIST-FIX))
 (30 30 (:REWRITE TASPI-FLATTEN-WHEN-NOT-CONSP))
 (26 26 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (25 25 (:REWRITE MYTIPS-WHEN-NOT-CONSP))
 (25 5 (:REWRITE SUBTREE-P-WHEN-NOT-EQUAL))
 (24 6 (:REWRITE TIP-P-GIVES-TASPIP-T))
 (23 1 (:REWRITE SUBSET-OF-CONSP))
 (20 20 (:TYPE-PRESCRIPTION TASPI-REV))
 (20 10 (:REWRITE TASPI-REV-WHEN-NOT-CONSP))
 (20 5 (:REWRITE PROPER-GIVES-SUBTREE))
 (20 5 (:REWRITE MEMBER-GEN-WHEN-NOT-CONS))
 (20 4 (:DEFINITION BINARY-APPEND))
 (16 4 (:LINEAR MEMBER-OF-ALL-IMPLIES-SMALLER-THAN-SMALLEST))
 (14 14 (:REWRITE TASPIP-WHEN-NOT-CONSP))
 (13 13 (:TYPE-PRESCRIPTION LEN))
 (13 13 (:REWRITE REDUCE-INTEGERP-+))
 (13 13 (:REWRITE INTEGERP==>NUMERATOR-=-X))
 (13 13 (:REWRITE INTEGERP==>DENOMINATOR-=-1))
 (13 13 (:REWRITE INTEGERP-MINUS-X))
 (13 13 (:REWRITE DEFAULT-REALPART))
 (13 13 (:REWRITE DEFAULT-NUMERATOR))
 (13 13 (:REWRITE DEFAULT-IMAGPART))
 (13 13 (:REWRITE DEFAULT-DENOMINATOR))
 (13 13 (:REWRITE DEFAULT-COERCE-2))
 (13 13 (:REWRITE DEFAULT-COERCE-1))
 (13 13 (:META META-INTEGERP-CORRECT))
 (12 12 (:TYPE-PRESCRIPTION MEMBER-OF-ALL))
 (12 12 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (12 1 (:REWRITE PERM-OF-CONSP))
 (10 10 (:TYPE-PRESCRIPTION SUBTREEP))
 (10 10 (:TYPE-PRESCRIPTION PROPER-SUBTREEP))
 (10 10 (:REWRITE TASPIP-FLG-CONSP-GIVES-TASPIP-NIL))
 (10 10 (:REWRITE CONSP-REV-FLATTEN))
 (8 8 (:REWRITE SUBSET-SAME-MEMBERS))
 (8 8 (:REWRITE MEMBER-PERM-GIVES-MEMBER))
 (8 8 (:REWRITE MEMBER-DIFFERENCE-MEMBER))
 (8 8 (:LINEAR SUBTREEP-SMALLER))
 (8 8 (:LINEAR MEMBER-HQUAL-IMPLIES-SMALLER))
 (8 8 (:LINEAR MEMBER-EQUAL-IMPLIES-SMALLER))
 (8 2 (:REWRITE MEMBER-OF-ALL-IMPLIES-SMALLER-THAN-SMALLEST))
 (7 2 (:REWRITE |(< d (+ c x))|))
 (6 6 (:REWRITE TIP-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE MEMBER-OF-ALL-WHEN-NOT-CONSP))
 (5 5 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (5 5 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (5 5 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (5 5 (:REWRITE PROPER-SUBTREE-MEMBER-GEN))
 (5 5 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (5 5 (:REWRITE NOT-SUBTREE-NOT-NOT-SUBTREE-GIVES-PROPER-SUBTREEP))
 (5 5 (:REWRITE NOT-MEMBER-SUBSET))
 (5 5 (:REWRITE NOT-INTERSECT-TOPS-NOT-SUBSET))
 (5 5 (:REWRITE FIRST-TAXON-WHEN-NOT-CONSP))
 (5 5 (:REWRITE |(equal (- x) (- y))|))
 (5 1 (:DEFINITION TRUE-LISTP))
 (4 4 (:LINEAR BIGGEST-CDR-ASSOC-HQUAL))
 (4 2 (:REWRITE |(< d (+ c x y))|))
 (4 1 (:REWRITE DEL-WHEN-NOT-CONSP))
 (1 1 (:REWRITE SMALLEST-IN-LIST-WHEN-NOT-CONSP))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (1 1 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (1 1 (:REWRITE |(< 0 (- x))|))
 )
(ADDTAXA-UNROOTED
 (8 8 (:REWRITE DEFAULT-CDR))
 (6 3 (:REWRITE DEFAULT-+-2))
 (3 3 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (3 3 (:REWRITE NORMALIZE-ADDENDS))
 (3 3 (:REWRITE DEFAULT-+-1))
 )
(ORDERLY-ADDTAXA-UNROOTED
 (8 8 (:REWRITE DEFAULT-CDR))
 (6 3 (:REWRITE DEFAULT-+-2))
 (3 3 (:REWRITE NORMALIZE-TERMS-SUCH-AS-A/A+B-+-B/A+B))
 (3 3 (:REWRITE NORMALIZE-ADDENDS))
 (3 3 (:REWRITE GOOD-TAXON-INDEX-HALIST-WHEN-NOT-CONSP))
 (3 3 (:REWRITE DEFAULT-+-1))
 )
(GET-BEST-TREES)
