(PSEUDO-TERMP-OF-LOOKUP-EQUAL-WHEN-SYMBOL-TERM-ALISTP
 (2462 28 (:DEFINITION PSEUDO-TERMP))
 (578 19 (:REWRITE SYMBOL-TERM-ALISTP-OF-CDR))
 (560 84 (:DEFINITION LENGTH))
 (476 84 (:DEFINITION LEN))
 (465 28 (:DEFINITION SYMBOL-LISTP))
 (458 456 (:REWRITE DEFAULT-CDR))
 (436 434 (:REWRITE DEFAULT-CAR))
 (295 295 (:TYPE-PRESCRIPTION LEN))
 (222 56 (:DEFINITION TRUE-LISTP))
 (185 185 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (168 84 (:REWRITE DEFAULT-+-2))
 (130 65 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (112 28 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (84 84 (:REWRITE DEFAULT-+-1))
 (72 72 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (56 56 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (46 46 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (28 28 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (11 11 (:REWRITE LOOKUP-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (11 11 (:REWRITE LOOKUP-EQUAL-WHEN-NOT-ASSOC-EQUAL-CHEAP))
 )
(PSEUDO-TERM-LISTP-OF-APPEND1
 (287 3 (:DEFINITION PSEUDO-TERMP))
 (112 106 (:REWRITE DEFAULT-CDR))
 (95 89 (:REWRITE DEFAULT-CAR))
 (88 48 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (76 76 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (68 34 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (65 3 (:DEFINITION SYMBOL-LISTP))
 (60 9 (:DEFINITION LENGTH))
 (51 9 (:DEFINITION LEN))
 (48 48 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (46 46 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (43 43 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (28 3 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (24 12 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (22 9 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (21 21 (:TYPE-PRESCRIPTION LEN))
 (18 18 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (18 9 (:REWRITE DEFAULT-+-2))
 (9 9 (:REWRITE DEFAULT-+-1))
 )
(PSEUDO-TERM-LISTP-OF-APPEND2
 (8 8 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (5 5 (:REWRITE DEFAULT-CDR))
 (5 5 (:REWRITE DEFAULT-CAR))
 (4 4 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (3 1 (:DEFINITION BINARY-APPEND))
 )
(PSEUDO-TERM-ALISTP)
(ALISTP-WHEN-PSEUDO-TERM-ALISTP
 (444 222 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (430 18 (:DEFINITION SYMBOL-LISTP))
 (311 311 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (306 54 (:DEFINITION LEN))
 (283 283 (:REWRITE DEFAULT-CDR))
 (266 266 (:REWRITE DEFAULT-CAR))
 (192 18 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (152 46 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (146 73 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (108 54 (:REWRITE DEFAULT-+-2))
 (108 36 (:DEFINITION TRUE-LISTP))
 (100 100 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (54 54 (:REWRITE DEFAULT-+-1))
 (36 36 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (24 8 (:REWRITE PSEUDO-TERMP-OF-CDR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP))
 (18 18 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 )
(ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP)
(DROP-PAIRS-THAT-MENTION-VARS
 (348 174 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (296 294 (:REWRITE DEFAULT-CDR))
 (272 48 (:DEFINITION LEN))
 (266 264 (:REWRITE DEFAULT-CAR))
 (259 259 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (256 16 (:DEFINITION INTERSECTION-EQUAL))
 (130 65 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (108 32 (:DEFINITION TRUE-LISTP))
 (96 48 (:REWRITE DEFAULT-+-2))
 (48 48 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (48 48 (:REWRITE DEFAULT-+-1))
 (43 19 (:REWRITE FREE-VARS-IN-TERM-WHEN-NOT-CONSP-CHEAP))
 (32 32 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (32 16 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (32 16 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (30 8 (:REWRITE PSEUDO-TERMP-OF-CDR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP))
 (16 16 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (16 16 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (16 16 (:REWRITE MEMBER-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (16 16 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (16 16 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (16 16 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 (6 2 (:REWRITE SYMBOL-TERM-ALISTP-OF-CDR))
 )
(PSEUDO-TERM-ALISTP-OF-DROP-PAIRS-THAT-MENTION-VARS
 (676 32 (:DEFINITION SYMBOL-LISTP))
 (634 317 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (568 555 (:REWRITE DEFAULT-CDR))
 (544 96 (:DEFINITION LEN))
 (517 504 (:REWRITE DEFAULT-CAR))
 (488 488 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (304 32 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (278 139 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (194 80 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (192 96 (:REWRITE DEFAULT-+-2))
 (192 64 (:DEFINITION TRUE-LISTP))
 (176 176 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (96 96 (:REWRITE DEFAULT-+-1))
 (64 64 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (48 16 (:REWRITE PSEUDO-TERMP-OF-CDR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP))
 (35 17 (:REWRITE FREE-VARS-IN-TERM-WHEN-NOT-CONSP-CHEAP))
 (34 17 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (34 17 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (32 32 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (17 17 (:REWRITE MEMBER-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (17 17 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (17 17 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (17 17 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 )
(VARS-NOT-BOUND-TO-THEMSELVES
 (9 1 (:DEFINITION SYMBOL-LISTP))
 (6 6 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE DEFAULT-CAR))
 (2 1 (:DEFINITION TRUE-LISTP))
 )
(SYMBOL-LISTP-OF-VARS-NOT-BOUND-TO-THEMSELVES
 (22 22 (:REWRITE DEFAULT-CAR))
 (16 16 (:REWRITE DEFAULT-CDR))
 )
(REPLACE-IN-TERM
 (1206 603 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (856 856 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (778 348 (:REWRITE DEFAULT-+-2))
 (431 348 (:REWRITE DEFAULT-+-1))
 (414 207 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (413 48 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (323 114 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (254 254 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (144 36 (:DEFINITION INTEGER-ABS))
 (100 100 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (60 43 (:REWRITE DEFAULT-<-2))
 (55 55 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (54 18 (:REWRITE PSEUDO-TERMP-OF-CDR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP))
 (51 1 (:DEFINITION DROP-PAIRS-THAT-MENTION-VARS))
 (47 43 (:REWRITE DEFAULT-<-1))
 (36 36 (:REWRITE DEFAULT-UNARY-MINUS))
 (34 2 (:DEFINITION INTERSECTION-EQUAL))
 (26 2 (:DEFINITION VARS-NOT-BOUND-TO-THEMSELVES))
 (20 10 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (18 18 (:REWRITE DEFAULT-REALPART))
 (18 18 (:REWRITE DEFAULT-NUMERATOR))
 (18 18 (:REWRITE DEFAULT-IMAGPART))
 (18 18 (:REWRITE DEFAULT-DENOMINATOR))
 (18 18 (:REWRITE DEFAULT-COERCE-2))
 (18 18 (:REWRITE DEFAULT-COERCE-1))
 (6 6 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (4 4 (:TYPE-PRESCRIPTION FREE-VARS-IN-TERM))
 (4 2 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (4 2 (:REWRITE MEMBER-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (4 2 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (4 2 (:REWRITE FREE-VARS-IN-TERM-WHEN-NOT-CONSP-CHEAP))
 (2 2 (:TYPE-PRESCRIPTION INTERSECTION-EQUAL))
 (2 2 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (2 2 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (2 2 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 )
(DROP-TERMS-THAT-MENTION-VARS
 (96 6 (:DEFINITION INTERSECTION-EQUAL))
 (93 1 (:DEFINITION PSEUDO-TERMP))
 (38 38 (:REWRITE DEFAULT-CDR))
 (36 36 (:REWRITE DEFAULT-CAR))
 (20 10 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (20 3 (:DEFINITION LENGTH))
 (18 18 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (17 3 (:DEFINITION LEN))
 (14 14 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (12 6 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (12 6 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (10 10 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (8 4 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (7 7 (:TYPE-PRESCRIPTION LEN))
 (7 7 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (7 7 (:REWRITE FREE-VARS-IN-TERM-WHEN-NOT-CONSP-CHEAP))
 (6 6 (:REWRITE MEMBER-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (6 6 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (6 6 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (6 6 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 (6 3 (:REWRITE DEFAULT-+-2))
 (6 2 (:DEFINITION TRUE-LISTP))
 (3 3 (:REWRITE DEFAULT-+-1))
 )
(REPLACE-IF-BOUND)
(RENAME-FNS
 (520 219 (:REWRITE DEFAULT-+-2))
 (302 219 (:REWRITE DEFAULT-+-1))
 (144 36 (:DEFINITION INTEGER-ABS))
 (105 105 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (100 50 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (68 4 (:DEFINITION SYMBOL-LISTP))
 (66 33 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (60 43 (:REWRITE DEFAULT-<-2))
 (47 43 (:REWRITE DEFAULT-<-1))
 (44 22 (:REWRITE SYMBOL-ALISTP-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (42 21 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (36 36 (:REWRITE DEFAULT-UNARY-MINUS))
 (33 33 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (24 4 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (18 18 (:REWRITE DEFAULT-REALPART))
 (18 18 (:REWRITE DEFAULT-NUMERATOR))
 (18 18 (:REWRITE DEFAULT-IMAGPART))
 (18 18 (:REWRITE DEFAULT-DENOMINATOR))
 (18 18 (:REWRITE DEFAULT-COERCE-2))
 (18 18 (:REWRITE DEFAULT-COERCE-1))
 (16 16 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (15 15 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 )
(GET-FNS-IN-TERM-AUX
 (455 187 (:REWRITE DEFAULT-+-2))
 (263 187 (:REWRITE DEFAULT-+-1))
 (128 32 (:DEFINITION INTEGER-ABS))
 (128 16 (:DEFINITION LENGTH))
 (80 16 (:DEFINITION LEN))
 (53 38 (:REWRITE DEFAULT-<-2))
 (42 38 (:REWRITE DEFAULT-<-1))
 (32 32 (:REWRITE DEFAULT-UNARY-MINUS))
 (16 16 (:TYPE-PRESCRIPTION LEN))
 (16 16 (:REWRITE DEFAULT-REALPART))
 (16 16 (:REWRITE DEFAULT-NUMERATOR))
 (16 16 (:REWRITE DEFAULT-IMAGPART))
 (16 16 (:REWRITE DEFAULT-DENOMINATOR))
 (16 16 (:REWRITE DEFAULT-COERCE-2))
 (16 16 (:REWRITE DEFAULT-COERCE-1))
 (12 6 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (6 6 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (5 5 (:TYPE-PRESCRIPTION TRUE-LISTP))
 )
(FLAG-GET-FNS-IN-TERM-AUX
 (787 347 (:REWRITE DEFAULT-+-2))
 (486 347 (:REWRITE DEFAULT-+-1))
 (264 66 (:DEFINITION INTEGER-ABS))
 (264 33 (:DEFINITION LENGTH))
 (165 33 (:DEFINITION LEN))
 (108 81 (:REWRITE DEFAULT-<-2))
 (94 81 (:REWRITE DEFAULT-<-1))
 (66 66 (:REWRITE DEFAULT-UNARY-MINUS))
 (33 33 (:TYPE-PRESCRIPTION LEN))
 (33 33 (:REWRITE DEFAULT-REALPART))
 (33 33 (:REWRITE DEFAULT-NUMERATOR))
 (33 33 (:REWRITE DEFAULT-IMAGPART))
 (33 33 (:REWRITE DEFAULT-DENOMINATOR))
 (33 33 (:REWRITE DEFAULT-COERCE-2))
 (33 33 (:REWRITE DEFAULT-COERCE-1))
 (20 10 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (12 2 (:TYPE-PRESCRIPTION RETURN-LAST))
 (10 10 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (2 2 (:TYPE-PRESCRIPTION THROW-NONEXEC-ERROR))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(FLAG-GET-FNS-IN-TERM-AUX-EQUIVALENCES)
(FLAG-LEMMA-FOR-TRUE-LISTP-OF-GET-FNS-IN-TERM-AUX
 (54 54 (:REWRITE DEFAULT-CDR))
 (48 24 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (39 39 (:REWRITE DEFAULT-CAR))
 (38 38 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (32 11 (:DEFINITION TRUE-LISTP))
 (28 14 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 )
(TRUE-LISTP-OF-GET-FNS-IN-TERM-AUX
 (2 2 (:TYPE-PRESCRIPTION GET-FNS-IN-TERM-AUX))
 )
(TRUE-LISTP-OF-GET-FNS-IN-TERMS-AUX
 (2 2 (:TYPE-PRESCRIPTION GET-FNS-IN-TERMS-AUX))
 )
(PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP
 (446 223 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (304 16 (:DEFINITION SYMBOL-LISTP))
 (294 294 (:REWRITE DEFAULT-CDR))
 (278 278 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (228 228 (:REWRITE DEFAULT-CAR))
 (128 64 (:REWRITE DEFAULT-+-2))
 (112 16 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (110 55 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (86 35 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (64 64 (:REWRITE DEFAULT-+-1))
 (33 33 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (29 29 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (2 2 (:REWRITE DEFAULT-COERCE-2))
 (2 2 (:REWRITE DEFAULT-COERCE-1))
 )
(FLAG-LEMMA-FOR-SYMBOL-LISTP-OF-GET-FNS-IN-TERM-AUX
 (308 308 (:REWRITE DEFAULT-CDR))
 (251 251 (:REWRITE DEFAULT-CAR))
 (246 123 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (176 176 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (106 53 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (76 38 (:REWRITE DEFAULT-+-2))
 (42 42 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (40 40 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (38 38 (:REWRITE DEFAULT-+-1))
 (19 13 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 )
(SYMBOL-LISTP-OF-GET-FNS-IN-TERM-AUX
 (2 2 (:TYPE-PRESCRIPTION GET-FNS-IN-TERM-AUX))
 )
(SYMBOL-LISTP-OF-GET-FNS-IN-TERMS-AUX
 (2 2 (:TYPE-PRESCRIPTION GET-FNS-IN-TERMS-AUX))
 )
(GET-FNS-IN-TERM-AUX
 (92 92 (:REWRITE DEFAULT-CDR))
 (68 68 (:REWRITE DEFAULT-CAR))
 (68 12 (:DEFINITION LEN))
 (68 4 (:DEFINITION SYMBOL-LISTP))
 (42 21 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (32 12 (:DEFINITION TRUE-LISTP))
 (24 12 (:REWRITE DEFAULT-+-2))
 (24 4 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (20 10 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (18 18 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (18 1 (:DEFINITION GET-FNS-IN-TERM-AUX))
 (14 14 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (12 12 (:REWRITE DEFAULT-+-1))
 (6 2 (:DEFINITION GET-FNS-IN-TERMS-AUX))
 (5 5 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-ADD-TO-SET-EQUAL-TYPE))
 )
(GET-FNS-IN-TERM)
(SYMBOL-LISTP-OF-GET-FNS-IN-TERM)
(TRUE-LISTP-OF-GET-FNS-IN-TERM)
(GET-FNS-IN-TERMS)
(SYMBOL-LISTP-OF-GET-FNS-IN-TERMS)
(EXPR-CALLS-FN
 (465 192 (:REWRITE DEFAULT-+-2))
 (268 192 (:REWRITE DEFAULT-+-1))
 (128 32 (:DEFINITION INTEGER-ABS))
 (53 38 (:REWRITE DEFAULT-<-2))
 (42 38 (:REWRITE DEFAULT-<-1))
 (32 32 (:REWRITE DEFAULT-UNARY-MINUS))
 (16 16 (:REWRITE DEFAULT-REALPART))
 (16 16 (:REWRITE DEFAULT-NUMERATOR))
 (16 16 (:REWRITE DEFAULT-IMAGPART))
 (16 16 (:REWRITE DEFAULT-DENOMINATOR))
 (16 16 (:REWRITE DEFAULT-COERCE-2))
 (16 16 (:REWRITE DEFAULT-COERCE-1))
 (15 1 (:DEFINITION SYMBOL-LISTP))
 (14 7 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (11 11 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (8 8 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (8 8 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (8 4 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (4 4 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (4 1 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (2 1 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (1 1 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 )
(RENAME-FN
 (514 216 (:REWRITE DEFAULT-+-2))
 (299 216 (:REWRITE DEFAULT-+-1))
 (144 36 (:DEFINITION INTEGER-ABS))
 (60 43 (:REWRITE DEFAULT-<-2))
 (49 3 (:DEFINITION SYMBOL-LISTP))
 (47 43 (:REWRITE DEFAULT-<-1))
 (38 19 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (36 36 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (36 36 (:REWRITE DEFAULT-UNARY-MINUS))
 (34 17 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (18 18 (:REWRITE DEFAULT-REALPART))
 (18 18 (:REWRITE DEFAULT-NUMERATOR))
 (18 18 (:REWRITE DEFAULT-IMAGPART))
 (18 18 (:REWRITE DEFAULT-DENOMINATOR))
 (18 18 (:REWRITE DEFAULT-COERCE-2))
 (18 18 (:REWRITE DEFAULT-COERCE-1))
 (16 16 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (16 3 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (14 7 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (13 13 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (12 12 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (6 4 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 )
(LAMBDA-EXPRP)
(MY-LAMBDA-APPLICATIONP)
(BETA-REDUCE
 (105 7 (:DEFINITION SYMBOL-LISTP))
 (50 50 (:REWRITE DEFAULT-CDR))
 (50 48 (:REWRITE DEFAULT-CAR))
 (48 2 (:REWRITE SYMBOLP-OF-CAR-OF-LAST-WHEN-SYMBOL-LISTP))
 (40 9 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (24 12 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (20 9 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (18 9 (:REWRITE DEFAULT-+-2))
 (9 9 (:REWRITE DEFAULT-+-1))
 (5 1 (:DEFINITION TRUE-LIST-FIX))
 (4 4 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (2 2 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (2 2 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (2 2 (:REWRITE LAST-WHEN-NOT-CONSP-CHEAP))
 )
(CAR-LAST-WHEN-LENGTH-KNOWN
 (71 42 (:REWRITE DEFAULT-+-2))
 (52 52 (:REWRITE DEFAULT-CDR))
 (42 42 (:REWRITE DEFAULT-+-1))
 (21 21 (:REWRITE LAST-WHEN-NOT-CONSP-CHEAP))
 (19 11 (:REWRITE DEFAULT-<-2))
 (11 11 (:REWRITE DEFAULT-<-1))
 (3 3 (:REWRITE CONSP-OF-LAST))
 )
(PSEUDO-TERMP-OF-CAR-OF-LAST-OF-CAR
 (362 181 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (275 17 (:DEFINITION SYMBOL-LISTP))
 (217 217 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (214 214 (:REWRITE DEFAULT-CAR))
 (197 197 (:REWRITE DEFAULT-CDR))
 (92 17 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (74 33 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (72 36 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (36 6 (:DEFINITION PSEUDO-TERM-LISTP))
 (28 28 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (23 23 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (15 15 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (8 4 (:DEFINITION NTH))
 (1 1 (:REWRITE LAST-WHEN-NOT-CONSP-CHEAP))
 )
(PSEUDO-TERMP-OF-BETA-REDUCE
 (364 26 (:DEFINITION ASSOC-EQUAL))
 (264 8 (:REWRITE CAR-OF-SUBLIS-VAR-SIMPLE))
 (215 163 (:REWRITE DEFAULT-CAR))
 (186 93 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (175 5 (:REWRITE CDR-OF-SUBLIS-VAR-SIMPLE))
 (147 147 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (129 129 (:REWRITE DEFAULT-CDR))
 (116 1 (:REWRITE PSEUDO-TERMP-OF-SUBLIS-VAR-SIMPLE))
 (90 16 (:DEFINITION LEN))
 (88 5 (:DEFINITION SYMBOL-LISTP))
 (82 41 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (65 10 (:DEFINITION TRUE-LISTP))
 (52 52 (:TYPE-PRESCRIPTION PAIRLIS$))
 (32 16 (:REWRITE DEFAULT-+-2))
 (27 27 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (26 13 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (26 5 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (18 8 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (16 16 (:REWRITE DEFAULT-+-1))
 (13 13 (:DEFINITION ATOM))
 (9 9 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (8 8 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (7 1 (:DEFINITION PAIRLIS$))
 (6 6 (:TYPE-PRESCRIPTION SUBLIS-VAR-SIMPLE-LST))
 (6 6 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (6 1 (:DEFINITION PSEUDO-TERM-LISTP))
 (5 5 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (1 1 (:REWRITE LAST-WHEN-NOT-CONSP-CHEAP))
 (1 1 (:REWRITE DEFAULT-COERCE-2))
 (1 1 (:REWRITE DEFAULT-COERCE-1))
 (1 1 (:REWRITE CONSP-OF-SUBLIS-VAR-SIMPLE))
 )
(NEGATE-TERM)
(PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP
 (9 9 (:REWRITE DEFAULT-CAR))
 (8 8 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (8 2 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (7 7 (:REWRITE DEFAULT-CDR))
 (6 6 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 )
(PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP-CHEAP)
(PSEUDO-TERMP-OF-CONS-1
 (114 114 (:REWRITE DEFAULT-CDR))
 (83 5 (:DEFINITION SYMBOL-LISTP))
 (66 33 (:REWRITE DEFAULT-+-2))
 (52 52 (:REWRITE DEFAULT-CAR))
 (52 26 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (40 40 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (33 33 (:REWRITE DEFAULT-+-1))
 (28 14 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (28 5 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (24 3 (:DEFINITION PSEUDO-TERM-LISTP))
 (18 9 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (18 9 (:REWRITE PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP-CHEAP))
 (9 9 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (9 9 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (5 5 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (3 3 (:REWRITE DEFAULT-COERCE-2))
 (3 3 (:REWRITE DEFAULT-COERCE-1))
 )
(PSEUDO-TERMP-CAR-LAST
 (239 13 (:DEFINITION SYMBOL-LISTP))
 (138 17 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (108 4 (:REWRITE SYMBOLP-OF-CAR-OF-LAST-WHEN-SYMBOL-LISTP))
 (102 102 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (102 102 (:REWRITE DEFAULT-CDR))
 (95 87 (:REWRITE DEFAULT-CAR))
 (85 15 (:DEFINITION LEN))
 (76 25 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (40 20 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (40 18 (:REWRITE PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP-CHEAP))
 (30 15 (:REWRITE DEFAULT-+-2))
 (30 10 (:DEFINITION TRUE-LISTP))
 (18 18 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (17 17 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (15 15 (:REWRITE DEFAULT-+-1))
 (6 6 (:REWRITE LAST-WHEN-NOT-CONSP-CHEAP))
 (5 5 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (4 4 (:REWRITE CAR-LAST-WHEN-LENGTH-KNOWN))
 (2 2 (:REWRITE CONSP-OF-LAST))
 )
(STRIP-CDRS-OF-PAIRLIS$-WHEN-LENGTHS-EQUAL
 (48 6 (:REWRITE STRIP-CDRS-OF-PAIRLIS$2))
 (42 30 (:REWRITE DEFAULT-CDR))
 (30 30 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (30 6 (:DEFINITION TRUE-LISTP))
 (25 21 (:REWRITE DEFAULT-CAR))
 (20 10 (:REWRITE DEFAULT-+-2))
 (10 10 (:REWRITE DEFAULT-+-1))
 (8 4 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (4 4 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 )
(SYMBOLP-OF-CAR-OF-EXPAND-LAMBDAS-IN-TERM
 (11 5 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (5 5 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (3 3 (:REWRITE DEFAULT-CDR))
 )
(CONSP-OF-EXPAND-LAMBDAS-IN-TERM
 (5 5 (:REWRITE DEFAULT-CAR))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 1 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (1 1 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 )
(NOT-EQUAL-OF-QUORE-AND-CAR-OF-EXPAND-LAMBDAS-IN-TERM
 (8 7 (:REWRITE DEFAULT-CAR))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 1 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (1 1 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (1 1 (:TYPE-PRESCRIPTION EXPAND-LAMBDAS-IN-TERMS))
 )
(FNS-IN-TERM
 (513 215 (:REWRITE DEFAULT-+-2))
 (302 215 (:REWRITE DEFAULT-+-1))
 (152 38 (:DEFINITION INTEGER-ABS))
 (152 19 (:DEFINITION LENGTH))
 (95 19 (:DEFINITION LEN))
 (62 45 (:REWRITE DEFAULT-<-2))
 (50 45 (:REWRITE DEFAULT-<-1))
 (38 38 (:REWRITE DEFAULT-UNARY-MINUS))
 (19 19 (:TYPE-PRESCRIPTION LEN))
 (19 19 (:REWRITE DEFAULT-REALPART))
 (19 19 (:REWRITE DEFAULT-NUMERATOR))
 (19 19 (:REWRITE DEFAULT-IMAGPART))
 (19 19 (:REWRITE DEFAULT-DENOMINATOR))
 (19 19 (:REWRITE DEFAULT-COERCE-2))
 (19 19 (:REWRITE DEFAULT-COERCE-1))
 (14 7 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (7 7 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (3 3 (:TYPE-PRESCRIPTION TRUE-LISTP))
 )
(FLAG-FNS-IN-TERM
 (787 347 (:REWRITE DEFAULT-+-2))
 (486 347 (:REWRITE DEFAULT-+-1))
 (264 66 (:DEFINITION INTEGER-ABS))
 (264 33 (:DEFINITION LENGTH))
 (165 33 (:DEFINITION LEN))
 (108 81 (:REWRITE DEFAULT-<-2))
 (94 81 (:REWRITE DEFAULT-<-1))
 (66 66 (:REWRITE DEFAULT-UNARY-MINUS))
 (33 33 (:TYPE-PRESCRIPTION LEN))
 (33 33 (:REWRITE DEFAULT-REALPART))
 (33 33 (:REWRITE DEFAULT-NUMERATOR))
 (33 33 (:REWRITE DEFAULT-IMAGPART))
 (33 33 (:REWRITE DEFAULT-DENOMINATOR))
 (33 33 (:REWRITE DEFAULT-COERCE-2))
 (33 33 (:REWRITE DEFAULT-COERCE-1))
 (20 10 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (10 10 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(FLAG-FNS-IN-TERM-EQUIVALENCES)
(FLAG-LEMMA-FOR-SYMBOL-LISTP-OF-FNS-IN-TERM
 (260 16 (:DEFINITION UNION-EQUAL))
 (255 255 (:REWRITE DEFAULT-CDR))
 (211 211 (:REWRITE DEFAULT-CAR))
 (140 70 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (101 101 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (66 33 (:REWRITE PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP-CHEAP))
 (62 31 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (58 29 (:REWRITE DEFAULT-+-2))
 (48 48 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (33 33 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (32 16 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (32 16 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (30 30 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (29 29 (:REWRITE DEFAULT-+-1))
 (28 16 (:REWRITE MEMBER-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (16 16 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (16 16 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (16 16 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 (10 8 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (6 2 (:DEFINITION TRUE-LIST-FIX))
 )
(SYMBOL-LISTP-OF-FNS-IN-TERM)
(SYMBOL-LISTP-OF-FNS-IN-TERMS)
(FLAG-LEMMA-FOR-TRUE-LISTP-OF-FNS-IN-TERM
 (138 69 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (138 69 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (123 69 (:REWRITE MEMBER-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (96 48 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (84 84 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (72 36 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (69 69 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (69 69 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (69 69 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 )
(TRUE-LISTP-OF-FNS-IN-TERM)
(TRUE-LISTP-OF-FNS-IN-TERMS)
(FNS-IN-TERM
 (358 11 (:DEFINITION SYMBOL-LISTP))
 (236 11 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (228 228 (:REWRITE DEFAULT-CDR))
 (220 110 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (188 188 (:REWRITE DEFAULT-CAR))
 (153 153 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (111 3 (:DEFINITION FNS-IN-TERM))
 (102 6 (:DEFINITION UNION-EQUAL))
 (86 43 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (76 4 (:REWRITE SYMBOL-LISTP-OF-FNS-IN-TERMS))
 (70 35 (:REWRITE DEFAULT-+-2))
 (66 33 (:REWRITE PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP-CHEAP))
 (60 3 (:DEFINITION FNS-IN-TERMS))
 (50 24 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (35 35 (:REWRITE DEFAULT-+-1))
 (33 33 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (31 31 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (18 18 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (18 12 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (16 16 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (12 6 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (12 6 (:REWRITE MEMBER-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (12 6 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (6 6 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (6 6 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (6 6 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-ADD-TO-SET-EQUAL-TYPE))
 )
(FNS-IN-TERMS-OF-TRUE-LIST-FIX
 (340 20 (:DEFINITION UNION-EQUAL))
 (111 3 (:DEFINITION FNS-IN-TERM))
 (76 75 (:REWRITE DEFAULT-CDR))
 (71 70 (:REWRITE DEFAULT-CAR))
 (60 60 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (40 40 (:TYPE-PRESCRIPTION FNS-IN-TERM))
 (40 20 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (40 20 (:REWRITE MEMBER-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (40 20 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (24 12 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (20 20 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (20 20 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (20 20 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 (18 18 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (12 6 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 )
(NOT-MEMBER-EQUAL-OF-FNS-IN-TERM-OF-CDR-OF-ASSOC-EQUAL
 (340 20 (:DEFINITION UNION-EQUAL))
 (216 8 (:DEFINITION FNS-IN-TERM))
 (148 74 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (120 99 (:REWRITE DEFAULT-CDR))
 (114 99 (:REWRITE DEFAULT-CAR))
 (97 97 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (72 36 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (72 36 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (48 48 (:TYPE-PRESCRIPTION FNS-IN-TERM))
 (46 23 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (39 39 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (39 39 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 (36 36 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (26 26 (:TYPE-PRESCRIPTION FNS-IN-TERMS))
 )
(FLAG-LEMMA-FOR-NOT-MEMBER-EQUAL-OF-FNS-IN-TERM-OF-SUBLIS-VAR-SIMPLE
 (1700 100 (:DEFINITION UNION-EQUAL))
 (699 654 (:REWRITE DEFAULT-CDR))
 (675 620 (:REWRITE DEFAULT-CAR))
 (360 180 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (340 170 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (340 170 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (305 305 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (230 115 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (218 218 (:TYPE-PRESCRIPTION FNS-IN-TERM))
 (183 183 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (183 183 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 (170 170 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (160 4 (:REWRITE CDR-OF-SUBLIS-VAR-SIMPLE))
 (147 147 (:TYPE-PRESCRIPTION FNS-IN-TERMS))
 (124 4 (:REWRITE CAR-OF-SUBLIS-VAR-SIMPLE))
 (121 7 (:DEFINITION SYMBOL-LISTP))
 (108 18 (:DEFINITION STRIP-CDRS))
 (68 68 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (58 29 (:REWRITE PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP-CHEAP))
 (54 27 (:REWRITE DEFAULT-+-2))
 (42 7 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (38 18 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (36 36 (:TYPE-PRESCRIPTION STRIP-CDRS))
 (29 29 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (28 28 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (27 27 (:REWRITE DEFAULT-+-1))
 (24 8 (:DEFINITION ATOM))
 (20 10 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (13 13 (:REWRITE CAR-OF-SUBLIS-VAR-SIMPLE-LST))
 (7 7 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (6 2 (:TYPE-PRESCRIPTION TRUE-LISTP-OF-ADD-TO-SET-EQUAL-TYPE))
 (6 2 (:REWRITE CONSP-OF-SUBLIS-VAR-SIMPLE))
 (4 2 (:TYPE-PRESCRIPTION UNION-EQUAL))
 (2 2 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION CONSP-OF-ADD-TO-SET-EQUAL-TYPE))
 )
(NOT-MEMBER-EQUAL-OF-FNS-IN-TERM-OF-SUBLIS-VAR-SIMPLE)
(NOT-MEMBER-EQUAL-OF-FNS-IN-TERM-OF-SUBLIS-VAR-SIMPLE-LST)
(FLAG-LEMMA-FOR-NOT-MEMBER-EQUAL-OF-FNS-IN-TERM-OF-EXPAND-LAMBDAS-IN-TERM
 (1041 958 (:REWRITE DEFAULT-CDR))
 (986 58 (:DEFINITION UNION-EQUAL))
 (907 854 (:REWRITE DEFAULT-CAR))
 (892 446 (:TYPE-PRESCRIPTION SYMBOLP-OF-CAR-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-TYPE))
 (640 640 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (626 5 (:REWRITE NOT-CONSP-OF-CAR-OF-EXPAND-LAMBDAS-IN-TERM))
 (498 26 (:DEFINITION SYMBOL-LISTP))
 (380 190 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (345 27 (:REWRITE CAR-OF-EXPAND-LAMBDAS-IN-TERMS))
 (249 249 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (219 18 (:DEFINITION PAIRLIS$))
 (216 108 (:REWRITE DEFAULT-+-2))
 (200 100 (:REWRITE NOT-MEMBER-EQUAL-WHEN-NOT-MEMBER-EQUAL-OF-CDR-CHEAP))
 (200 100 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-CDR-CHEAP))
 (168 26 (:REWRITE SYMBOL-LISTP-OF-CDR))
 (162 81 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (148 74 (:REWRITE PSEUDO-TERM-LISTP-WHEN-SYMBOL-LISTP-CHEAP))
 (133 133 (:TYPE-PRESCRIPTION FNS-IN-TERM))
 (120 10 (:REWRITE CONSP-OF-EXPAND-LAMBDAS-IN-TERM))
 (118 2 (:REWRITE CDR-OF-SUBLIS-VAR-SIMPLE))
 (112 8 (:DEFINITION ASSOC-EQUAL))
 (109 109 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-WHEN-NOT-EQUAL-CAR))
 (109 109 (:REWRITE MEMBER-EQUAL-OF-CONSTANT-TRIM))
 (108 108 (:REWRITE DEFAULT-+-1))
 (100 100 (:REWRITE MEMBER-EQUAL-WHEN-MEMBER-EQUAL-OF-MEMBER-EQUAL))
 (90 2 (:REWRITE CAR-OF-SUBLIS-VAR-SIMPLE))
 (84 7 (:REWRITE NOT-EQUAL-OF-QUORE-AND-CAR-OF-EXPAND-LAMBDAS-IN-TERM))
 (77 77 (:TYPE-PRESCRIPTION FNS-IN-TERMS))
 (76 76 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (74 74 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (52 4 (:DEFINITION ATOM))
 (44 32 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (41 1 (:DEFINITION TRUE-LIST-FIX))
 (36 36 (:REWRITE CONSP-OF-EXPAND-LAMBDAS-IN-TERMS))
 (32 32 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (16 16 (:TYPE-PRESCRIPTION PAIRLIS$))
 (13 1 (:REWRITE CONSP-OF-SUBLIS-VAR-SIMPLE))
 (8 4 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 )
(NOT-MEMBER-EQUAL-OF-FNS-IN-TERM-OF-EXPAND-LAMBDAS-IN-TERM)
(NOT-MEMBER-EQUAL-OF-FNS-IN-TERMS-OF-EXPAND-LAMBDAS-IN-TERMS)
