(BINDINGLIST-P)
(SYMBOL-LISTP-CAAR-OF-BINDINGLIST
 (4 4 (:REWRITE DEFAULT-CAR))
 (1 1 (:REWRITE DEFAULT-CDR))
 )
(PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST
 (66 5 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (38 5 (:REWRITE PSEUDO-TERMP-CAR))
 (36 5 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (13 13 (:REWRITE DEFAULT-CAR))
 (12 1 (:DEFINITION PSEUDO-TERMP))
 (11 7 (:REWRITE PSEUDO-TERMP-OPENER))
 (9 9 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (9 9 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (9 9 (:REWRITE DEFAULT-CDR))
 (7 7 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (6 1 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (4 1 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (3 1 (:DEFINITION SYMBOL-LISTP))
 )
(LEN-CDAR-OF-BINDINGLIST
 (401 5 (:DEFINITION PSEUDO-TERM-LISTP))
 (361 15 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (346 15 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (310 3 (:DEFINITION PSEUDO-TERMP))
 (129 15 (:REWRITE PSEUDO-TERMP-CAR))
 (65 65 (:REWRITE DEFAULT-CAR))
 (60 60 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (55 11 (:DEFINITION LEN))
 (53 53 (:REWRITE DEFAULT-CDR))
 (37 10 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (30 5 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (29 19 (:REWRITE PSEUDO-TERMP-OPENER))
 (26 26 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (26 26 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (22 11 (:REWRITE DEFAULT-+-2))
 (21 4 (:DEFINITION SYMBOL-LISTP))
 (19 19 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (15 3 (:DEFINITION TRUE-LISTP))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (11 11 (:REWRITE DEFAULT-+-1))
 (4 1 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 )
(BINDINGLIST-P-CDR-OF-BINDINGLIST
 (210 10 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (137 3 (:DEFINITION PSEUDO-TERM-LISTP))
 (129 1 (:DEFINITION PSEUDO-TERMP))
 (98 10 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (90 8 (:REWRITE PSEUDO-TERMP-CAR))
 (32 32 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (30 30 (:REWRITE DEFAULT-CAR))
 (25 7 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (25 5 (:DEFINITION LEN))
 (24 2 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (23 23 (:REWRITE DEFAULT-CDR))
 (20 20 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (20 20 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (16 10 (:REWRITE PSEUDO-TERMP-OPENER))
 (10 10 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (10 5 (:REWRITE DEFAULT-+-2))
 (9 2 (:DEFINITION SYMBOL-LISTP))
 (8 2 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (5 5 (:REWRITE DEFAULT-+-1))
 (5 1 (:DEFINITION TRUE-LISTP))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (4 1 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 )
(CONSP-CAR-WHEN-BINDINGLIST-P
 (210 10 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (137 3 (:DEFINITION PSEUDO-TERM-LISTP))
 (129 1 (:DEFINITION PSEUDO-TERMP))
 (98 10 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (90 8 (:REWRITE PSEUDO-TERMP-CAR))
 (57 57 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (32 32 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (32 32 (:REWRITE DEFAULT-CAR))
 (25 7 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (25 5 (:DEFINITION LEN))
 (24 24 (:TYPE-PRESCRIPTION LEN))
 (24 2 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (23 23 (:REWRITE DEFAULT-CDR))
 (20 20 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (20 20 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (16 10 (:REWRITE PSEUDO-TERMP-OPENER))
 (10 10 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (10 5 (:REWRITE DEFAULT-+-2))
 (9 2 (:DEFINITION SYMBOL-LISTP))
 (8 2 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (6 6 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (5 5 (:REWRITE DEFAULT-+-1))
 (5 1 (:DEFINITION TRUE-LISTP))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (4 1 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (4 1 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 )
(BINDINGLIST-P-OF-CONS
 (4775 186 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (3260 19 (:DEFINITION PSEUDO-TERMP))
 (3259 128 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (2163 136 (:REWRITE PSEUDO-TERMP-OPENER))
 (827 67 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (696 696 (:REWRITE DEFAULT-CAR))
 (520 52 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (495 495 (:REWRITE DEFAULT-CDR))
 (449 449 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (403 90 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (254 45 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (226 113 (:REWRITE DEFAULT-+-2))
 (216 216 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (216 216 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (190 16 (:DEFINITION TRUE-LISTP))
 (136 136 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (113 113 (:REWRITE DEFAULT-+-1))
 (82 40 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (64 64 (:TYPE-PRESCRIPTION TRUE-LISTP))
 )
(TRUE-LISTP-OF-UNIFY-EV-LST
 (6 4 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (4 1 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (3 3 (:REWRITE DEFAULT-CDR))
 (2 2 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (2 2 (:REWRITE UNIFY-EV-LST-OF-ATOM))
 (2 1 (:REWRITE UNIFY-EV-OF-QUOTE))
 (2 1 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (2 1 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (2 1 (:DEFINITION TRUE-LISTP))
 (1 1 (:REWRITE UNIFY-EV-OF-VARIABLE))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(UNIFY-EV-IND)
(UNIFY-EV-IND-FLAG)
(FLAG::FLAG-EQUIV-LEMMA)
(UNIFY-EV-IND-FLAG-EQUIVALENCES)
(FLAG-LEMMA-FOR-UNIFY-EV-OF-ALIST-FIX
 (192 16 (:REWRITE ALIST-FIX-WHEN-ALISTP))
 (144 16 (:DEFINITION ALISTP))
 (81 33 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (80 80 (:TYPE-PRESCRIPTION ALISTP))
 (59 55 (:REWRITE DEFAULT-CAR))
 (48 48 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (44 20 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (43 40 (:REWRITE DEFAULT-CDR))
 (37 22 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (33 22 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (22 2 (:DEFINITION HONS-ASSOC-EQUAL))
 (17 17 (:TYPE-PRESCRIPTION KWOTE-LST))
 (16 16 (:REWRITE ALIST-FIX-OF-ATOM))
 (12 2 (:DEFINITION KWOTE-LST))
 (4 4 (:REWRITE CAR-CONS))
 (3 3 (:TYPE-PRESCRIPTION HONS-ASSOC-EQUAL))
 (2 2 (:DEFINITION KWOTE))
 (2 2 (:DEFINITION HONS-EQUAL))
 )
(UNIFY-EV-OF-ALIST-FIX)
(UNIFY-EV-LST-OF-ALIST-FIX)
(FLAG-LEMMA-FOR-UNIFY-EV-OF-APPEND-ALIST-FIX
 (1811 520 (:REWRITE DEFAULT-CDR))
 (936 198 (:REWRITE CAR-OF-APPEND))
 (791 65 (:REWRITE ALIST-FIX-WHEN-ALISTP))
 (614 66 (:DEFINITION ALISTP))
 (483 136 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (420 132 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 (316 316 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (295 295 (:TYPE-PRESCRIPTION ALISTP))
 (291 99 (:REWRITE CONSP-OF-APPEND))
 (93 31 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (44 20 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (37 22 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (33 22 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (17 17 (:TYPE-PRESCRIPTION KWOTE-LST))
 (12 2 (:DEFINITION KWOTE-LST))
 (2 2 (:DEFINITION KWOTE))
 )
(UNIFY-EV-OF-APPEND-ALIST-FIX)
(UNIFY-EV-LST-OF-APPEND-ALIST-FIX)
(TRUE-LISTP-WHEN-SYMBOL-LISTP)
(TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP)
(ALISTP-OF-PAIRLIS$
 (11 10 (:REWRITE DEFAULT-CAR))
 (9 8 (:REWRITE DEFAULT-CDR))
 (9 3 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (6 6 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 )
(ALISTP-OF-APPEND
 (30 13 (:REWRITE DEFAULT-CDR))
 (27 9 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (21 19 (:REWRITE DEFAULT-CAR))
 (18 18 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (9 3 (:REWRITE CAR-OF-APPEND))
 (6 6 (:REWRITE CONSP-OF-APPEND))
 (5 5 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (3 3 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 )
(UNIFY-EV-BINDINGLIST
 (44 1 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (39 1 (:DEFINITION PSEUDO-TERM-LISTP))
 (14 1 (:DEFINITION PAIRLIS$))
 (13 1 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (12 8 (:REWRITE DEFAULT-CAR))
 (11 7 (:REWRITE DEFAULT-CDR))
 (10 10 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (8 2 (:REWRITE PSEUDO-TERMP-CAR))
 (6 6 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (6 3 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (6 2 (:REWRITE PSEUDO-TERMP-OPENER))
 (6 1 (:DEFINITION BINARY-APPEND))
 (6 1 (:DEFINITION ALISTP))
 (5 2 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (3 3 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (3 3 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (3 3 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (3 3 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (3 1 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (2 2 (:REWRITE UNIFY-EV-LST-OF-CONS))
 (2 2 (:REWRITE UNIFY-EV-LST-OF-ATOM))
 (2 2 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (2 1 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 )
(ALISTP-OF-UNIFY-EV-BINDINGLIST
 (41 15 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (31 19 (:REWRITE DEFAULT-CAR))
 (28 2 (:DEFINITION PAIRLIS$))
 (26 26 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (25 17 (:REWRITE DEFAULT-CDR))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-UNIFY-EV-LST))
 (12 1 (:REWRITE ALIST-FIX-WHEN-ALISTP))
 (6 1 (:DEFINITION BINARY-APPEND))
 (5 5 (:TYPE-PRESCRIPTION PAIRLIS$))
 (5 2 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (2 2 (:REWRITE UNIFY-EV-LST-OF-CONS))
 (2 2 (:REWRITE UNIFY-EV-LST-OF-ATOM))
 (1 1 (:REWRITE ALIST-FIX-OF-ATOM))
 )
(LAMBDA-REMOVE-REDUNDANT-BINDINGS
 (634 2 (:DEFINITION PSEUDO-TERMP))
 (524 25 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (221 13 (:DEFINITION MEMBER-EQUAL))
 (182 26 (:REWRITE SUBSETP-CAR-MEMBER))
 (164 3 (:DEFINITION TRUE-LISTP))
 (161 6 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (148 148 (:REWRITE DEFAULT-CAR))
 (104 104 (:REWRITE DEFAULT-CDR))
 (103 24 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (96 14 (:REWRITE PSEUDO-TERMP-CAR))
 (88 88 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (87 23 (:REWRITE PSEUDO-TERMP-OPENER))
 (66 6 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (64 5 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (54 54 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (53 53 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (52 52 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (42 21 (:REWRITE DEFAULT-+-2))
 (33 11 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (26 26 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (26 26 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (26 26 (:REWRITE SUBSETP-TRANS2))
 (26 26 (:REWRITE SUBSETP-TRANS))
 (26 26 (:REWRITE SUBSETP-MEMBER . 4))
 (26 26 (:REWRITE SUBSETP-MEMBER . 3))
 (26 26 (:REWRITE SUBSETP-MEMBER . 2))
 (26 26 (:REWRITE SUBSETP-MEMBER . 1))
 (26 26 (:REWRITE MEMBER-WHEN-ATOM))
 (26 26 (:REWRITE INTERSECTP-MEMBER . 3))
 (26 26 (:REWRITE INTERSECTP-MEMBER . 2))
 (26 10 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (22 22 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (21 21 (:REWRITE DEFAULT-+-1))
 (8 8 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (3 1 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (3 1 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 )
(SYMBOL-LISTP-OF-LAMBDA-REMOVE-REDUNDANT-BINDINGS.NEW-FORMALS
 (136 8 (:DEFINITION MEMBER-EQUAL))
 (126 18 (:REWRITE SUBSETP-CAR-MEMBER))
 (121 121 (:REWRITE DEFAULT-CAR))
 (88 88 (:REWRITE DEFAULT-CDR))
 (20 20 (:REWRITE SUBSETP-TRANS2))
 (20 20 (:REWRITE SUBSETP-TRANS))
 (18 18 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (18 18 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (18 18 (:REWRITE SUBSETP-MEMBER . 4))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 3))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 2))
 (17 17 (:REWRITE SUBSETP-MEMBER . 2))
 (16 16 (:REWRITE MEMBER-WHEN-ATOM))
 )
(PSEUDO-TERM-LISTP-OF-LAMBDA-REMOVE-REDUNDANT-BINDINGS.NEW-ACTUALS
 (11612 46 (:DEFINITION PSEUDO-TERMP))
 (9060 419 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (2512 59 (:DEFINITION TRUE-LISTP))
 (2180 499 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (2173 118 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (1804 447 (:REWRITE PSEUDO-TERMP-OPENER))
 (1758 1758 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (1554 177 (:DEFINITION SYMBOL-LISTP))
 (1386 1386 (:REWRITE DEFAULT-CAR))
 (1308 118 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (1239 177 (:DEFINITION LEN))
 (1187 1187 (:REWRITE DEFAULT-CDR))
 (919 919 (:TYPE-PRESCRIPTION LEN))
 (912 105 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (890 890 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (877 877 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (833 833 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (729 243 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (434 434 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (368 140 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (354 177 (:REWRITE DEFAULT-+-2))
 (272 16 (:DEFINITION MEMBER-EQUAL))
 (252 36 (:REWRITE SUBSETP-CAR-MEMBER))
 (184 184 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (177 177 (:REWRITE DEFAULT-+-1))
 (69 23 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (69 23 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (40 40 (:REWRITE SUBSETP-TRANS2))
 (40 40 (:REWRITE SUBSETP-TRANS))
 (36 36 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (36 36 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (36 36 (:REWRITE SUBSETP-MEMBER . 4))
 (36 36 (:REWRITE INTERSECTP-MEMBER . 3))
 (36 36 (:REWRITE INTERSECTP-MEMBER . 2))
 (34 34 (:REWRITE SUBSETP-MEMBER . 2))
 (32 32 (:REWRITE MEMBER-WHEN-ATOM))
 )
(LEN-OF-LAMBDA-REMOVE-REDUNDANT-BINDINGS
 (126 18 (:REWRITE SUBSETP-CAR-MEMBER))
 (119 7 (:DEFINITION MEMBER-EQUAL))
 (65 65 (:REWRITE DEFAULT-CAR))
 (57 57 (:REWRITE DEFAULT-CDR))
 (44 22 (:REWRITE DEFAULT-+-2))
 (22 22 (:REWRITE SUBSETP-TRANS2))
 (22 22 (:REWRITE SUBSETP-TRANS))
 (22 22 (:REWRITE DEFAULT-+-1))
 (18 18 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (18 18 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (18 18 (:REWRITE SUBSETP-MEMBER . 4))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 3))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 2))
 (16 16 (:REWRITE SUBSETP-MEMBER . 2))
 (14 14 (:REWRITE MEMBER-WHEN-ATOM))
 )
(LOOKUP-IN-LAMBDA-REMOVE-REDUNDANT-BINDINGS
 (547 518 (:REWRITE DEFAULT-CAR))
 (491 33 (:DEFINITION MEMBER-EQUAL))
 (432 381 (:REWRITE DEFAULT-CDR))
 (364 44 (:REWRITE SUBSETP-CAR-MEMBER))
 (108 36 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (79 79 (:REWRITE SUBSETP-MEMBER . 4))
 (79 79 (:REWRITE INTERSECTP-MEMBER . 3))
 (79 79 (:REWRITE INTERSECTP-MEMBER . 2))
 (73 73 (:REWRITE SUBSETP-MEMBER . 2))
 (72 72 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (66 66 (:REWRITE MEMBER-WHEN-ATOM))
 (64 64 (:REWRITE SUBSETP-TRANS2))
 (64 64 (:REWRITE SUBSETP-TRANS))
 (56 8 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (52 52 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (52 52 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 )
(NOT-MEMBER-WHEN-DELETED-FORMAL
 (359 19 (:DEFINITION MEMBER-EQUAL))
 (98 14 (:REWRITE SUBSETP-CAR-MEMBER))
 (66 66 (:REWRITE SUBSETP-TRANS2))
 (66 66 (:REWRITE SUBSETP-TRANS))
 (59 58 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (58 58 (:REWRITE DEFAULT-CAR))
 (57 57 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (44 44 (:REWRITE SUBSETP-MEMBER . 4))
 (44 44 (:REWRITE INTERSECTP-MEMBER . 3))
 (44 44 (:REWRITE INTERSECTP-MEMBER . 2))
 (42 42 (:REWRITE SUBSETP-MEMBER . 2))
 (37 37 (:REWRITE DEFAULT-CDR))
 (31 1 (:REWRITE SUBSETP-OF-CONS))
 (21 3 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 )
(MEMBER-OF-NEW-FORMALS
 (521 486 (:REWRITE DEFAULT-CAR))
 (467 383 (:REWRITE DEFAULT-CDR))
 (392 54 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (315 38 (:REWRITE SUBSETP-CAR-MEMBER))
 (285 285 (:REWRITE SUBSETP-TRANS2))
 (285 285 (:REWRITE SUBSETP-TRANS))
 (259 259 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (259 259 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (191 191 (:REWRITE SUBSETP-MEMBER . 2))
 (175 175 (:REWRITE SUBSETP-MEMBER . 4))
 (175 175 (:REWRITE INTERSECTP-MEMBER . 3))
 (175 175 (:REWRITE INTERSECTP-MEMBER . 2))
 (103 5 (:REWRITE SUBSETP-OF-CONS))
 (78 26 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (52 52 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 )
(SYMBOL-LISTP-OF-SET-DIFF
 (102 6 (:DEFINITION MEMBER-EQUAL))
 (98 14 (:REWRITE SUBSETP-CAR-MEMBER))
 (30 29 (:REWRITE DEFAULT-CAR))
 (19 18 (:REWRITE DEFAULT-CDR))
 (16 16 (:REWRITE SUBSETP-TRANS2))
 (16 16 (:REWRITE SUBSETP-TRANS))
 (14 14 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (14 14 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (14 14 (:REWRITE SUBSETP-MEMBER . 4))
 (14 14 (:REWRITE INTERSECTP-MEMBER . 3))
 (14 14 (:REWRITE INTERSECTP-MEMBER . 2))
 (13 13 (:REWRITE SUBSETP-MEMBER . 2))
 (12 12 (:REWRITE MEMBER-WHEN-ATOM))
 )
(SYMBOL-LISTP-OF-APPEND
 (30 13 (:REWRITE DEFAULT-CDR))
 (21 19 (:REWRITE DEFAULT-CAR))
 (9 3 (:REWRITE CAR-OF-APPEND))
 (6 6 (:REWRITE CONSP-OF-APPEND))
 (5 5 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (3 3 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 )
(PSEUDO-TERM-LISTP-OF-REPEAT
 (210 5 (:DEFINITION TRUE-LISTP))
 (170 10 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (165 5 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (146 35 (:REWRITE PSEUDO-TERMP-OPENER))
 (144 28 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (120 15 (:DEFINITION SYMBOL-LISTP))
 (116 116 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (105 15 (:DEFINITION LEN))
 (105 10 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (91 91 (:REWRITE DEFAULT-CAR))
 (89 89 (:REWRITE DEFAULT-CDR))
 (77 73 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (72 72 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (60 20 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (40 20 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (32 17 (:REWRITE DEFAULT-+-2))
 (30 30 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (17 17 (:REWRITE DEFAULT-+-1))
 (4 4 (:REWRITE ZP-OPEN))
 )
(LEN-OF-REPEAT
 (14 10 (:REWRITE DEFAULT-+-2))
 (10 10 (:REWRITE DEFAULT-+-1))
 (6 5 (:REWRITE DEFAULT-CDR))
 (6 5 (:REWRITE DEFAULT-<-1))
 (5 5 (:REWRITE DEFAULT-<-2))
 (4 4 (:REWRITE ZP-OPEN))
 (1 1 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 )
(UNIFY-EV-LST-OF-APPEND
 (19 19 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (12 9 (:REWRITE DEFAULT-CDR))
 (12 9 (:REWRITE DEFAULT-CAR))
 (8 8 (:REWRITE CONSP-OF-APPEND))
 (7 5 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (5 2 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (3 2 (:REWRITE UNIFY-EV-OF-QUOTE))
 (3 2 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (3 2 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (3 2 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (2 2 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (2 2 (:REWRITE UNIFY-EV-OF-VARIABLE))
 )
(UNIFY-EV-LST-OF-REPEAT
 (6 6 (:REWRITE ZP-OPEN))
 (5 5 (:REWRITE UNIFY-EV-OF-VARIABLE))
 (5 5 (:REWRITE UNIFY-EV-OF-QUOTE))
 (5 5 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (5 5 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (5 5 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (5 5 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (4 4 (:REWRITE DEFAULT-+-2))
 (4 4 (:REWRITE DEFAULT-+-1))
 (2 1 (:REWRITE DEFAULT-CDR))
 (2 1 (:REWRITE DEFAULT-CAR))
 )
(LEN-OF-UNIFY-EV-LST
 (14 7 (:REWRITE DEFAULT-+-2))
 (9 8 (:REWRITE DEFAULT-CDR))
 (7 7 (:REWRITE DEFAULT-+-1))
 (7 5 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (4 1 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (2 2 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (2 1 (:REWRITE UNIFY-EV-OF-QUOTE))
 (2 1 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (2 1 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (2 1 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (1 1 (:REWRITE UNIFY-EV-OF-VARIABLE))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SET-DIFFERENCE-OF-APPEND
 (264 18 (:DEFINITION MEMBER-EQUAL))
 (196 28 (:REWRITE SUBSETP-CAR-MEMBER))
 (150 60 (:REWRITE DEFAULT-CDR))
 (90 81 (:REWRITE DEFAULT-CAR))
 (40 40 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (40 40 (:REWRITE SUBSETP-MEMBER . 4))
 (40 40 (:REWRITE INTERSECTP-MEMBER . 3))
 (40 40 (:REWRITE INTERSECTP-MEMBER . 2))
 (38 38 (:REWRITE SUBSETP-MEMBER . 2))
 (36 36 (:REWRITE MEMBER-WHEN-ATOM))
 (36 12 (:REWRITE CAR-OF-APPEND))
 (32 32 (:REWRITE SUBSETP-TRANS2))
 (32 32 (:REWRITE SUBSETP-TRANS))
 (28 28 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (28 28 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (18 18 (:REWRITE CONSP-OF-APPEND))
 (12 12 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 )
(HONS-ASSOC-EQUAL-OF-PAIRLIS-UNDER-IFF
 (63 63 (:REWRITE DEFAULT-CAR))
 (32 32 (:REWRITE DEFAULT-CDR))
 (24 8 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (21 15 (:REWRITE SUBSETP-MEMBER . 3))
 (16 16 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (15 15 (:REWRITE SUBSETP-MEMBER . 4))
 (15 15 (:REWRITE SUBSETP-MEMBER . 2))
 (15 15 (:REWRITE INTERSECTP-MEMBER . 3))
 (15 15 (:REWRITE INTERSECTP-MEMBER . 2))
 (2 2 (:REWRITE SUBSETP-TRANS2))
 (2 2 (:REWRITE SUBSETP-TRANS))
 (1 1 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (1 1 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 )
(LAMBDA-NEST-TO-BINDINGLIST
 (1205 63 (:REWRITE PSEUDO-TERMP-CAR))
 (1103 21 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (859 11 (:DEFINITION PSEUDO-TERM-LISTP))
 (817 83 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (619 38 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (570 244 (:REWRITE DEFAULT-+-2))
 (496 38 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (493 88 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (458 458 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (362 97 (:REWRITE PSEUDO-TERMP-OPENER))
 (324 244 (:REWRITE DEFAULT-+-1))
 (273 91 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (220 4 (:REWRITE ACL2-COUNT-WHEN-MEMBER))
 (188 10 (:REWRITE SUBSETP-CAR-MEMBER))
 (170 170 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (164 164 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (136 50 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (136 34 (:DEFINITION INTEGER-ABS))
 (136 17 (:DEFINITION LENGTH))
 (134 5 (:DEFINITION MEMBER-EQUAL))
 (112 16 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (92 92 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (57 41 (:REWRITE DEFAULT-<-2))
 (52 52 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (47 1 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (46 41 (:REWRITE DEFAULT-<-1))
 (42 10 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (34 34 (:REWRITE DEFAULT-UNARY-MINUS))
 (33 7 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (32 26 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (26 26 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (26 26 (:REWRITE SUBSETP-TRANS2))
 (26 26 (:REWRITE SUBSETP-TRANS))
 (21 21 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (18 18 (:LINEAR ACL2-COUNT-WHEN-MEMBER))
 (17 17 (:REWRITE DEFAULT-REALPART))
 (17 17 (:REWRITE DEFAULT-NUMERATOR))
 (17 17 (:REWRITE DEFAULT-IMAGPART))
 (17 17 (:REWRITE DEFAULT-DENOMINATOR))
 (17 17 (:REWRITE DEFAULT-COERCE-2))
 (17 17 (:REWRITE DEFAULT-COERCE-1))
 (10 10 (:REWRITE SUBSETP-MEMBER . 2))
 (10 10 (:REWRITE SUBSETP-MEMBER . 1))
 (5 5 (:LINEAR ACL2-COUNT-CAR-CDR-LINEAR))
 (3 2 (:REWRITE MEMBER-WHEN-ATOM))
 (2 2 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (2 2 (:REWRITE SUBSETP-MEMBER . 4))
 (2 2 (:REWRITE SUBSETP-MEMBER . 3))
 (2 2 (:REWRITE INTERSECTP-MEMBER . 3))
 (2 2 (:REWRITE INTERSECTP-MEMBER . 2))
 )
(BINDINGLIST-P-OF-LAMBDA-NEST-TO-BINDINGLIST.BINDINGS
 (5343 252 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (4966 252 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (4747 44 (:DEFINITION PSEUDO-TERM-LISTP))
 (3844 90 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (3293 80 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (2954 173 (:REWRITE PSEUDO-TERMP-CAR))
 (1674 278 (:REWRITE PSEUDO-TERMP-OPENER))
 (1468 153 (:DEFINITION SYMBOL-LISTP))
 (1382 242 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (1342 90 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (1106 1070 (:REWRITE DEFAULT-CAR))
 (1095 1003 (:REWRITE DEFAULT-CDR))
 (807 269 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (436 436 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (435 435 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (356 137 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (318 159 (:REWRITE DEFAULT-+-2))
 (255 255 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (163 159 (:REWRITE DEFAULT-+-1))
 (141 3 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (114 25 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (93 18 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (60 6 (:REWRITE SUBSETP-CAR-MEMBER))
 (54 3 (:DEFINITION MEMBER-EQUAL))
 (33 33 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (24 6 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (24 4 (:DEFINITION BINARY-APPEND))
 (20 8 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (12 12 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (11 11 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (9 6 (:REWRITE MEMBER-WHEN-ATOM))
 (7 2 (:REWRITE CONSP-OF-APPEND))
 (6 6 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (6 6 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (6 6 (:REWRITE SUBSETP-TRANS2))
 (6 6 (:REWRITE SUBSETP-TRANS))
 (6 6 (:REWRITE SUBSETP-MEMBER . 4))
 (6 6 (:REWRITE SUBSETP-MEMBER . 3))
 (6 6 (:REWRITE SUBSETP-MEMBER . 2))
 (6 6 (:REWRITE SUBSETP-MEMBER . 1))
 (6 6 (:REWRITE INTERSECTP-MEMBER . 3))
 (6 6 (:REWRITE INTERSECTP-MEMBER . 2))
 (5 1 (:REWRITE CAR-OF-APPEND))
 (4 1 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 (3 3 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (2 1 (:REWRITE DEFAULT-<-1))
 (1 1 (:REWRITE DEFAULT-<-2))
 )
(PSEUDO-TERMP-OF-LAMBDA-NEST-TO-BINDINGLIST.BODY
 (1888 82 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (1530 226 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (1515 119 (:REWRITE PSEUDO-TERMP-CAR))
 (1366 34 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (1176 135 (:DEFINITION SYMBOL-LISTP))
 (1149 82 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (876 241 (:REWRITE PSEUDO-TERMP-OPENER))
 (819 151 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (756 756 (:REWRITE DEFAULT-CDR))
 (748 748 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (450 450 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (447 447 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (390 130 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (354 5 (:DEFINITION PSEUDO-TERM-LISTP))
 (312 138 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (228 114 (:REWRITE DEFAULT-+-2))
 (215 215 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (114 114 (:REWRITE DEFAULT-+-1))
 (47 1 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (33 9 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (20 2 (:REWRITE SUBSETP-CAR-MEMBER))
 (18 1 (:DEFINITION MEMBER-EQUAL))
 (15 3 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (12 2 (:DEFINITION BINARY-APPEND))
 (10 4 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (8 2 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (7 7 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (5 5 (:TYPE-PRESCRIPTION REPEAT))
 (4 4 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (3 2 (:REWRITE MEMBER-WHEN-ATOM))
 (2 2 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (2 2 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (2 2 (:REWRITE SUBSETP-TRANS2))
 (2 2 (:REWRITE SUBSETP-TRANS))
 (2 2 (:REWRITE SUBSETP-MEMBER . 4))
 (2 2 (:REWRITE SUBSETP-MEMBER . 3))
 (2 2 (:REWRITE SUBSETP-MEMBER . 2))
 (2 2 (:REWRITE SUBSETP-MEMBER . 1))
 (2 2 (:REWRITE INTERSECTP-MEMBER . 3))
 (2 2 (:REWRITE INTERSECTP-MEMBER . 2))
 (1 1 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 )
(PAIRLIS$-OF-APPEND
 (121 48 (:REWRITE DEFAULT-CDR))
 (81 64 (:REWRITE DEFAULT-CAR))
 (30 30 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (24 8 (:REWRITE CAR-OF-APPEND))
 (20 10 (:REWRITE DEFAULT-+-2))
 (12 12 (:REWRITE CONSP-OF-APPEND))
 (10 10 (:REWRITE DEFAULT-+-1))
 (8 8 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 )
(CDR-HONS-ASSOC-EQUAL-OF-PAIRLIS-REPEAT-NIL
 (111 23 (:REWRITE DEFAULT-CDR))
 (75 3 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (66 3 (:REWRITE HONS-ASSOC-EQUAL-OF-PAIRLIS-UNDER-IFF))
 (60 4 (:DEFINITION HONS-ASSOC-EQUAL))
 (39 3 (:DEFINITION MEMBER-EQUAL))
 (33 26 (:REWRITE DEFAULT-CAR))
 (24 3 (:REWRITE ZP-OPEN))
 (20 20 (:TYPE-PRESCRIPTION PAIRLIS$))
 (18 18 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (14 14 (:TYPE-PRESCRIPTION REPEAT))
 (13 8 (:REWRITE DEFAULT-+-2))
 (12 4 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (8 8 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (8 8 (:REWRITE DEFAULT-+-1))
 (6 6 (:REWRITE SUBSETP-MEMBER . 4))
 (6 6 (:REWRITE SUBSETP-MEMBER . 3))
 (6 6 (:REWRITE SUBSETP-MEMBER . 2))
 (6 6 (:REWRITE SUBSETP-MEMBER . 1))
 (6 6 (:REWRITE MEMBER-WHEN-ATOM))
 (6 6 (:REWRITE INTERSECTP-MEMBER . 3))
 (6 6 (:REWRITE INTERSECTP-MEMBER . 2))
 (6 3 (:REWRITE DEFAULT-<-2))
 (4 4 (:DEFINITION HONS-EQUAL))
 (3 3 (:REWRITE DEFAULT-<-1))
 )
(HONS-ASSOC-EQUAL-OF-PAIRLIS$-UNIFY-EV-LST
 (885 59 (:DEFINITION HONS-ASSOC-EQUAL))
 (478 21 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (339 177 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (280 280 (:TYPE-PRESCRIPTION PAIRLIS$))
 (254 114 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (245 35 (:REWRITE SUBSETP-CAR-MEMBER))
 (191 68 (:REWRITE SUBSETP-MEMBER . 1))
 (143 44 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (140 140 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (121 44 (:REWRITE UNIFY-EV-OF-QUOTE))
 (121 44 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (121 44 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (121 44 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (105 105 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (74 68 (:REWRITE SUBSETP-MEMBER . 3))
 (68 68 (:REWRITE SUBSETP-MEMBER . 4))
 (68 68 (:REWRITE SUBSETP-MEMBER . 2))
 (68 68 (:REWRITE INTERSECTP-MEMBER . 3))
 (68 68 (:REWRITE INTERSECTP-MEMBER . 2))
 (63 9 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (60 60 (:REWRITE SUBSETP-TRANS2))
 (60 60 (:REWRITE SUBSETP-TRANS))
 (59 59 (:DEFINITION HONS-EQUAL))
 (45 45 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (45 45 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (15 15 (:REWRITE SUBSETP-REFL))
 )
(INTERSECTP-WHEN-MEMBER-BOTH
 (1 1 (:REWRITE INTERSECTP-MEMBER . 3))
 )
(FLAG-LEMMA-FOR-UNIFY-EV-OF-LAMBDA-NEST-FIXUP
 (2055 130 (:REWRITE INTERSECTP-MEMBER . 3))
 (2011 112 (:DEFINITION MEMBER-EQUAL))
 (1342 243 (:REWRITE SUBSETP-MEMBER . 2))
 (1088 13 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (1061 149 (:REWRITE SUBSETP-CAR-MEMBER))
 (1060 636 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (989 97 (:DEFINITION PAIRLIS$))
 (836 580 (:REWRITE DEFAULT-CAR))
 (714 243 (:REWRITE SUBSETP-MEMBER . 1))
 (466 286 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (416 64 (:DEFINITION BINARY-APPEND))
 (382 286 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (320 128 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (305 305 (:REWRITE SUBSETP-TRANS))
 (220 220 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (212 212 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (168 168 (:TYPE-PRESCRIPTION REPEAT))
 (143 14 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (140 28 (:DEFINITION LEN))
 (128 128 (:REWRITE SUBSETP-MEMBER . 4))
 (113 74 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (112 112 (:REWRITE MEMBER-WHEN-ATOM))
 (108 42 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (69 33 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (66 66 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (64 16 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (56 28 (:REWRITE DEFAULT-+-2))
 (53 35 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (49 35 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (48 48 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (33 33 (:REWRITE INTERSECTP-MEMBER . 1))
 (28 28 (:TYPE-PRESCRIPTION LEN))
 (28 28 (:REWRITE DEFAULT-+-1))
 (17 17 (:TYPE-PRESCRIPTION KWOTE-LST))
 (12 2 (:DEFINITION KWOTE-LST))
 (2 2 (:DEFINITION KWOTE))
 )
(UNIFY-EV-OF-LAMBDA-NEST-FIXUP)
(UNIFY-EV-LST-OF-LAMBDA-NEST-FIXUP)
(INTERSECTP-OF-NIL
 (1 1 (:REWRITE INTERSECTP-WHEN-MEMBER-BOTH))
 (1 1 (:REWRITE INTERSECTP-MEMBER . 1))
 )
(INTERSECTP-OF-CONS
 (388 47 (:REWRITE SUBSETP-CAR-MEMBER))
 (142 52 (:REWRITE INTERSECTP-MEMBER . 3))
 (77 3 (:REWRITE SUBSETP-OF-CONS))
 (75 75 (:REWRITE SUBSETP-TRANS2))
 (75 75 (:REWRITE SUBSETP-TRANS))
 (61 61 (:REWRITE SUBSETP-MEMBER . 2))
 (60 60 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (60 60 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (49 49 (:REWRITE SUBSETP-MEMBER . 4))
 (47 47 (:REWRITE DEFAULT-CAR))
 (33 33 (:REWRITE DEFAULT-CDR))
 (31 31 (:REWRITE INTERSECTP-WHEN-MEMBER-BOTH))
 (31 31 (:REWRITE INTERSECTP-MEMBER . 1))
 (14 2 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 )
(NOT-INTERSECTP-OF-SET-DIFF
 (418 5 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (343 17 (:DEFINITION MEMBER-EQUAL))
 (76 61 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (68 68 (:REWRITE SUBSETP-TRANS2))
 (68 68 (:REWRITE SUBSETP-TRANS))
 (61 61 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (49 7 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (41 41 (:REWRITE SUBSETP-MEMBER . 2))
 (33 32 (:REWRITE DEFAULT-CAR))
 (30 30 (:REWRITE SUBSETP-MEMBER . 4))
 (30 30 (:REWRITE INTERSECTP-MEMBER . 2))
 (28 27 (:REWRITE DEFAULT-CDR))
 (24 24 (:REWRITE MEMBER-WHEN-ATOM))
 (12 12 (:REWRITE INTERSECTP-WHEN-MEMBER-BOTH))
 (12 12 (:REWRITE INTERSECTP-MEMBER . 1))
 )
(LAMBDA-NEST-TO-BINDINGLIST-CORRECT-IND
 (476 197 (:REWRITE DEFAULT-+-2))
 (277 197 (:REWRITE DEFAULT-+-1))
 (220 4 (:REWRITE ACL2-COUNT-WHEN-MEMBER))
 (168 8 (:REWRITE SUBSETP-CAR-MEMBER))
 (136 34 (:DEFINITION INTEGER-ABS))
 (136 17 (:DEFINITION LENGTH))
 (116 4 (:DEFINITION MEMBER-EQUAL))
 (112 16 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (85 17 (:DEFINITION LEN))
 (57 41 (:REWRITE DEFAULT-<-2))
 (48 48 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (48 8 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (46 41 (:REWRITE DEFAULT-<-1))
 (34 34 (:REWRITE DEFAULT-UNARY-MINUS))
 (32 32 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (24 24 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (24 24 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (24 24 (:REWRITE SUBSETP-TRANS2))
 (24 24 (:REWRITE SUBSETP-TRANS))
 (24 8 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (20 20 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (18 18 (:LINEAR ACL2-COUNT-WHEN-MEMBER))
 (17 17 (:REWRITE DEFAULT-REALPART))
 (17 17 (:REWRITE DEFAULT-NUMERATOR))
 (17 17 (:REWRITE DEFAULT-IMAGPART))
 (17 17 (:REWRITE DEFAULT-DENOMINATOR))
 (17 17 (:REWRITE DEFAULT-COERCE-2))
 (17 17 (:REWRITE DEFAULT-COERCE-1))
 (8 8 (:REWRITE SUBSETP-MEMBER . 2))
 (8 8 (:REWRITE SUBSETP-MEMBER . 1))
 (5 5 (:LINEAR ACL2-COUNT-CAR-CDR-LINEAR))
 )
(LAMBDA-NEST-TO-BINDINGLIST-CORRECT
 (5087 233 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (5079 725 (:REWRITE DEFAULT-CAR))
 (4798 2 (:REWRITE BINDINGLIST-P-OF-LAMBDA-NEST-TO-BINDINGLIST.BINDINGS))
 (3786 20 (:DEFINITION PSEUDO-TERMP))
 (3606 22 (:DEFINITION PSEUDO-TERM-LISTP))
 (3168 46 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (3150 68 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (3112 68 (:REWRITE PSEUDO-TERMP-CAR))
 (1192 68 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (940 20 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (852 704 (:REWRITE DEFAULT-CDR))
 (830 830 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (762 82 (:DEFINITION SYMBOL-LISTP))
 (720 52 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (650 86 (:DEFINITION LEN))
 (638 26 (:DEFINITION TRUE-LISTP))
 (570 190 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (534 2 (:REWRITE UNIFY-EV-LST-OF-LAMBDA-NEST-FIXUP))
 (464 464 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (454 88 (:REWRITE PSEUDO-TERMP-OPENER))
 (400 40 (:REWRITE SUBSETP-CAR-MEMBER))
 (386 386 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (376 5 (:REWRITE ALIST-FIX-WHEN-ALISTP))
 (360 20 (:DEFINITION MEMBER-EQUAL))
 (341 9 (:DEFINITION ALISTP))
 (290 290 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (196 98 (:REWRITE DEFAULT-+-2))
 (184 30 (:DEFINITION BINARY-APPEND))
 (170 44 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (158 52 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (144 60 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (134 10 (:DEFINITION PAIRLIS$))
 (124 32 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (118 4 (:REWRITE ALISTP-OF-APPEND))
 (112 112 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (112 112 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (98 98 (:REWRITE DEFAULT-+-1))
 (98 70 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (88 88 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (87 87 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (78 14 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (75 75 (:TYPE-PRESCRIPTION REPEAT))
 (72 12 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (60 40 (:REWRITE MEMBER-WHEN-ATOM))
 (58 12 (:REWRITE CONSP-OF-APPEND))
 (50 44 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (49 49 (:TYPE-PRESCRIPTION ALISTP))
 (45 45 (:REWRITE SUBSETP-TRANS2))
 (45 45 (:REWRITE SUBSETP-TRANS))
 (42 42 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-UNIFY-EV-LST))
 (40 40 (:REWRITE SUBSETP-MEMBER . 4))
 (40 40 (:REWRITE SUBSETP-MEMBER . 3))
 (40 40 (:REWRITE SUBSETP-MEMBER . 2))
 (40 40 (:REWRITE SUBSETP-MEMBER . 1))
 (40 40 (:REWRITE INTERSECTP-MEMBER . 3))
 (40 40 (:REWRITE INTERSECTP-MEMBER . 2))
 (37 5 (:REWRITE ALIST-FIX-OF-ATOM))
 (32 32 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (31 13 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (28 6 (:REWRITE CAR-OF-APPEND))
 (20 20 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (16 4 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 (15 13 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (15 13 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (10 10 (:REWRITE UNIFY-EV-OF-VARIABLE))
 (8 8 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (8 2 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (7 7 (:REWRITE UNIFY-EV-LST-OF-CONS))
 (7 7 (:REWRITE UNIFY-EV-LST-OF-ATOM))
 (4 4 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (4 4 (:REWRITE ALISTP-OF-PAIRLIS$))
 (4 2 (:REWRITE DEFAULT-<-1))
 (3 3 (:TYPE-PRESCRIPTION LAMBDA-NEST-TO-BINDINGLIST-CORRECT-IND))
 (2 2 (:REWRITE DEFAULT-<-2))
 )
(SYMBOL-LISTP-OF-UNION
 (102 6 (:DEFINITION MEMBER-EQUAL))
 (98 14 (:REWRITE SUBSETP-CAR-MEMBER))
 (36 35 (:REWRITE DEFAULT-CAR))
 (25 24 (:REWRITE DEFAULT-CDR))
 (16 16 (:REWRITE SUBSETP-TRANS2))
 (16 16 (:REWRITE SUBSETP-TRANS))
 (14 14 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (14 14 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (14 14 (:REWRITE SUBSETP-MEMBER . 4))
 (14 14 (:REWRITE INTERSECTP-MEMBER . 3))
 (14 14 (:REWRITE INTERSECTP-MEMBER . 2))
 (13 13 (:REWRITE SUBSETP-MEMBER . 2))
 (12 12 (:REWRITE MEMBER-WHEN-ATOM))
 )
(BINDINGLIST-FREE-VARS)
(SYMBOL-LISTP-OF-BINDINGLIST-FREE-VARS
 (116 1 (:DEFINITION UNION-EQUAL))
 (91 1 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (61 3 (:DEFINITION MEMBER-EQUAL))
 (60 7 (:REWRITE SUBSETP-CAR-MEMBER))
 (42 1 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (35 7 (:DEFINITION SYMBOL-LISTP))
 (23 7 (:REWRITE SUBSETP-MEMBER . 1))
 (22 19 (:REWRITE DEFAULT-CAR))
 (20 9 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (20 1 (:REWRITE TAKE-OF-LEN-FREE))
 (19 18 (:REWRITE DEFAULT-CDR))
 (18 18 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (17 9 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (13 13 (:TYPE-PRESCRIPTION LEN))
 (13 9 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (13 2 (:DEFINITION LEN))
 (10 10 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (10 6 (:REWRITE MEMBER-WHEN-ATOM))
 (9 9 (:REWRITE SUBSETP-TRANS2))
 (9 9 (:REWRITE SUBSETP-TRANS))
 (7 7 (:REWRITE SUBSETP-MEMBER . 4))
 (7 7 (:REWRITE SUBSETP-MEMBER . 3))
 (7 7 (:REWRITE SUBSETP-MEMBER . 2))
 (7 7 (:REWRITE INTERSECTP-MEMBER . 3))
 (7 7 (:REWRITE INTERSECTP-MEMBER . 2))
 (5 5 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (4 2 (:REWRITE DEFAULT-+-2))
 (3 3 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (3 1 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (2 2 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (2 2 (:REWRITE DEFAULT-+-1))
 (2 1 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (1 1 (:TYPE-PRESCRIPTION TAKE))
 )
(BINDINGLIST-FREE-VARS
 (848 4 (:DEFINITION BINDINGLIST-FREE-VARS))
 (732 6 (:DEFINITION UNION-EQUAL))
 (582 6 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (402 19 (:DEFINITION MEMBER-EQUAL))
 (383 44 (:REWRITE SUBSETP-CAR-MEMBER))
 (308 7 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (152 44 (:REWRITE SUBSETP-MEMBER . 1))
 (131 56 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (112 112 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (108 93 (:REWRITE DEFAULT-CAR))
 (92 56 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (87 73 (:REWRITE DEFAULT-CDR))
 (80 10 (:DEFINITION LEN))
 (69 38 (:REWRITE MEMBER-WHEN-ATOM))
 (68 2 (:DEFINITION PSEUDO-TERM-LISTP))
 (56 56 (:REWRITE SUBSETP-TRANS2))
 (56 56 (:REWRITE SUBSETP-TRANS))
 (44 44 (:REWRITE SUBSETP-MEMBER . 4))
 (44 44 (:REWRITE SUBSETP-MEMBER . 3))
 (44 44 (:REWRITE SUBSETP-MEMBER . 2))
 (44 44 (:REWRITE INTERSECTP-MEMBER . 3))
 (44 44 (:REWRITE INTERSECTP-MEMBER . 2))
 (31 31 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (20 10 (:REWRITE DEFAULT-+-2))
 (20 2 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (12 12 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (12 4 (:REWRITE PSEUDO-TERMP-OPENER))
 (10 10 (:REWRITE DEFAULT-+-1))
 (10 3 (:REWRITE PSEUDO-TERMP-CAR))
 (6 6 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (6 5 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (5 5 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (4 4 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (4 2 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 )
(NIL-NOT-MEMBER-OF-BINDINGLIST-FREE-VARS
 (132 3 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (99 6 (:DEFINITION MEMBER-EQUAL))
 (60 3 (:REWRITE TAKE-OF-LEN-FREE))
 (51 6 (:REWRITE SUBSETP-CAR-MEMBER))
 (39 39 (:TYPE-PRESCRIPTION LEN))
 (39 30 (:REWRITE DEFAULT-CAR))
 (39 6 (:DEFINITION LEN))
 (36 18 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (36 15 (:REWRITE SUBSETP-MEMBER . 1))
 (34 13 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (33 1 (:REWRITE SUBSETP-APPEND1))
 (30 3 (:DEFINITION BINARY-APPEND))
 (29 26 (:REWRITE DEFAULT-CDR))
 (28 13 (:REWRITE MEMBER-WHEN-ATOM))
 (25 14 (:REWRITE SUBSETP-TRANS2))
 (25 13 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (24 24 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (24 24 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (24 6 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (21 21 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (16 16 (:REWRITE SUBSETP-MEMBER . 4))
 (16 16 (:REWRITE INTERSECTP-MEMBER . 3))
 (16 16 (:REWRITE INTERSECTP-MEMBER . 2))
 (15 15 (:REWRITE SUBSETP-MEMBER . 2))
 (15 6 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (14 14 (:REWRITE SUBSETP-TRANS))
 (12 6 (:REWRITE DEFAULT-+-2))
 (9 3 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (6 6 (:REWRITE DEFAULT-+-1))
 (6 3 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (3 3 (:TYPE-PRESCRIPTION TAKE))
 )
(TRUE-LISTP-OF-UNION
 (3927 50 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (2294 82 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (2219 17 (:DEFINITION PSEUDO-TERMP))
 (1674 45 (:DEFINITION PSEUDO-TERM-LISTP))
 (657 1 (:REWRITE PSEUDO-TERM-LISTP-OF-CONS))
 (632 82 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (624 74 (:DEFINITION SYMBOL-LISTP))
 (605 120 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (591 50 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (542 542 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (540 129 (:REWRITE PSEUDO-TERMP-OPENER))
 (526 68 (:REWRITE PSEUDO-TERMP-CAR))
 (418 418 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (402 401 (:REWRITE DEFAULT-CAR))
 (401 401 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (370 370 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (357 51 (:DEFINITION LEN))
 (353 351 (:REWRITE DEFAULT-CDR))
 (306 306 (:TYPE-PRESCRIPTION LEN))
 (249 83 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (233 233 (:TYPE-PRESCRIPTION UNION-EQUAL))
 (156 149 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (151 32 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (149 149 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (128 128 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (102 51 (:REWRITE DEFAULT-+-2))
 (70 10 (:REWRITE SUBSETP-CAR-MEMBER))
 (68 4 (:DEFINITION MEMBER-EQUAL))
 (67 8 (:REWRITE SYMBOL-LISTP-OF-UNION))
 (51 51 (:REWRITE DEFAULT-+-1))
 (14 6 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (12 12 (:REWRITE SUBSETP-TRANS2))
 (12 12 (:REWRITE SUBSETP-TRANS))
 (10 10 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (10 10 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (10 10 (:REWRITE SUBSETP-MEMBER . 4))
 (10 10 (:REWRITE INTERSECTP-MEMBER . 3))
 (10 10 (:REWRITE INTERSECTP-MEMBER . 2))
 (9 9 (:REWRITE SUBSETP-MEMBER . 2))
 (8 8 (:REWRITE MEMBER-WHEN-ATOM))
 (6 2 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (6 2 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (1 1 (:REWRITE CAR-CONS))
 )
(BINDINGLIST-BOUND-VARS)
(SYMBOL-LISTP-OF-BINDINGLIST-BOUND-VARS
 (45 9 (:DEFINITION SYMBOL-LISTP))
 (44 1 (:DEFINITION UNION-EQUAL))
 (17 1 (:DEFINITION MEMBER-EQUAL))
 (16 2 (:REWRITE SUBSETP-CAR-MEMBER))
 (15 14 (:REWRITE DEFAULT-CAR))
 (14 14 (:REWRITE DEFAULT-CDR))
 (4 4 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (4 2 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (4 2 (:REWRITE MEMBER-WHEN-ATOM))
 (4 2 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (2 2 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (2 2 (:REWRITE SUBSETP-TRANS2))
 (2 2 (:REWRITE SUBSETP-TRANS))
 (2 2 (:REWRITE SUBSETP-MEMBER . 4))
 (2 2 (:REWRITE SUBSETP-MEMBER . 3))
 (2 2 (:REWRITE SUBSETP-MEMBER . 2))
 (2 2 (:REWRITE SUBSETP-MEMBER . 1))
 (2 2 (:REWRITE INTERSECTP-MEMBER . 3))
 (2 2 (:REWRITE INTERSECTP-MEMBER . 2))
 (1 1 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 )
(TRUE-LISTP-OF-BINDINGLIST-BOUND-VARS
 (711 9 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (645 3 (:DEFINITION TRUE-LISTP))
 (450 15 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (369 3 (:DEFINITION PSEUDO-TERMP))
 (276 9 (:DEFINITION PSEUDO-TERM-LISTP))
 (140 3 (:DEFINITION UNION-EQUAL))
 (126 27 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (126 15 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (108 9 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (105 12 (:DEFINITION SYMBOL-LISTP))
 (99 99 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (99 24 (:REWRITE PSEUDO-TERMP-OPENER))
 (93 84 (:REWRITE DEFAULT-CAR))
 (92 92 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (75 75 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (71 71 (:REWRITE DEFAULT-CDR))
 (63 9 (:DEFINITION LEN))
 (60 60 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (55 3 (:DEFINITION MEMBER-EQUAL))
 (54 54 (:TYPE-PRESCRIPTION LEN))
 (50 6 (:REWRITE SUBSETP-CAR-MEMBER))
 (48 16 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (30 27 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (27 27 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (24 24 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (24 12 (:REWRITE PSEUDO-TERMP-CAR))
 (24 6 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (18 9 (:REWRITE DEFAULT-+-2))
 (14 6 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (14 6 (:REWRITE MEMBER-WHEN-ATOM))
 (12 12 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (12 3 (:REWRITE SYMBOL-LISTP-OF-BINDINGLIST-BOUND-VARS))
 (9 9 (:REWRITE DEFAULT-+-1))
 (6 6 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (6 6 (:REWRITE SUBSETP-TRANS2))
 (6 6 (:REWRITE SUBSETP-TRANS))
 (6 6 (:REWRITE SUBSETP-MEMBER . 4))
 (6 6 (:REWRITE SUBSETP-MEMBER . 3))
 (6 6 (:REWRITE SUBSETP-MEMBER . 2))
 (6 6 (:REWRITE SUBSETP-MEMBER . 1))
 (6 6 (:REWRITE INTERSECTP-MEMBER . 3))
 (6 6 (:REWRITE INTERSECTP-MEMBER . 2))
 (3 3 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 )
(BINDINGLIST-BOUND-VARS
 (55 1 (:DEFINITION BINDINGLIST-BOUND-VARS))
 (48 1 (:DEFINITION UNION-EQUAL))
 (44 1 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (39 1 (:DEFINITION PSEUDO-TERM-LISTP))
 (19 1 (:DEFINITION MEMBER-EQUAL))
 (17 2 (:REWRITE SUBSETP-CAR-MEMBER))
 (14 10 (:REWRITE DEFAULT-CAR))
 (13 1 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (10 10 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (8 2 (:REWRITE PSEUDO-TERMP-CAR))
 (7 7 (:REWRITE DEFAULT-CDR))
 (6 6 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (6 2 (:REWRITE PSEUDO-TERMP-OPENER))
 (5 2 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (5 2 (:REWRITE MEMBER-WHEN-ATOM))
 (4 4 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (3 3 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (3 3 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (3 1 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (2 2 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (2 2 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (2 2 (:REWRITE SUBSETP-TRANS2))
 (2 2 (:REWRITE SUBSETP-TRANS))
 (2 2 (:REWRITE SUBSETP-MEMBER . 4))
 (2 2 (:REWRITE SUBSETP-MEMBER . 3))
 (2 2 (:REWRITE SUBSETP-MEMBER . 2))
 (2 2 (:REWRITE SUBSETP-MEMBER . 1))
 (2 2 (:REWRITE INTERSECTP-MEMBER . 3))
 (2 2 (:REWRITE INTERSECTP-MEMBER . 2))
 (2 1 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (1 1 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 )
(UNIFY-EV-WHEN-EVAL-ALISTS-AGREE
 (82 30 (:REWRITE DEFAULT-CDR))
 (62 4 (:DEFINITION HONS-ASSOC-EQUAL))
 (56 46 (:REWRITE DEFAULT-CAR))
 (51 21 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (46 2 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (32 2 (:DEFINITION PAIRLIS$))
 (28 10 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (26 26 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (20 20 (:TYPE-PRESCRIPTION HONS-ASSOC-EQUAL))
 (18 10 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (14 10 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (12 12 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (12 2 (:DEFINITION KWOTE-LST))
 (10 4 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (6 6 (:REWRITE UNIFY-EV-LST-OF-ATOM))
 (4 4 (:REWRITE CAR-CONS))
 (4 4 (:DEFINITION HONS-EQUAL))
 (2 2 (:DEFINITION KWOTE))
 )
(UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE)
(UNIFY-EV-BINDINGLIST-WHEN-ALISTS-AGREE-ON-FREE-VARS-IND
 (12 6 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (6 6 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (6 6 (:TYPE-PRESCRIPTION BINARY-APPEND))
 )
(MEMBER-UNION
 (66 4 (:DEFINITION MEMBER-EQUAL))
 (14 2 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (11 11 (:REWRITE SUBSETP-MEMBER . 4))
 (11 11 (:REWRITE INTERSECTP-MEMBER . 3))
 (11 11 (:REWRITE INTERSECTP-MEMBER . 2))
 (9 9 (:REWRITE SUBSETP-TRANS2))
 (9 9 (:REWRITE SUBSETP-TRANS))
 (9 9 (:REWRITE SUBSETP-MEMBER . 2))
 (9 9 (:REWRITE SUBSETP-MEMBER . 1))
 (8 8 (:REWRITE MEMBER-WHEN-ATOM))
 (7 7 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (7 7 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (5 5 (:REWRITE DEFAULT-CDR))
 (5 5 (:REWRITE DEFAULT-CAR))
 (5 1 (:DEFINITION BINARY-APPEND))
 (2 2 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (2 2 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 )
(EVAL-ALISTS-AGREE-OF-UNION
 (2906 192 (:DEFINITION HONS-ASSOC-EQUAL))
 (2533 643 (:REWRITE DEFAULT-CDR))
 (1886 82 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (1368 79 (:DEFINITION MEMBER-EQUAL))
 (996 991 (:REWRITE DEFAULT-CAR))
 (576 576 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (576 192 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (459 63 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (415 293 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (384 384 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (315 315 (:REWRITE SUBSETP-TRANS2))
 (315 315 (:REWRITE SUBSETP-TRANS))
 (192 192 (:DEFINITION HONS-EQUAL))
 (188 188 (:TYPE-PRESCRIPTION UNION-EQUAL))
 (160 160 (:REWRITE SUBSETP-MEMBER . 2))
 (160 160 (:REWRITE SUBSETP-MEMBER . 1))
 (112 3 (:REWRITE SUBSETP-OF-CONS))
 (48 48 (:REWRITE SUBSETP-MEMBER . 4))
 (48 48 (:REWRITE SUBSETP-MEMBER . 3))
 (48 48 (:REWRITE MEMBER-WHEN-ATOM))
 (48 48 (:REWRITE INTERSECTP-MEMBER . 3))
 (48 48 (:REWRITE INTERSECTP-MEMBER . 2))
 )
(SET-DIFFERENCE-NIL
 (834 12 (:REWRITE TRUE-LISTP-WHEN-PSEUDO-TERM-LISTP))
 (545 8 (:DEFINITION PSEUDO-TERM-LISTP))
 (525 4 (:DEFINITION PSEUDO-TERMP))
 (457 15 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (139 28 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (135 17 (:DEFINITION SYMBOL-LISTP))
 (124 12 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (109 25 (:REWRITE PSEUDO-TERMP-OPENER))
 (98 98 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (98 98 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (94 94 (:REWRITE DEFAULT-CAR))
 (94 15 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (84 12 (:DEFINITION LEN))
 (81 81 (:REWRITE DEFAULT-CDR))
 (78 78 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (78 78 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (72 72 (:TYPE-PRESCRIPTION LEN))
 (57 19 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (28 14 (:REWRITE PSEUDO-TERMP-CAR))
 (25 25 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (25 25 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (25 5 (:REWRITE SUBSETP-CAR-MEMBER))
 (24 24 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (24 12 (:REWRITE DEFAULT-+-2))
 (22 7 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (12 12 (:REWRITE DEFAULT-+-1))
 (5 5 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (5 5 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (5 5 (:REWRITE SUBSETP-TRANS2))
 (5 5 (:REWRITE SUBSETP-TRANS))
 (5 5 (:REWRITE SUBSETP-MEMBER . 4))
 (5 5 (:REWRITE SUBSETP-MEMBER . 3))
 (5 5 (:REWRITE SUBSETP-MEMBER . 2))
 (5 5 (:REWRITE SUBSETP-MEMBER . 1))
 (5 5 (:REWRITE INTERSECTP-MEMBER . 3))
 (5 5 (:REWRITE INTERSECTP-MEMBER . 2))
 (3 1 (:REWRITE SYMBOL-LISTP-CAAR-OF-BINDINGLIST))
 (3 1 (:REWRITE PSEUDO-TERM-LISTP-CDAR-OF-BINDINGLIST))
 (3 1 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 )
(PAIRLIS-OF-UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE-OF-TAKE
 (488 11 (:DEFINITION UNION-EQUAL))
 (480 24 (:REWRITE UNION-EQUAL-UNDER-SET-EQUIV))
 (456 24 (:REWRITE COMMUTATIVITY-OF-APPEND-UNDER-SET-EQUIV))
 (348 23 (:REWRITE TAKE-OF-LEN-FREE))
 (300 30 (:DEFINITION BINARY-APPEND))
 (287 287 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (287 287 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (240 60 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (190 10 (:DEFINITION MEMBER-EQUAL))
 (175 21 (:REWRITE SUBSETP-CAR-MEMBER))
 (160 50 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (150 60 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (128 16 (:REWRITE ZP-OPEN))
 (126 14 (:REWRITE CONSP-OF-TAKE))
 (123 48 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (100 100 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-UNIFY-EV-LST))
 (97 53 (:REWRITE DEFAULT-+-2))
 (66 55 (:REWRITE SUBSETP-TRANS2))
 (55 55 (:REWRITE SUBSETP-TRANS))
 (53 53 (:REWRITE DEFAULT-+-1))
 (53 30 (:REWRITE DEFAULT-<-2))
 (51 21 (:REWRITE MEMBER-WHEN-ATOM))
 (48 2 (:REWRITE SUBSETP-APPEND1))
 (41 7 (:REWRITE CAR-OF-TAKE))
 (30 30 (:REWRITE DEFAULT-<-1))
 (21 21 (:REWRITE SUBSETP-MEMBER . 4))
 (21 21 (:REWRITE SUBSETP-MEMBER . 3))
 (21 21 (:REWRITE SUBSETP-MEMBER . 2))
 (21 21 (:REWRITE SUBSETP-MEMBER . 1))
 (21 21 (:REWRITE INTERSECTP-MEMBER . 3))
 (21 21 (:REWRITE INTERSECTP-MEMBER . 2))
 (21 7 (:DEFINITION NFIX))
 (18 6 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (10 10 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (7 7 (:TYPE-PRESCRIPTION NFIX))
 (6 6 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (4 4 (:REWRITE UNIFY-EV-OF-VARIABLE))
 (4 4 (:REWRITE UNIFY-EV-OF-QUOTE))
 (4 4 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (4 4 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (4 4 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (4 4 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (4 1 (:DEFINITION ATOM))
 )
(UNIFY-EV-BINDINGLIST-WHEN-EVAL-ALISTS-AGREE-ON-FREE-VARS
 (2575 40 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (2440 20 (:DEFINITION UNION-EQUAL))
 (2214 101 (:DEFINITION MEMBER-EQUAL))
 (1952 201 (:REWRITE SUBSETP-CAR-MEMBER))
 (1605 951 (:REWRITE DEFAULT-CAR))
 (1437 556 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (1380 799 (:REWRITE DEFAULT-CDR))
 (1211 400 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (1050 20 (:REWRITE ALIST-FIX-WHEN-ALISTP))
 (1004 72 (:DEFINITION PAIRLIS$))
 (900 38 (:DEFINITION ALISTP))
 (882 882 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (707 400 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (702 99 (:DEFINITION BINARY-APPEND))
 (614 614 (:TYPE-PRESCRIPTION PAIRLIS$))
 (515 25 (:REWRITE TAKE-OF-LEN-FREE))
 (433 411 (:REWRITE SUBSETP-TRANS2))
 (432 432 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-UNIFY-EV-LST))
 (427 84 (:REWRITE UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE))
 (411 411 (:REWRITE SUBSETP-TRANS))
 (405 198 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (388 388 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-BINDINGLIST-BOUND-VARS))
 (386 200 (:REWRITE MEMBER-WHEN-ATOM))
 (373 373 (:TYPE-PRESCRIPTION BINDINGLIST-FREE-VARS))
 (325 325 (:TYPE-PRESCRIPTION LEN))
 (325 50 (:DEFINITION LEN))
 (306 108 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (254 254 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (252 18 (:REWRITE ALISTP-OF-APPEND))
 (237 237 (:REWRITE SUBSETP-MEMBER . 2))
 (234 234 (:REWRITE SUBSETP-MEMBER . 4))
 (234 234 (:REWRITE INTERSECTP-MEMBER . 3))
 (234 234 (:REWRITE INTERSECTP-MEMBER . 2))
 (226 16 (:DEFINITION HONS-ASSOC-EQUAL))
 (216 54 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (208 208 (:TYPE-PRESCRIPTION ALISTP))
 (206 10 (:REWRITE SUBSETP-OF-APPEND-WHEN-SUBSET-OF-EITHER))
 (189 45 (:REWRITE CONSP-OF-APPEND))
 (169 169 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (162 64 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (130 13 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (108 108 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (108 108 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (100 50 (:REWRITE DEFAULT-+-2))
 (92 20 (:REWRITE ALIST-FIX-OF-ATOM))
 (90 25 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (90 18 (:REWRITE CAR-OF-APPEND))
 (84 84 (:REWRITE UNIFY-EV-LST-OF-CONS))
 (84 84 (:REWRITE UNIFY-EV-LST-OF-ATOM))
 (81 56 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (77 3 (:REWRITE SUBSETP-APPEND1))
 (72 18 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 (60 48 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (50 50 (:REWRITE DEFAULT-+-1))
 (46 2 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (25 25 (:TYPE-PRESCRIPTION TAKE))
 (20 20 (:REWRITE UNIFY-EV-OF-VARIABLE))
 (20 20 (:REWRITE UNIFY-EV-OF-QUOTE))
 (20 20 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (20 20 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (20 20 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (20 20 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (18 18 (:REWRITE ALISTP-OF-PAIRLIS$))
 (16 16 (:DEFINITION HONS-EQUAL))
 (2 2 (:REWRITE EVAL-ALISTS-AGREE-BAD-GUY-MEMBER-WHEN-NONNIL))
 (2 2 (:REWRITE EVAL-ALISTS-AGREE-BAD-GUY-MEMBER-WHEN-BAD-KEY))
 )
(PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP
 (121 13 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (48 7 (:REWRITE PSEUDO-TERMP-CAR))
 (47 13 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (39 14 (:REWRITE PSEUDO-TERMP-OPENER))
 (24 24 (:REWRITE DEFAULT-CAR))
 (23 23 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (23 23 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (18 4 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (16 16 (:REWRITE DEFAULT-CDR))
 (14 14 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (12 12 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (6 2 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (2 2 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 )
(SET-EQUIV-IMPLIES-EQUAL-EVAL-ALISTS-AGREE-1
 (3 3 (:REWRITE SUBSETP-TRANS2))
 (3 3 (:REWRITE SUBSETP-TRANS))
 )
(EVAL-ALISTS-AGREE-OF-APPEND
 (1178 76 (:DEFINITION HONS-ASSOC-EQUAL))
 (1128 213 (:REWRITE DEFAULT-CDR))
 (874 38 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (455 9 (:REWRITE SUBSETP-OF-CONS))
 (384 366 (:REWRITE DEFAULT-CAR))
 (257 39 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (228 228 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (228 76 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (223 153 (:REWRITE SUBSETP-TRANS2))
 (153 153 (:REWRITE SUBSETP-TRANS))
 (152 152 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (149 113 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (135 18 (:REWRITE SUBSETP-CAR-MEMBER))
 (120 113 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (105 7 (:DEFINITION MEMBER-EQUAL))
 (80 40 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (76 76 (:DEFINITION HONS-EQUAL))
 (46 1 (:REWRITE MEMBER-OF-APPEND))
 (40 40 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (40 40 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (39 39 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (30 10 (:REWRITE CAR-OF-APPEND))
 (15 15 (:REWRITE SUBSETP-MEMBER . 2))
 (15 15 (:REWRITE SUBSETP-MEMBER . 1))
 (11 11 (:REWRITE CONSP-OF-APPEND))
 (9 9 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (5 5 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 )
(BINDINGLIST-TO-LAMBDA-NEST)
(PSEUDO-TERMP-OF-BINDINGLIST-TO-LAMBDA-NEST
 (1466 237 (:DEFINITION SYMBOL-LISTP))
 (1152 18 (:DEFINITION TRUE-LISTP))
 (1008 108 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (1008 18 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (918 54 (:REWRITE PSEUDO-TERMP-CAR))
 (565 534 (:REWRITE DEFAULT-CAR))
 (565 123 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (525 108 (:REWRITE PSEUDO-TERMP-OPENER))
 (514 498 (:REWRITE DEFAULT-CDR))
 (378 36 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (250 2 (:DEFINITION UNION-EQUAL))
 (216 216 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (214 214 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (200 2 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (186 4 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (168 8 (:DEFINITION MEMBER-EQUAL))
 (156 18 (:REWRITE SUBSETP-CAR-MEMBER))
 (128 64 (:REWRITE DEFAULT-+-2))
 (90 90 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (66 64 (:REWRITE DEFAULT-+-1))
 (61 61 (:TYPE-PRESCRIPTION BINDINGLIST-TO-LAMBDA-NEST))
 (54 18 (:REWRITE SUBSETP-MEMBER . 1))
 (52 22 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (44 44 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (36 16 (:REWRITE MEMBER-WHEN-ATOM))
 (34 22 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (32 32 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (32 32 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-BINDINGLIST-BOUND-VARS))
 (22 22 (:REWRITE SUBSETP-TRANS2))
 (22 22 (:REWRITE SUBSETP-TRANS))
 (18 18 (:REWRITE SUBSETP-MEMBER . 4))
 (18 18 (:REWRITE SUBSETP-MEMBER . 3))
 (18 18 (:REWRITE SUBSETP-MEMBER . 2))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 3))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 2))
 (14 3 (:DEFINITION BINARY-APPEND))
 (12 12 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (9 6 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (8 4 (:TYPE-PRESCRIPTION UNION-EQUAL))
 (6 1 (:REWRITE CAR-OF-APPEND))
 (5 2 (:REWRITE CONSP-OF-APPEND))
 (4 4 (:TYPE-PRESCRIPTION BINDINGLIST-FREE-VARS))
 (1 1 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 )
(PAIRLIS$-OF-APPEND
 (121 48 (:REWRITE DEFAULT-CDR))
 (81 64 (:REWRITE DEFAULT-CAR))
 (30 30 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (24 8 (:REWRITE CAR-OF-APPEND))
 (20 10 (:REWRITE DEFAULT-+-2))
 (12 12 (:REWRITE CONSP-OF-APPEND))
 (10 10 (:REWRITE DEFAULT-+-1))
 (8 8 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 )
(SIMPLE-TERM-VARS-LST-OF-APPEND
 (559 124 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (280 280 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (212 125 (:REWRITE DEFAULT-CDR))
 (166 77 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (135 132 (:REWRITE DEFAULT-CAR))
 (77 77 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (65 65 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (60 30 (:REWRITE CONSP-OF-APPEND))
 (36 12 (:REWRITE CAR-OF-APPEND))
 (12 12 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 )
(SIMPLE-TERM-VARS-LST-OF-SYMBOL-LIST
 (70 7 (:DEFINITION BINARY-APPEND))
 (56 14 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (42 42 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (35 35 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (33 33 (:REWRITE DEFAULT-CAR))
 (25 25 (:REWRITE DEFAULT-CDR))
 (16 16 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 )
(REMOVE-EQUAL-WHEN-NOT-MEMBER
 (19 19 (:REWRITE DEFAULT-CAR))
 (15 15 (:REWRITE DEFAULT-CDR))
 (10 10 (:REWRITE SUBSETP-MEMBER . 4))
 (10 10 (:REWRITE INTERSECTP-MEMBER . 3))
 (10 10 (:REWRITE INTERSECTP-MEMBER . 2))
 (9 9 (:REWRITE SUBSETP-MEMBER . 2))
 (2 2 (:REWRITE SUBSETP-TRANS2))
 (2 2 (:REWRITE SUBSETP-TRANS))
 (1 1 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (1 1 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 )
(SET-DIFFERENCE-OF-SET-DIFFERENCE
 (927 74 (:REWRITE SUBSETP-CAR-MEMBER))
 (665 29 (:DEFINITION MEMBER-EQUAL))
 (276 33 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (228 158 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (173 168 (:REWRITE SUBSETP-TRANS2))
 (168 168 (:REWRITE SUBSETP-TRANS))
 (158 158 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (94 91 (:REWRITE DEFAULT-CAR))
 (83 81 (:REWRITE DEFAULT-CDR))
 (74 74 (:REWRITE SUBSETP-MEMBER . 4))
 (74 74 (:REWRITE INTERSECTP-MEMBER . 3))
 (74 74 (:REWRITE INTERSECTP-MEMBER . 2))
 (70 70 (:REWRITE SUBSETP-MEMBER . 2))
 (58 58 (:REWRITE MEMBER-WHEN-ATOM))
 (55 11 (:DEFINITION BINARY-APPEND))
 (46 23 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (31 2 (:REWRITE SUBSETP-APPEND1))
 (23 23 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (23 23 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (22 22 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (22 22 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (10 10 (:REWRITE CONSP-OF-APPEND))
 )
(SET-DIFFERENCE-EQ-WHEN-SET-EQUIV-APPEND
 (148 4 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (68 4 (:DEFINITION MEMBER-EQUAL))
 (56 8 (:REWRITE SUBSETP-CAR-MEMBER))
 (25 3 (:DEFINITION BINARY-APPEND))
 (16 16 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (16 16 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (15 15 (:REWRITE DEFAULT-CDR))
 (15 15 (:REWRITE DEFAULT-CAR))
 (15 6 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (9 6 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (8 8 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (8 8 (:REWRITE SUBSETP-TRANS2))
 (8 8 (:REWRITE SUBSETP-TRANS))
 (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 MEMBER-WHEN-ATOM))
 (8 8 (:REWRITE INTERSECTP-MEMBER . 3))
 (8 8 (:REWRITE INTERSECTP-MEMBER . 2))
 (4 4 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 )
(FREE-VARS-OF-BINDINGLIST-TO-LAMBDA-NEST
 (3205 56 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (1992 210 (:REWRITE SUBSETP-CAR-MEMBER))
 (1979 16 (:DEFINITION UNION-EQUAL))
 (1978 94 (:DEFINITION MEMBER-EQUAL))
 (877 338 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (865 561 (:REWRITE DEFAULT-CAR))
 (814 814 (:TYPE-PRESCRIPTION LEN))
 (746 272 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (706 552 (:REWRITE DEFAULT-CDR))
 (650 27 (:DEFINITION SYMBOL-LISTP))
 (647 35 (:REWRITE TAKE-OF-LEN-FREE))
 (634 51 (:REWRITE CONSP-OF-TAKE))
 (600 6 (:REWRITE MEMBER-OF-APPEND))
 (565 114 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (552 552 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (550 550 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (501 213 (:REWRITE SUBSETP-MEMBER . 1))
 (433 66 (:DEFINITION LEN))
 (418 418 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-BINDINGLIST-BOUND-VARS))
 (378 189 (:REWRITE MEMBER-WHEN-ATOM))
 (374 272 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (369 213 (:REWRITE SUBSETP-MEMBER . 3))
 (272 272 (:REWRITE SUBSETP-TRANS2))
 (272 272 (:REWRITE SUBSETP-TRANS))
 (272 34 (:REWRITE ZP-OPEN))
 (213 213 (:REWRITE SUBSETP-MEMBER . 4))
 (213 213 (:REWRITE SUBSETP-MEMBER . 2))
 (213 213 (:REWRITE INTERSECTP-MEMBER . 3))
 (213 213 (:REWRITE INTERSECTP-MEMBER . 2))
 (204 21 (:REWRITE CONSP-OF-APPEND))
 (173 173 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (170 72 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (155 87 (:REWRITE DEFAULT-<-2))
 (132 66 (:REWRITE DEFAULT-+-2))
 (120 6 (:REWRITE SUBSETP-OF-APPEND-WHEN-SUBSET-OF-EITHER))
 (116 31 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (114 19 (:REWRITE CAR-OF-TAKE))
 (87 87 (:REWRITE DEFAULT-<-1))
 (83 52 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (76 2 (:REWRITE SYMBOL-LISTP-OF-APPEND))
 (66 66 (:REWRITE DEFAULT-+-1))
 (65 65 (:TYPE-PRESCRIPTION BINDINGLIST-TO-LAMBDA-NEST))
 (62 2 (:REWRITE CAR-OF-APPEND))
 (60 6 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (57 19 (:DEFINITION NFIX))
 (46 2 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 (36 18 (:TYPE-PRESCRIPTION UNION-EQUAL))
 (19 19 (:TYPE-PRESCRIPTION NFIX))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LISTP))
 )
(LOOKUP-IN-PAIRLIS$-VARS
 (45 34 (:REWRITE DEFAULT-CAR))
 (40 29 (:REWRITE DEFAULT-CDR))
 (23 13 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (22 22 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-UNIFY-EV-LST))
 (13 7 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (10 10 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (9 7 (:REWRITE UNIFY-EV-OF-QUOTE))
 (9 7 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (9 7 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (9 7 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (8 8 (:REWRITE UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE))
 (7 7 (:REWRITE UNIFY-EV-WHEN-EVAL-ALISTS-AGREE))
 (7 7 (:REWRITE UNIFY-EV-OF-VARIABLE))
 (7 1 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (6 6 (:REWRITE SUBSETP-MEMBER . 4))
 (6 6 (:REWRITE INTERSECTP-MEMBER . 3))
 (6 6 (:REWRITE INTERSECTP-MEMBER . 2))
 (5 5 (:REWRITE SUBSETP-MEMBER . 2))
 (3 3 (:REWRITE SUBSETP-TRANS2))
 (3 3 (:REWRITE SUBSETP-TRANS))
 (3 3 (:REWRITE PAIRLIS-OF-UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE-OF-TAKE))
 (2 2 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (2 2 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 )
(UNIFY-EV-WHEN-MEMBER-OF-NONNIL-SYMBOL-LIST
 (106 7 (:DEFINITION HONS-ASSOC-EQUAL))
 (93 24 (:REWRITE DEFAULT-CDR))
 (69 3 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (55 55 (:REWRITE DEFAULT-CAR))
 (24 18 (:REWRITE SUBSETP-MEMBER . 3))
 (21 21 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (21 7 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (18 18 (:REWRITE SUBSETP-MEMBER . 4))
 (18 18 (:REWRITE SUBSETP-MEMBER . 2))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 3))
 (18 18 (:REWRITE INTERSECTP-MEMBER . 2))
 (14 14 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (7 7 (:DEFINITION HONS-EQUAL))
 (3 3 (:REWRITE UNIFY-EV-WHEN-EVAL-ALISTS-AGREE))
 (3 3 (:REWRITE UNIFY-EV-OF-QUOTE))
 (3 3 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (3 3 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (3 3 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (3 3 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (1 1 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (1 1 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (1 1 (:REWRITE SUBSETP-TRANS2))
 (1 1 (:REWRITE SUBSETP-TRANS))
 )
(CONS-CDR-HONS-ASSOC-EQUAL
 (43 20 (:REWRITE DEFAULT-CDR))
 (35 35 (:REWRITE DEFAULT-CAR))
 (27 9 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (24 24 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (23 1 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (18 18 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 )
(LOOKUP-IN-PAIRLIS$-APPEND-NOT-FIRST
 (30 2 (:DEFINITION HONS-ASSOC-EQUAL))
 (18 18 (:TYPE-PRESCRIPTION PAIRLIS$))
 (18 18 (:REWRITE DEFAULT-CAR))
 (18 3 (:DEFINITION BINARY-APPEND))
 (16 16 (:REWRITE DEFAULT-CDR))
 (15 3 (:DEFINITION PAIRLIS$))
 (10 2 (:DEFINITION LEN))
 (10 1 (:DEFINITION MEMBER-EQUAL))
 (9 6 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (9 6 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (8 2 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (6 2 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (4 4 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (4 2 (:REWRITE DEFAULT-+-2))
 (3 3 (:REWRITE SUBSETP-MEMBER . 4))
 (3 3 (:REWRITE INTERSECTP-MEMBER . 3))
 (3 3 (:REWRITE INTERSECTP-MEMBER . 2))
 (2 2 (:REWRITE SUBSETP-MEMBER . 2))
 (2 2 (:REWRITE SUBSETP-MEMBER . 1))
 (2 2 (:REWRITE MEMBER-WHEN-ATOM))
 (2 2 (:REWRITE DEFAULT-+-1))
 (2 2 (:DEFINITION HONS-EQUAL))
 (1 1 (:REWRITE SUBSETP-TRANS2))
 (1 1 (:REWRITE SUBSETP-TRANS))
 )
(PAIRLIS$-OF-UNIFY-EV-LST-TAKE
 (280 14 (:REWRITE CONSP-OF-TAKE))
 (226 17 (:REWRITE TAKE-OF-LEN-FREE))
 (168 21 (:REWRITE ZP-OPEN))
 (112 112 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-UNIFY-EV-LST))
 (70 35 (:REWRITE DEFAULT-<-2))
 (61 34 (:REWRITE DEFAULT-+-2))
 (35 35 (:REWRITE DEFAULT-<-1))
 (34 34 (:REWRITE DEFAULT-+-1))
 (27 27 (:REWRITE UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE))
 (21 15 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (19 19 (:REWRITE PAIRLIS-OF-UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE-OF-TAKE))
 (17 8 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (11 8 (:REWRITE UNIFY-EV-OF-QUOTE))
 (11 8 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (11 8 (:REWRITE UNIFY-EV-OF-LAMBDA))
 (11 8 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (8 8 (:REWRITE UNIFY-EV-WHEN-MEMBER-OF-NONNIL-SYMBOL-LIST))
 (8 8 (:REWRITE UNIFY-EV-WHEN-EVAL-ALISTS-AGREE))
 (6 6 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 )
(BINDINGLIST-TO-LAMBDA-NEST-CORRECT
 (6653 143 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (6349 297 (:DEFINITION MEMBER-EQUAL))
 (5423 626 (:REWRITE SUBSETP-CAR-MEMBER))
 (2016 668 (:REWRITE SUBSETP-MEMBER . 1))
 (1976 826 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (1442 123 (:DEFINITION BINARY-APPEND))
 (1343 595 (:REWRITE MEMBER-WHEN-ATOM))
 (1315 826 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (1302 95 (:DEFINITION PAIRLIS$))
 (1230 534 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (1197 1197 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-BINDINGLIST-BOUND-VARS))
 (1030 79 (:REWRITE CONSP-OF-TAKE))
 (828 828 (:REWRITE SUBSETP-TRANS2))
 (828 828 (:REWRITE SUBSETP-TRANS))
 (712 712 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (696 13 (:REWRITE ALIST-FIX-WHEN-ALISTP))
 (670 670 (:REWRITE SUBSETP-MEMBER . 4))
 (670 670 (:REWRITE INTERSECTP-MEMBER . 3))
 (670 670 (:REWRITE INTERSECTP-MEMBER . 2))
 (668 668 (:REWRITE SUBSETP-MEMBER . 2))
 (597 25 (:DEFINITION ALISTP))
 (580 580 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-UNIFY-EV-LST))
 (522 25 (:REWRITE TAKE-OF-LEN-FREE))
 (432 54 (:REWRITE ZP-OPEN))
 (337 52 (:DEFINITION LEN))
 (326 326 (:TYPE-PRESCRIPTION BINDINGLIST-TO-LAMBDA-NEST))
 (272 136 (:TYPE-PRESCRIPTION UNION-EQUAL))
 (243 135 (:REWRITE DEFAULT-<-2))
 (206 99 (:REWRITE UNIFY-EV-LST-OF-CONS))
 (203 203 (:TYPE-PRESCRIPTION BINDINGLIST-FREE-VARS))
 (174 12 (:DEFINITION HONS-ASSOC-EQUAL))
 (168 12 (:REWRITE ALISTP-OF-APPEND))
 (150 25 (:REWRITE CAR-OF-TAKE))
 (150 15 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (137 137 (:TYPE-PRESCRIPTION ALISTP))
 (137 135 (:REWRITE DEFAULT-<-1))
 (124 56 (:REWRITE BINDINGLIST-P-CDR-OF-BINDINGLIST))
 (104 52 (:REWRITE DEFAULT-+-2))
 (101 101 (:REWRITE UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE))
 (97 25 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (95 95 (:REWRITE PAIRLIS-OF-UNIFY-EV-LST-WHEN-EVAL-ALISTS-AGREE-OF-TAKE))
 (94 35 (:REWRITE UNIFY-EV-OF-CONS-CALL))
 (94 35 (:REWRITE UNIFY-EV-OF-BINARY-+-CALL))
 (84 35 (:REWRITE UNIFY-EV-OF-NONSYMBOL-ATOM))
 (84 24 (:REWRITE CONSP-OF-APPEND))
 (79 34 (:REWRITE UNIFY-EV-OF-VARIABLE))
 (79 34 (:REWRITE UNIFY-EV-OF-QUOTE))
 (61 13 (:REWRITE ALIST-FIX-OF-ATOM))
 (60 12 (:REWRITE CAR-OF-APPEND))
 (52 52 (:REWRITE DEFAULT-+-1))
 (48 36 (:REWRITE HONS-ASSOC-EQUAL-WHEN-ATOM))
 (48 12 (:REWRITE CDR-OF-APPEND-WHEN-CONSP))
 (46 2 (:REWRITE CONSP-OF-HONS-ASSOC-EQUAL))
 (25 25 (:TYPE-PRESCRIPTION NFIX))
 (16 4 (:REWRITE EVAL-ALISTS-AGREE-WHEN-SUBSET))
 (14 14 (:REWRITE UNIFY-EV-BINDINGLIST-WHEN-EVAL-ALISTS-AGREE-ON-FREE-VARS))
 (12 12 (:REWRITE ALISTP-OF-PAIRLIS$))
 (12 12 (:DEFINITION HONS-EQUAL))
 (8 2 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (3 3 (:REWRITE EVAL-ALISTS-AGREE-BAD-GUY-MEMBER-WHEN-NONNIL))
 (3 3 (:REWRITE EVAL-ALISTS-AGREE-BAD-GUY-MEMBER-WHEN-BAD-KEY))
 )
(BINDINGLIST-TO-LAMBDA-NEST-AUX
 (2824 18 (:DEFINITION TRUE-LISTP))
 (1483 234 (:DEFINITION SYMBOL-LISTP))
 (1108 98 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (936 22 (:DEFINITION PSEUDO-TERM-LISTP))
 (756 7 (:DEFINITION UNION-EQUAL))
 (696 26 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (634 612 (:REWRITE DEFAULT-CAR))
 (608 582 (:REWRITE DEFAULT-CDR))
 (581 7 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (570 60 (:REWRITE PSEUDO-TERMP-CAR))
 (518 118 (:REWRITE PSEUDO-TERMP-OPENER))
 (510 72 (:DEFINITION LEN))
 (434 44 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (431 22 (:DEFINITION MEMBER-EQUAL))
 (423 51 (:REWRITE SUBSETP-CAR-MEMBER))
 (336 8 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (188 188 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (187 14 (:DEFINITION BINARY-APPEND))
 (186 186 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (152 12 (:REWRITE CONSP-OF-TAKE))
 (149 28 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (144 72 (:REWRITE DEFAULT-+-2))
 (135 51 (:REWRITE SUBSETP-MEMBER . 1))
 (131 65 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (130 130 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (108 108 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (72 72 (:REWRITE DEFAULT-+-1))
 (65 65 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (65 65 (:REWRITE SUBSETP-TRANS2))
 (65 65 (:REWRITE SUBSETP-TRANS))
 (64 8 (:REWRITE ZP-OPEN))
 (59 44 (:REWRITE MEMBER-WHEN-ATOM))
 (51 51 (:REWRITE SUBSETP-MEMBER . 4))
 (51 51 (:REWRITE SUBSETP-MEMBER . 3))
 (51 51 (:REWRITE SUBSETP-MEMBER . 2))
 (51 51 (:REWRITE INTERSECTP-MEMBER . 3))
 (51 51 (:REWRITE INTERSECTP-MEMBER . 2))
 (36 36 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (36 20 (:REWRITE DEFAULT-<-2))
 (24 4 (:REWRITE CAR-OF-TAKE))
 (20 20 (:REWRITE DEFAULT-<-1))
 (12 8 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (12 4 (:DEFINITION NFIX))
 (6 6 (:REWRITE BINDINGLIST-P-OF-CONS))
 (4 4 (:TYPE-PRESCRIPTION NFIX))
 )
(UNION-ASSOCIATIVE
 (875 41 (:DEFINITION MEMBER-EQUAL))
 (798 92 (:REWRITE SUBSETP-CAR-MEMBER))
 (684 684 (:TYPE-PRESCRIPTION UNION-EQUAL))
 (168 24 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (160 146 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (154 154 (:REWRITE SUBSETP-TRANS2))
 (154 154 (:REWRITE SUBSETP-TRANS))
 (146 146 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (121 118 (:REWRITE DEFAULT-CAR))
 (108 106 (:REWRITE DEFAULT-CDR))
 (92 92 (:REWRITE SUBSETP-MEMBER . 4))
 (92 92 (:REWRITE INTERSECTP-MEMBER . 3))
 (92 92 (:REWRITE INTERSECTP-MEMBER . 2))
 (88 88 (:REWRITE SUBSETP-MEMBER . 2))
 (82 82 (:REWRITE MEMBER-WHEN-ATOM))
 (28 2 (:REWRITE SUBSETP-OF-APPEND-WHEN-SUBSET-OF-EITHER))
 (10 2 (:DEFINITION BINARY-APPEND))
 (8 4 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (4 4 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (4 4 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (4 4 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (2 2 (:REWRITE CONSP-OF-APPEND))
 )
(SET-DIFFERENCE-OF-UNION
 (1192 59 (:DEFINITION MEMBER-EQUAL))
 (1081 131 (:REWRITE SUBSETP-CAR-MEMBER))
 (211 187 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (192 192 (:REWRITE SUBSETP-TRANS2))
 (192 192 (:REWRITE SUBSETP-TRANS))
 (190 187 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (175 25 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (172 167 (:REWRITE DEFAULT-CAR))
 (163 159 (:REWRITE DEFAULT-CDR))
 (131 131 (:REWRITE SUBSETP-MEMBER . 4))
 (131 131 (:REWRITE INTERSECTP-MEMBER . 3))
 (131 131 (:REWRITE INTERSECTP-MEMBER . 2))
 (128 128 (:REWRITE SUBSETP-MEMBER . 2))
 (118 118 (:REWRITE MEMBER-WHEN-ATOM))
 )
(SET-DIFF-OF-EQUAL-TO-UNION
 (243 3 (:DEFINITION UNION-EQUAL))
 (165 9 (:DEFINITION MEMBER-EQUAL))
 (156 2 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (148 4 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (146 20 (:REWRITE SUBSETP-CAR-MEMBER))
 (48 48 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (44 20 (:REWRITE SUBSETP-MEMBER . 1))
 (30 24 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (24 24 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (24 24 (:REWRITE SUBSETP-TRANS2))
 (24 24 (:REWRITE SUBSETP-TRANS))
 (23 23 (:REWRITE DEFAULT-CDR))
 (23 23 (:REWRITE DEFAULT-CAR))
 (20 20 (:REWRITE SUBSETP-MEMBER . 4))
 (20 20 (:REWRITE SUBSETP-MEMBER . 3))
 (20 20 (:REWRITE SUBSETP-MEMBER . 2))
 (20 20 (:REWRITE INTERSECTP-MEMBER . 3))
 (20 20 (:REWRITE INTERSECTP-MEMBER . 2))
 (18 18 (:REWRITE MEMBER-WHEN-ATOM))
 (13 13 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 )
(SET-DIFF-OF-SET-DIFF
 (927 74 (:REWRITE SUBSETP-CAR-MEMBER))
 (665 29 (:DEFINITION MEMBER-EQUAL))
 (276 33 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (228 158 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (173 168 (:REWRITE SUBSETP-TRANS2))
 (168 168 (:REWRITE SUBSETP-TRANS))
 (158 158 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (94 91 (:REWRITE DEFAULT-CAR))
 (83 81 (:REWRITE DEFAULT-CDR))
 (74 74 (:REWRITE SUBSETP-MEMBER . 4))
 (74 74 (:REWRITE INTERSECTP-MEMBER . 3))
 (74 74 (:REWRITE INTERSECTP-MEMBER . 2))
 (70 70 (:REWRITE SUBSETP-MEMBER . 2))
 (58 58 (:REWRITE MEMBER-WHEN-ATOM))
 (55 11 (:DEFINITION BINARY-APPEND))
 (46 23 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (31 2 (:REWRITE SUBSETP-APPEND1))
 (28 28 (:REWRITE SET-DIFF-OF-EQUAL-TO-UNION))
 (23 23 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (23 23 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (22 22 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (22 22 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (10 10 (:REWRITE CONSP-OF-APPEND))
 )
(BINDINGLIST-TO-LAMBDA-NEST-AUX-FREE-VARS-ELIM
 (2247 17 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (1313 131 (:REWRITE SUBSETP-CAR-MEMBER))
 (1273 54 (:DEFINITION MEMBER-EQUAL))
 (848 14 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (772 2 (:REWRITE MEMBER-UNION))
 (732 6 (:REWRITE MEMBER-OF-APPEND))
 (595 131 (:REWRITE SUBSETP-MEMBER . 1))
 (575 215 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (440 440 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (341 215 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (287 131 (:REWRITE SUBSETP-MEMBER . 3))
 (281 137 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (215 215 (:REWRITE SUBSETP-TRANS2))
 (215 215 (:REWRITE SUBSETP-TRANS))
 (215 108 (:REWRITE MEMBER-WHEN-ATOM))
 (212 10 (:REWRITE SUBSETP-OF-APPEND-WHEN-SUBSET-OF-EITHER))
 (210 13 (:DEFINITION BINARY-APPEND))
 (197 161 (:REWRITE DEFAULT-CAR))
 (196 196 (:TYPE-PRESCRIPTION LEN))
 (178 158 (:REWRITE DEFAULT-CDR))
 (160 160 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (160 8 (:REWRITE TAKE-OF-LEN-FREE))
 (152 12 (:REWRITE CONSP-OF-TAKE))
 (151 26 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (131 131 (:REWRITE SUBSETP-MEMBER . 4))
 (131 131 (:REWRITE SUBSETP-MEMBER . 2))
 (131 131 (:REWRITE INTERSECTP-MEMBER . 3))
 (131 131 (:REWRITE INTERSECTP-MEMBER . 2))
 (104 16 (:DEFINITION LEN))
 (102 102 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (64 8 (:REWRITE ZP-OPEN))
 (60 6 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (42 6 (:REWRITE CONSP-OF-APPEND))
 (40 40 (:TYPE-PRESCRIPTION TAKE))
 (40 10 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (36 20 (:REWRITE DEFAULT-<-2))
 (36 12 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (32 16 (:REWRITE DEFAULT-+-2))
 (24 8 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (24 4 (:REWRITE CAR-OF-TAKE))
 (20 20 (:REWRITE DEFAULT-<-1))
 (18 18 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (16 16 (:REWRITE DEFAULT-+-1))
 (16 8 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (12 12 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (12 4 (:DEFINITION NFIX))
 (4 4 (:TYPE-PRESCRIPTION NFIX))
 )
(BINDINGLIST-TO-LAMBDA-NEST-AUX-ELIM
 (3624 15 (:DEFINITION UNION-EQUAL))
 (3177 18 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (1938 171 (:REWRITE SUBSETP-CAR-MEMBER))
 (1797 15 (:REWRITE MEMBER-OF-APPEND))
 (1770 69 (:DEFINITION MEMBER-EQUAL))
 (1488 18 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (1158 3 (:REWRITE MEMBER-UNION))
 (975 327 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (891 171 (:REWRITE SUBSETP-MEMBER . 1))
 (678 678 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (561 171 (:REWRITE SUBSETP-MEMBER . 3))
 (531 327 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (507 24 (:REWRITE SUBSETP-OF-APPEND-WHEN-SUBSET-OF-EITHER))
 (411 411 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-BINDINGLIST-BOUND-VARS))
 (342 168 (:REWRITE CONSP-CAR-WHEN-BINDINGLIST-P))
 (327 327 (:REWRITE SUBSETP-TRANS2))
 (327 327 (:REWRITE SUBSETP-TRANS))
 (315 315 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (300 18 (:DEFINITION BINARY-APPEND))
 (297 138 (:REWRITE MEMBER-WHEN-ATOM))
 (228 18 (:REWRITE CONSP-OF-TAKE))
 (216 216 (:TYPE-PRESCRIPTION LEN))
 (210 36 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (205 181 (:REWRITE DEFAULT-CDR))
 (186 186 (:TYPE-PRESCRIPTION BINDINGLIST-P))
 (183 165 (:REWRITE DEFAULT-CAR))
 (171 171 (:REWRITE SUBSETP-MEMBER . 4))
 (171 171 (:REWRITE SUBSETP-MEMBER . 2))
 (171 171 (:REWRITE INTERSECTP-MEMBER . 3))
 (171 171 (:REWRITE INTERSECTP-MEMBER . 2))
 (150 15 (:REWRITE SUBSETP-IMPLIES-SUBSETP-CDR))
 (135 135 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (120 6 (:REWRITE TAKE-OF-LEN-FREE))
 (105 15 (:REWRITE CONSP-OF-APPEND))
 (104 104 (:TYPE-PRESCRIPTION BINDINGLIST-TO-LAMBDA-NEST))
 (96 12 (:REWRITE ZP-OPEN))
 (90 30 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (78 12 (:DEFINITION LEN))
 (66 66 (:TYPE-PRESCRIPTION SET-DIFFERENCE-EQUAL))
 (66 66 (:TYPE-PRESCRIPTION BINDINGLIST-FREE-VARS))
 (54 30 (:REWRITE DEFAULT-<-2))
 (51 51 (:TYPE-PRESCRIPTION TAKE))
 (48 12 (:REWRITE APPEND-ATOM-UNDER-LIST-EQUIV))
 (36 6 (:REWRITE CAR-OF-TAKE))
 (30 30 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (30 30 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (30 30 (:REWRITE DEFAULT-<-1))
 (24 24 (:REWRITE SET-DIFF-OF-EQUAL-TO-UNION))
 (24 12 (:REWRITE DEFAULT-+-2))
 (18 6 (:REWRITE LEN-CDAR-OF-BINDINGLIST))
 (18 6 (:DEFINITION NFIX))
 (12 12 (:REWRITE DEFAULT-+-1))
 (6 6 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS-LST))
 (6 6 (:TYPE-PRESCRIPTION NFIX))
 (6 3 (:REWRITE SIMPLE-TERM-VARS-LST-OF-ATOM))
 )
(BINDINGLIST-TO-LAMBDA-NEST-EXEC
 (875 7 (:DEFINITION UNION-EQUAL))
 (700 7 (:REWRITE MEMBER-OF-SET-DIFFERENCE-EQUAL))
 (605 13 (:DEFINITION SET-DIFFERENCE-EQUAL))
 (570 27 (:DEFINITION MEMBER-EQUAL))
 (529 61 (:REWRITE SUBSETP-CAR-MEMBER))
 (188 31 (:DEFINITION SYMBOL-LISTP))
 (187 61 (:REWRITE SUBSETP-MEMBER . 1))
 (177 167 (:REWRITE DEFAULT-CDR))
 (177 75 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (174 164 (:REWRITE DEFAULT-CAR))
 (150 150 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (138 18 (:DEFINITION LEN))
 (128 2 (:DEFINITION TRUE-LISTP))
 (123 54 (:REWRITE MEMBER-WHEN-ATOM))
 (117 75 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (112 112 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-SIMPLE-TERM-VARS))
 (112 112 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-BINDINGLIST-BOUND-VARS))
 (112 12 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (112 2 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (102 6 (:REWRITE PSEUDO-TERMP-CAR))
 (75 75 (:REWRITE SUBSETP-TRANS2))
 (75 75 (:REWRITE SUBSETP-TRANS))
 (61 61 (:REWRITE SUBSETP-MEMBER . 4))
 (61 61 (:REWRITE SUBSETP-MEMBER . 3))
 (61 61 (:REWRITE SUBSETP-MEMBER . 2))
 (61 61 (:REWRITE INTERSECTP-MEMBER . 3))
 (61 61 (:REWRITE INTERSECTP-MEMBER . 2))
 (52 11 (:REWRITE PSEUDO-TERMP-OPENER))
 (45 10 (:DEFINITION BINARY-APPEND))
 (42 4 (:REWRITE TRUE-LISTP-WHEN-SYMBOL-LISTP))
 (41 41 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (36 18 (:REWRITE DEFAULT-+-2))
 (35 20 (:REWRITE APPEND-WHEN-NOT-CONSP))
 (24 24 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (23 23 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (18 18 (:REWRITE DEFAULT-+-1))
 (14 14 (:TYPE-PRESCRIPTION BINDINGLIST-FREE-VARS))
 (9 9 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 )
(TRANSLATE-CMP-IGNORE-OK)
(B*-BINDERS-TO-BINDINGLIST)
