(CTERM-EV-DISJOIN-CONS)
(CTERM-EV-DISJOIN-WHEN-CONSP)
(CTERM-EV-DISJOIN-ATOM
 (1 1 (:REWRITE CTERM-EV-OF-IF-CALL))
 )
(CTERM-EV-DISJOIN-APPEND
 (23 23 (:REWRITE CTERM-EV-OF-QUOTE))
 (23 23 (:REWRITE CTERM-EV-OF-IF-CALL))
 )
(CTERM-EV-CONJOIN-CONS)
(CTERM-EV-CONJOIN-WHEN-CONSP)
(CTERM-EV-CONJOIN-ATOM
 (1 1 (:REWRITE CTERM-EV-OF-IF-CALL))
 )
(CTERM-EV-CONJOIN-APPEND
 (23 23 (:REWRITE CTERM-EV-OF-QUOTE))
 (23 23 (:REWRITE CTERM-EV-OF-IF-CALL))
 )
(CTERM-EV-CONJOIN-CLAUSES-CONS
 (100 50 (:DEFINITION DISJOIN))
 (50 50 (:DEFINITION DISJOIN2))
 (7 7 (:REWRITE CTERM-EV-DISJOIN-ATOM))
 (5 5 (:REWRITE CTERM-EV-CONJOIN-ATOM))
 )
(CTERM-EV-CONJOIN-CLAUSES-WHEN-CONSP
 (24 24 (:REWRITE CTERM-EV-OF-QUOTE))
 (24 24 (:REWRITE CTERM-EV-OF-IF-CALL))
 (18 9 (:DEFINITION DISJOIN))
 (9 9 (:REWRITE CTERM-EV-DISJOIN-ATOM))
 (9 9 (:DEFINITION DISJOIN2))
 )
(CTERM-EV-CONJOIN-CLAUSES-ATOM
 (1 1 (:REWRITE CTERM-EV-OF-IF-CALL))
 )
(CTERM-EV-CONJOIN-CLAUSES-APPEND
 (65 65 (:REWRITE CTERM-EV-OF-QUOTE))
 (65 65 (:REWRITE CTERM-EV-OF-IF-CALL))
 (24 12 (:DEFINITION DISJOIN))
 (12 12 (:REWRITE CTERM-EV-DISJOIN-ATOM))
 (12 12 (:DEFINITION DISJOIN2))
 )
(MATCH-SIMPLE-EQUALITY-HYP)
(MATCH-SIMPLE-EQUALITY-HYP-CORRECT
 (120 120 (:REWRITE DEFAULT-CDR))
 (90 90 (:REWRITE DEFAULT-CAR))
 (20 4 (:DEFINITION ASSOC-EQUAL))
 (8 8 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (8 8 (:REWRITE CTERM-EV-OF-IF-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (6 6 (:REWRITE CTERM-EV-OF-LAMBDA))
 (6 6 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (6 6 (:REWRITE CTERM-EV-OF-<-CALL))
 )
(COLLECT-SIMPLE-EQUALITY-HYPS)
(CTERM-EV-SUBST-ALISTP)
(LOOKUP-IN-CTERM-EV-SUBST-ALISTP
 (116 116 (:REWRITE DEFAULT-CAR))
 (34 34 (:REWRITE DEFAULT-CDR))
 (17 17 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (17 17 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-QUOTE))
 (17 17 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-LAMBDA))
 (17 17 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-IF-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-<-CALL))
 )
(TERM-IND
 (1 1 (:TYPE-PRESCRIPTION TERM-IND))
 )
(TERM-FLG
 (4 2 (:TYPE-PRESCRIPTION RETURN-LAST))
 (2 2 (:TYPE-PRESCRIPTION THROW-NONEXEC-ERROR))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(TERM-FLG-EQUIVALENCES)
(ASSOC-APPEND-WHEN-KEY
 (122 110 (:REWRITE DEFAULT-CAR))
 (54 6 (:REWRITE ASSOC-OF-APPEND-WHEN-ALISTP-X))
 (48 24 (:TYPE-PRESCRIPTION TRUE-LISTP-APPEND))
 (41 35 (:REWRITE DEFAULT-CDR))
 (36 6 (:DEFINITION ALISTP))
 (24 24 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (24 24 (:TYPE-PRESCRIPTION BINARY-APPEND))
 )
(FLAG-LEMMA-FOR-EVAL-UNDER-APPEND-CTERM-EV-SUBST-ALIST
 (330 298 (:REWRITE DEFAULT-CAR))
 (316 8 (:DEFINITION CTERM-EV-ALIST))
 (159 159 (:REWRITE DEFAULT-CDR))
 (99 99 (:TYPE-PRESCRIPTION KWOTE-LST))
 (82 6 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (75 15 (:DEFINITION LEN))
 (68 68 (:TYPE-PRESCRIPTION LEN))
 (49 25 (:REWRITE PSEUDO-TERMP-OPENER))
 (43 43 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (40 8 (:DEFINITION BINARY-APPEND))
 (36 30 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (36 30 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-LAMBDA))
 (36 30 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-IF-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (36 30 (:REWRITE CTERM-EV-OF-<-CALL))
 (32 32 (:REWRITE CAR-CONS))
 (30 15 (:REWRITE DEFAULT-+-2))
 (24 5 (:DEFINITION SYMBOL-LISTP))
 (23 23 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (19 5 (:DEFINITION TRUE-LISTP))
 (17 17 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (16 16 (:TYPE-PRESCRIPTION CTERM-EV-ALIST))
 (15 15 (:REWRITE DEFAULT-+-1))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (8 2 (:DEFINITION KWOTE-LST))
 (2 2 (:DEFINITION KWOTE))
 )
(EVAL-UNDER-APPEND-CTERM-EV-SUBST-ALIST)
(EVAL-LIST-UNDER-APPEND-CTERM-EV-SUBST-ALIST)
(NORMALIZE-FORMALS/ACTUALS
 (59 30 (:REWRITE DEFAULT-+-2))
 (53 53 (:REWRITE DEFAULT-CDR))
 (40 40 (:REWRITE DEFAULT-CAR))
 (30 30 (:REWRITE DEFAULT-+-1))
 (12 4 (:DEFINITION MEMBER-EQUAL))
 )
(NORMALIZE-FORMALS/ACTUALS-CORRECT
 (20 20 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (20 20 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-QUOTE))
 (20 20 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-LAMBDA))
 (20 20 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-IF-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (20 20 (:REWRITE CTERM-EV-OF-<-CALL))
 )
(FLAG-LEMMA-FOR-EVAL-UNDER-NORMALIZE-FORMALS/ACTUALS
 (1114 67 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (783 67 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (530 41 (:REWRITE PSEUDO-TERMP-CAR))
 (451 419 (:REWRITE DEFAULT-CAR))
 (314 314 (:REWRITE DEFAULT-CDR))
 (219 219 (:TYPE-PRESCRIPTION LEN))
 (210 42 (:DEFINITION LEN))
 (186 21 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (143 13 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (135 77 (:REWRITE PSEUDO-TERMP-OPENER))
 (114 114 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (99 99 (:TYPE-PRESCRIPTION KWOTE-LST))
 (95 19 (:DEFINITION PAIRLIS$))
 (84 42 (:REWRITE DEFAULT-+-2))
 (75 14 (:DEFINITION SYMBOL-LISTP))
 (74 74 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (61 14 (:DEFINITION TRUE-LISTP))
 (58 58 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (44 44 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (42 42 (:REWRITE DEFAULT-+-1))
 (32 32 (:REWRITE CAR-CONS))
 (18 12 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (18 12 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-LAMBDA))
 (18 12 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-IF-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (18 12 (:REWRITE CTERM-EV-OF-<-CALL))
 (14 2 (:DEFINITION ASSOC-EQUAL))
 (8 2 (:DEFINITION KWOTE-LST))
 (4 4 (:TYPE-PRESCRIPTION PAIRLIS$))
 (2 2 (:DEFINITION KWOTE))
 )
(EVAL-UNDER-NORMALIZE-FORMALS/ACTUALS)
(EVAL-LIST-UNDER-NORMALIZE-FORMALS/ACTUALS)
(NORMALIZE-FORMALS/ACTUALS-PSEUDO-TERM-LISTP
 (77 11 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (53 53 (:REWRITE DEFAULT-CAR))
 (47 47 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (47 47 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (44 44 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (33 33 (:REWRITE DEFAULT-CDR))
 (33 22 (:REWRITE PSEUDO-TERMP-OPENER))
 (22 22 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 )
(NORMALIZE-FORMALS/ACTUALS-SYMBOL-LISTP
 (50 50 (:REWRITE DEFAULT-CAR))
 (31 31 (:REWRITE DEFAULT-CDR))
 )
(NORMALIZE-FORMALS/ACTUALS-TYPE-0
 (28 28 (:REWRITE DEFAULT-CAR))
 (24 24 (:REWRITE DEFAULT-CDR))
 (10 5 (:DEFINITION TRUE-LISTP))
 )
(NORMALIZE-FORMALS/ACTUALS-TYPE-1
 (28 28 (:REWRITE DEFAULT-CAR))
 (24 24 (:REWRITE DEFAULT-CDR))
 (10 5 (:DEFINITION TRUE-LISTP))
 )
(LEN-OF-NORMALIZE-FORMALS/ACTUALS
 (56 54 (:REWRITE DEFAULT-CDR))
 (50 50 (:REWRITE DEFAULT-CAR))
 (40 20 (:REWRITE DEFAULT-+-2))
 (20 20 (:REWRITE DEFAULT-+-1))
 )
(NORMALIZE-FORMALS/ACTUALS-NONNIL-SYMBOLS
 (37 36 (:REWRITE DEFAULT-CAR))
 (28 27 (:REWRITE DEFAULT-CDR))
 )
(NORMALIZE-FORMALS/ACTUALS-NO-MEMBERS-OF-SEEN-FORMALS
 (48 47 (:REWRITE DEFAULT-CAR))
 (36 35 (:REWRITE DEFAULT-CDR))
 )
(NORMALIZE-FORMALS/ACTUALS-NO-DUPLICATE-VARS
 (45 44 (:REWRITE DEFAULT-CAR))
 (44 42 (:REWRITE DEFAULT-CDR))
 )
(COLLECT-SIMPLE-EQUALITY-HYPS-SUBST-CORRECT
 (745 149 (:DEFINITION ASSOC-EQUAL))
 (564 466 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (564 466 (:REWRITE CTERM-EV-OF-IF-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (498 438 (:REWRITE CTERM-EV-OF-LAMBDA))
 (498 438 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (498 438 (:REWRITE CTERM-EV-OF-<-CALL))
 )
(BINDINGS-TO-CONST-ALIST
 (81 3 (:DEFINITION PSEUDO-TERM-LISTP))
 (32 16 (:REWRITE DEFAULT-+-2))
 (31 31 (:REWRITE DEFAULT-CDR))
 (21 3 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (18 3 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (18 3 (:REWRITE PSEUDO-TERMP-CAR))
 (16 16 (:REWRITE DEFAULT-+-1))
 (15 15 (:REWRITE DEFAULT-CAR))
 (12 12 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (12 12 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (12 12 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (9 6 (:REWRITE PSEUDO-TERMP-OPENER))
 (6 6 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (4 2 (:DEFINITION TRUE-LISTP))
 )
(CTERM-EV-SUBST-ALISTP-CONS-NON-KEY
 (572 564 (:REWRITE DEFAULT-CAR))
 (205 197 (:REWRITE DEFAULT-CDR))
 (34 34 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (34 34 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-LAMBDA))
 (34 34 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-IF-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (34 34 (:REWRITE CTERM-EV-OF-<-CALL))
 (24 24 (:REWRITE CTERM-EV-OF-VARIABLE))
 )
(QUOTE-LISTP-STRIP-CDRS-OF-BINDINGS-TO-CONST-ALIST
 (85 83 (:REWRITE DEFAULT-CAR))
 (72 70 (:REWRITE DEFAULT-CDR))
 )
(NOT-ASSOC-BINDINGS-TO-CONST-ALIST-WHEN-NOT-MEMBER-FORMALS
 (104 103 (:REWRITE DEFAULT-CAR))
 (51 50 (:REWRITE DEFAULT-CDR))
 )
(NOT-ASSOC-BINDINGS-TO-CONST-ALIST-NIL
 (108 12 (:REWRITE NOT-ASSOC-BINDINGS-TO-CONST-ALIST-WHEN-NOT-MEMBER-FORMALS))
 (93 92 (:REWRITE DEFAULT-CAR))
 (57 56 (:REWRITE DEFAULT-CDR))
 )
(BINDINGS-TO-CONST-ALIST-CORRECT
 (501 39 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (406 392 (:REWRITE DEFAULT-CAR))
 (325 322 (:REWRITE DEFAULT-CDR))
 (234 39 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (183 20 (:REWRITE PSEUDO-TERMP-CAR))
 (95 95 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (69 7 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (67 34 (:REWRITE DEFAULT-+-2))
 (66 40 (:REWRITE PSEUDO-TERMP-OPENER))
 (39 39 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (34 34 (:REWRITE DEFAULT-+-1))
 (18 3 (:DEFINITION STRIP-CDRS))
 (17 17 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (17 17 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-LAMBDA))
 (17 17 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-IF-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (17 17 (:REWRITE CTERM-EV-OF-<-CALL))
 (17 4 (:DEFINITION TRUE-LISTP))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LISTP))
 )
(DEEP-SUBSTITUTE-TERM
 (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 (: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))
 (4 4 (:LINEAR ACL2-COUNT-CAR-CDR-LINEAR))
 )
(DEEP-SUBSTITUTE-FLG
 (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 (: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))
 (4 4 (:LINEAR ACL2-COUNT-CAR-CDR-LINEAR))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(DEEP-SUBSTITUTE-FLG-EQUIVALENCES)
(FLAG-LEMMA-FOR-TRUE-LISTP-DEEP-SUBSTITUTE-TERM-LIST
 (784 8 (:DEFINITION DEEP-SUBSTITUTE-TERM))
 (370 274 (:REWRITE DEFAULT-CDR))
 (352 8 (:DEFINITION BINDINGS-TO-CONST-ALIST))
 (299 251 (:REWRITE DEFAULT-CAR))
 (168 168 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-1))
 (88 8 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (64 24 (:DEFINITION QUOTEP))
 (40 8 (:DEFINITION QUOTE-LISTP))
 (40 8 (:DEFINITION LEN))
 (40 8 (:DEFINITION ASSOC-EQUAL))
 (32 16 (:DEFINITION MEMBER-EQUAL))
 (24 24 (:TYPE-PRESCRIPTION LEN))
 (16 16 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-0))
 (16 8 (:REWRITE DEFAULT-+-2))
 (8 8 (:TYPE-PRESCRIPTION QUOTE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (8 8 (:TYPE-PRESCRIPTION BINDINGS-TO-CONST-ALIST))
 (8 8 (:REWRITE DEFAULT-+-1))
 )
(TRUE-LISTP-DEEP-SUBSTITUTE-TERM-LIST)
(FLAG-LEMMA-FOR-LEN-OF-DEEP-SUBSTITUTE-TERM-LIST
 (675 5 (:DEFINITION DEEP-SUBSTITUTE-TERM))
 (321 184 (:REWRITE DEFAULT-CDR))
 (260 155 (:REWRITE DEFAULT-CAR))
 (220 5 (:DEFINITION BINDINGS-TO-CONST-ALIST))
 (105 105 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-1))
 (100 5 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (58 29 (:REWRITE DEFAULT-+-2))
 (50 15 (:DEFINITION QUOTEP))
 (35 5 (:DEFINITION QUOTE-LISTP))
 (29 29 (:REWRITE DEFAULT-+-1))
 (25 5 (:DEFINITION ASSOC-EQUAL))
 (20 10 (:DEFINITION MEMBER-EQUAL))
 (10 10 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-0))
 (5 5 (:TYPE-PRESCRIPTION QUOTE-LISTP))
 (5 5 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (5 5 (:TYPE-PRESCRIPTION BINDINGS-TO-CONST-ALIST))
 )
(LEN-OF-DEEP-SUBSTITUTE-TERM-LIST)
(BINDINGS-TO-CONST-ALIST-PSEUDO-TERM-VAL-ALISTP
 (1048 69 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (410 69 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (240 240 (:REWRITE DEFAULT-CAR))
 (231 231 (:REWRITE DEFAULT-CDR))
 (171 15 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (154 154 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (151 151 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (140 28 (:DEFINITION LEN))
 (136 136 (:TYPE-PRESCRIPTION LEN))
 (115 64 (:REWRITE PSEUDO-TERMP-OPENER))
 (61 61 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (56 28 (:REWRITE DEFAULT-+-2))
 (45 9 (:DEFINITION SYMBOL-LISTP))
 (41 10 (:DEFINITION TRUE-LISTP))
 (34 17 (:REWRITE PSEUDO-TERM-VAL-ALISTP-OF-ATOM))
 (33 33 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (28 28 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (28 28 (:REWRITE DEFAULT-+-1))
 (17 17 (:TYPE-PRESCRIPTION BINDINGS-TO-CONST-ALIST))
 )
(PSEUDO-TERMP-OF-CONS-TERM1-MV2)
(FLAG-LEMMA-FOR-PSEUDO-TERMP-DEEP-SUBSTITUTE-TERM
 (7309 5590 (:REWRITE DEFAULT-CDR))
 (6558 5442 (:REWRITE DEFAULT-CAR))
 (2240 112 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (1839 1817 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (1779 1779 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (1342 671 (:REWRITE DEFAULT-+-2))
 (1014 1014 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (671 671 (:REWRITE DEFAULT-+-1))
 (477 194 (:DEFINITION MEMBER-EQUAL))
 (221 17 (:REWRITE NOT-ASSOC-BINDINGS-TO-CONST-ALIST-WHEN-NOT-MEMBER-FORMALS))
 (51 51 (:REWRITE PSEUDO-TERM-VAL-ALISTP-OF-ATOM))
 (12 12 (:TYPE-PRESCRIPTION CONS-TERM))
 (1 1 (:REWRITE CONS-TERM1-MV2-WHEN-UNCHANGED))
 )
(PSEUDO-TERMP-DEEP-SUBSTITUTE-TERM)
(PSEUDO-TERM-LISTP-DEEP-SUBSTITUTE-TERM-LIST)
(PSEUDO-TERM-VAL-ALISTP-IMPL-ALISTP
 (432 16 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (408 32 (:REWRITE PSEUDO-TERMP-CAR))
 (368 56 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (146 146 (:REWRITE DEFAULT-CAR))
 (138 53 (:REWRITE PSEUDO-TERMP-OPENER))
 (132 132 (:REWRITE DEFAULT-CDR))
 (120 24 (:DEFINITION LEN))
 (104 104 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (102 102 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (48 24 (:REWRITE DEFAULT-+-2))
 (45 45 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (24 24 (:REWRITE DEFAULT-+-1))
 (24 8 (:DEFINITION SYMBOL-LISTP))
 (16 8 (:DEFINITION TRUE-LISTP))
 )
(UNQUOTE-GUARD-WHEN-PSEUDO-TERM-LISTP
 (54 2 (:DEFINITION PSEUDO-TERM-LISTP))
 (14 2 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (13 13 (:REWRITE DEFAULT-CAR))
 (12 2 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (12 2 (:REWRITE PSEUDO-TERMP-CAR))
 (11 5 (:REWRITE PSEUDO-TERMP-OPENER))
 (8 8 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (8 8 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (5 5 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (5 5 (:REWRITE DEFAULT-CDR))
 )
(DEEP-SUBSTITUTE-TERM
 (1629 641 (:REWRITE DEFAULT-CAR))
 (1309 576 (:REWRITE DEFAULT-CDR))
 (901 129 (:REWRITE PSEUDO-TERMP-CAR))
 (646 32 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (330 167 (:REWRITE PSEUDO-TERMP-OPENER))
 (240 120 (:REWRITE DEFAULT-+-2))
 (213 213 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (159 159 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (120 120 (:REWRITE DEFAULT-+-1))
 (120 6 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (77 11 (:DEFINITION QUOTE-LISTP))
 (76 76 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (44 1 (:DEFINITION BINDINGS-TO-CONST-ALIST))
 (21 21 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-1))
 (15 5 (:DEFINITION DEEP-SUBSTITUTE-TERM-LIST))
 (14 14 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-0))
 (13 13 (:REWRITE PSEUDO-TERM-VAL-ALISTP-OF-ATOM))
 (9 7 (:DEFINITION MEMBER-EQUAL))
 (1 1 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 )
(DEEP-SUBSTITUTE-TERM/ALIST
 (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 (: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))
 (4 4 (:LINEAR ACL2-COUNT-CAR-CDR-LINEAR))
 )
(DEEP-SUBSTITUTE/ALIST-FLG
 (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 (: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))
 (4 4 (:LINEAR ACL2-COUNT-CAR-CDR-LINEAR))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(DEEP-SUBSTITUTE/ALIST-FLG-EQUIVALENCES)
(FLAG-LEMMA-FOR-DEEP-SUBSTITUTE-TERM/ALIST-CORRECT
 (7325 4211 (:REWRITE DEFAULT-CDR))
 (6068 4235 (:REWRITE DEFAULT-CAR))
 (4588 242 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (1342 22 (:REWRITE EVAL-LIST-UNDER-NORMALIZE-FORMALS/ACTUALS))
 (1100 44 (:DEFINITION PSEUDO-TERM-LISTP))
 (944 399 (:DEFINITION MEMBER-EQUAL))
 (638 22 (:REWRITE NORMALIZE-FORMALS/ACTUALS-PSEUDO-TERM-LISTP))
 (429 33 (:REWRITE NOT-ASSOC-BINDINGS-TO-CONST-ALIST-WHEN-NOT-MEMBER-FORMALS))
 (371 53 (:DEFINITION PAIRLIS$))
 (308 308 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (308 44 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (264 264 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (212 53 (:REWRITE CTERM-EV-LST-OF-CONS))
 (212 53 (:REWRITE CTERM-EV-LST-OF-ATOM))
 (152 76 (:REWRITE DEFAULT-+-2))
 (132 88 (:REWRITE PSEUDO-TERMP-OPENER))
 (110 88 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (88 88 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (88 88 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (88 44 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (88 44 (:REWRITE PSEUDO-TERMP-CAR))
 (76 76 (:REWRITE DEFAULT-+-1))
 )
(DEEP-SUBSTITUTE-TERM/ALIST-CORRECT)
(DEEP-SUBSTITUTE-TERM-LIST/ALIST-CORRECT)
(FLAG-LEMMA-FOR-DEEP-SUBSTITUTE-TERM-CORRECT
 (249752 175699 (:REWRITE DEFAULT-CDR))
 (215918 157957 (:REWRITE DEFAULT-CAR))
 (183641 13818 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (57000 2850 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (37174 18587 (:REWRITE DEFAULT-+-2))
 (34380 34380 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (22851 4181 (:DEFINITION SYMBOL-LISTP))
 (20446 20446 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (18587 18587 (:REWRITE DEFAULT-+-1))
 (11250 5596 (:DEFINITION MEMBER-EQUAL))
 (3195 2692 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (3127 2669 (:REWRITE CTERM-EV-OF-<-CALL))
 (406 406 (:REWRITE PSEUDO-TERM-VAL-ALISTP-OF-ATOM))
 (383 63 (:DEFINITION PAIRLIS$))
 (312 24 (:REWRITE NOT-ASSOC-BINDINGS-TO-CONST-ALIST-WHEN-NOT-MEMBER-FORMALS))
 (299 299 (:TYPE-PRESCRIPTION KWOTE-LST))
 (69 3 (:REWRITE NORMALIZE-FORMALS/ACTUALS-CORRECT))
 (32 8 (:DEFINITION KWOTE-LST))
 (8 8 (:DEFINITION KWOTE))
 (6 6 (:TYPE-PRESCRIPTION PAIRLIS$))
 (1 1 (:REWRITE CONS-TERM1-MV2-WHEN-UNCHANGED))
 )
(DEEP-SUBSTITUTE-TERM-CORRECT)
(DEEP-SUBSTITUTE-TERM-LIST-CORRECT)
(DEEP-SUBSTITUTE-TERM-DISJOIN-CORRECT
 (4436 32 (:DEFINITION PSEUDO-TERMP))
 (3370 204 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (2814 21 (:DEFINITION DEEP-SUBSTITUTE-TERM))
 (1967 1520 (:REWRITE DEFAULT-CAR))
 (1954 1383 (:REWRITE DEFAULT-CDR))
 (1542 126 (:REWRITE PSEUDO-TERMP-CAR))
 (924 21 (:DEFINITION BINDINGS-TO-CONST-ALIST))
 (705 141 (:DEFINITION LEN))
 (572 60 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (441 441 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-1))
 (420 21 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (392 212 (:REWRITE PSEUDO-TERMP-OPENER))
 (358 358 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (282 141 (:REWRITE DEFAULT-+-2))
 (210 63 (:DEFINITION QUOTEP))
 (204 40 (:DEFINITION SYMBOL-LISTP))
 (200 200 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (195 39 (:DEFINITION ASSOC-EQUAL))
 (164 40 (:DEFINITION TRUE-LISTP))
 (152 152 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (147 21 (:DEFINITION QUOTE-LISTP))
 (141 141 (:REWRITE DEFAULT-+-1))
 (126 21 (:REWRITE LEN-OF-DEEP-SUBSTITUTE-TERM-LIST))
 (112 112 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (90 61 (:REWRITE CTERM-EV-DISJOIN-ATOM))
 (87 87 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (87 87 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-LAMBDA))
 (87 87 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-IF-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (87 87 (:REWRITE CTERM-EV-OF-<-CALL))
 (85 85 (:REWRITE CTERM-EV-OF-VARIABLE))
 (84 42 (:DEFINITION MEMBER-EQUAL))
 (42 42 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-0))
 (21 21 (:TYPE-PRESCRIPTION QUOTE-LISTP))
 (21 21 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (21 21 (:TYPE-PRESCRIPTION BINDINGS-TO-CONST-ALIST))
 (18 18 (:REWRITE PSEUDO-TERM-VAL-ALISTP-OF-ATOM))
 )
(PSEUDO-TERM-VAL-ALISTP-OF-COLLECT-SIMPLE-EQUALITY-HYPS
 (1649 1649 (:REWRITE DEFAULT-CDR))
 (1525 1525 (:REWRITE DEFAULT-CAR))
 (1015 1015 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (703 141 (:DEFINITION LEN))
 (667 667 (:TYPE-PRESCRIPTION LEN))
 (345 345 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (278 139 (:REWRITE DEFAULT-+-2))
 (223 55 (:DEFINITION TRUE-LISTP))
 (194 42 (:DEFINITION SYMBOL-LISTP))
 (144 144 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (139 139 (:REWRITE DEFAULT-+-1))
 (136 136 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (98 48 (:REWRITE PSEUDO-TERM-VAL-ALISTP-OF-ATOM))
 )
(CONSTANT-PROP-NON-EQUALITY-HYPS)
(CONSTANT-PROP-NON-EQUALITY-HYPS-CORRECT
 (8642 62 (:DEFINITION PSEUDO-TERMP))
 (6643 393 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (3002 243 (:REWRITE PSEUDO-TERMP-CAR))
 (1707 1707 (:REWRITE DEFAULT-CAR))
 (1425 1425 (:REWRITE DEFAULT-CDR))
 (1170 234 (:DEFINITION LEN))
 (1162 1162 (:TYPE-PRESCRIPTION LEN))
 (1086 118 (:REWRITE PSEUDO-TERMP-CADR-FROM-PSEUDO-TERM-LISTP))
 (741 404 (:REWRITE PSEUDO-TERMP-OPENER))
 (680 680 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (468 234 (:REWRITE DEFAULT-+-2))
 (402 78 (:DEFINITION SYMBOL-LISTP))
 (382 382 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (324 78 (:DEFINITION TRUE-LISTP))
 (302 302 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (234 234 (:REWRITE DEFAULT-+-1))
 (224 224 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (150 30 (:DEFINITION ASSOC-EQUAL))
 (133 133 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (133 133 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-LAMBDA))
 (133 133 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-IF-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (133 133 (:REWRITE CTERM-EV-OF-<-CALL))
 (131 131 (:REWRITE CTERM-EV-OF-VARIABLE))
 (122 89 (:REWRITE CTERM-EV-DISJOIN-ATOM))
 (33 33 (:TYPE-PRESCRIPTION CONSTANT-PROP-NON-EQUALITY-HYPS))
 (30 30 (:REWRITE PSEUDO-TERM-VAL-ALISTP-OF-ATOM))
 )
(CONSTANT-PROP-CP)
(CONSTANT-PROP-CP-CORRECT
 (178 1 (:DEFINITION CONSTANT-PROP-NON-EQUALITY-HYPS))
 (136 1 (:DEFINITION DEEP-SUBSTITUTE-TERM))
 (98 71 (:REWRITE DEFAULT-CDR))
 (82 61 (:REWRITE DEFAULT-CAR))
 (72 2 (:DEFINITION MATCH-SIMPLE-EQUALITY-HYP))
 (44 1 (:DEFINITION BINDINGS-TO-CONST-ALIST))
 (39 1 (:DEFINITION COLLECT-SIMPLE-EQUALITY-HYPS))
 (35 35 (:TYPE-PRESCRIPTION TRUE-LISTP-DEEP-SUBSTITUTE-TERM-LIST))
 (27 1 (:DEFINITION PSEUDO-TERM-LISTP))
 (21 21 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-1))
 (20 9 (:DEFINITION QUOTEP))
 (20 1 (:DEFINITION NORMALIZE-FORMALS/ACTUALS))
 (7 1 (:REWRITE PSEUDO-TERM-LISTP-CDR))
 (7 1 (:DEFINITION QUOTE-LISTP))
 (7 1 (:DEFINITION ASSOC-EQUAL))
 (6 1 (:REWRITE PSEUDO-TERMP-LIST-CDR))
 (6 1 (:REWRITE PSEUDO-TERMP-CAR))
 (6 1 (:REWRITE LEN-OF-DEEP-SUBSTITUTE-TERM-LIST))
 (5 1 (:DEFINITION LEN))
 (4 4 (:TYPE-PRESCRIPTION PSEUDO-TERMP))
 (4 4 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (4 4 (:REWRITE PSEUDO-TERM-LISTP-OF-ATOM))
 (4 2 (:DEFINITION MEMBER-EQUAL))
 (3 3 (:TYPE-PRESCRIPTION LEN))
 (3 2 (:REWRITE PSEUDO-TERMP-OPENER))
 (3 1 (:DEFINITION ALISTP))
 (2 2 (:TYPE-PRESCRIPTION NORMALIZE-FORMALS/ACTUALS-TYPE-0))
 (2 2 (:TYPE-PRESCRIPTION COLLECT-SIMPLE-EQUALITY-HYPS))
 (2 2 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (2 1 (:REWRITE DEFAULT-+-2))
 (1 1 (:TYPE-PRESCRIPTION QUOTE-LISTP))
 (1 1 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (1 1 (:TYPE-PRESCRIPTION BINDINGS-TO-CONST-ALIST))
 (1 1 (:REWRITE DEFAULT-+-1))
 (1 1 (:REWRITE CTERM-EV-OF-VARIABLE))
 (1 1 (:REWRITE CTERM-EV-OF-UNARY-/-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-UNARY---CALL))
 (1 1 (:REWRITE CTERM-EV-OF-SYMBOLP-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-SYMBOL-PACKAGE-NAME-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-SYMBOL-NAME-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-STRINGP-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-REALPART-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-RATIONALP-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-QUOTE))
 (1 1 (:REWRITE CTERM-EV-OF-NUMERATOR-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-NOT-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-LAMBDA))
 (1 1 (:REWRITE CTERM-EV-OF-INTERN-IN-PACKAGE-OF-SYMBOL-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-INTEGERP-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-IMAGPART-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-IF-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-EQUAL-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-DENOMINATOR-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-CONSP-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-CONS-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-COMPLEX-RATIONALP-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-COMPLEX-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-COERCE-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-CODE-CHAR-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-CHARACTERP-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-CHAR-CODE-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-CDR-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-CAR-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-BINARY-+-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-BINARY-*-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-ACL2-NUMBERP-CALL))
 (1 1 (:REWRITE CTERM-EV-OF-<-CALL))
 (1 1 (:REWRITE CTERM-EV-DISJOIN-ATOM))
 )
