(SYNTHETO::D-->S-TYPE
 (15 5 (:REWRITE DEFAULT-<-2))
 (15 5 (:REWRITE DEFAULT-<-1))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-TYPE)
(SYNTHETO::D-->S-LITERAL)
(SYNTHETO::D-->S-UNARY-OP)
(SYNTHETO::SYMBOLP-OF-D-->S-UNARY-OP)
(SYNTHETO::D-->S-BINARY-OP)
(SYNTHETO::SYMBOLP-OF-D-->S-BINARY-OP)
(SYNTHETO::D-->S-TYPED-VARS
 (54 3 (:REWRITE SYNTHETO::TYPED-VARIABLE-LISTP-WHEN-NOT-CONSP))
 (12 3 (:REWRITE SYNTHETO::TYPED-VARIABLEP-WHEN-MAYBE-TYPED-VARIABLEP))
 (11 5 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (11 5 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (11 5 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (5 1 (:REWRITE SYNTHETO::MAYBE-TYPED-VARIABLEP-WHEN-TYPED-VARIABLEP))
 (4 2 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (3 1 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (2 2 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (2 2 (:TYPE-PRESCRIPTION SYNTHETO::MAYBE-TYPED-VARIABLEP))
 (1 1 (:TYPE-PRESCRIPTION SYNTHETO::TYPED-VARIABLEP))
 (1 1 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::ALISTP-OF-D-->S-TYPED-VARS
 (229 9 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (200 8 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (152 8 (:REWRITE ALISTP-WHEN-ATOM))
 (50 22 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (50 22 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (50 22 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (28 28 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (28 28 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (28 28 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (22 22 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (22 22 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (22 22 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (22 22 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (22 22 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (22 22 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (22 22 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (22 22 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (22 22 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (22 22 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (22 22 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (22 22 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (17 17 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (16 8 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (8 8 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (3 1 (:REWRITE HONS-DUPLICITY-ALIST-P-OF-CONS))
 (2 2 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 (1 1 (:REWRITE CDR-CONS))
 )
(SYNTHETO::D-->S-EXPR
 (128 54 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (104 46 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (104 46 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (102 34 (:REWRITE DEFAULT-<-2))
 (102 34 (:REWRITE DEFAULT-<-1))
 (84 3 (:DEFINITION LEN))
 (78 78 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (78 78 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (74 74 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (54 54 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (54 54 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (54 54 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (54 54 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (54 54 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (54 54 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (54 54 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (54 54 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (54 54 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (54 54 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (54 54 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (54 54 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (54 3 (:REWRITE SYNTHETO::INITIALIZER-LISTP-WHEN-NOT-CONSP))
 (54 3 (:REWRITE SYNTHETO::EXPRESSION-LISTP-WHEN-NOT-CONSP))
 (54 3 (:REWRITE SYNTHETO::BRANCH-LISTP-WHEN-NOT-CONSP))
 (44 20 (:REWRITE DEFAULT-CAR))
 (31 2 (:REWRITE SYNTHETO::TYPEP-WHEN-MAYBE-TYPEP))
 (30 10 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (30 10 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (30 10 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (28 1 (:REWRITE SYNTHETO::MAYBE-TYPEP-WHEN-TYPEP))
 (19 19 (:REWRITE DEFAULT-CDR))
 (6 3 (:REWRITE DEFAULT-+-2))
 (4 2 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (3 3 (:TYPE-PRESCRIPTION SYNTHETO::MAYBE-TYPEP))
 (3 3 (:REWRITE DEFAULT-+-1))
 (2 2 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (2 2 (:LINEAR LOWER-BOUND-OF-LEN-WHEN-SUBLISTP))
 (2 2 (:LINEAR LISTPOS-UPPER-BOUND-STRONG-2))
 (2 2 (:LINEAR LEN-WHEN-PREFIXP))
 (1 1 (:REWRITE LOOKUP-EQUAL-WHEN-NOT-CONSP-CHEAP))
 (1 1 (:REWRITE LOOKUP-EQUAL-WHEN-NOT-ASSOC-EQUAL-CHEAP))
 (1 1 (:REWRITE LOOKUP-EQUAL-OF-CONS-SAFE))
 )
(SYNTHETO::D-->S-TRANSLATE-EXPRESSIONS-FLAG
 (102 34 (:REWRITE DEFAULT-<-2))
 (102 34 (:REWRITE DEFAULT-<-1))
 (21 7 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (21 7 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (21 7 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (14 14 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (14 14 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (14 14 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (8 8 (:REWRITE DEFAULT-CAR))
 (7 7 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (7 7 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (7 7 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (7 7 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (7 7 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (7 7 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (7 7 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (7 7 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (7 7 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (7 7 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (7 7 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (7 7 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (6 6 (:REWRITE DEFAULT-CDR))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(SYNTHETO::D-->S-TRANSLATE-EXPRESSIONS-FLAG-EQUIVALENCES)
(SYNTHETO::FLAG-LEMMA-FOR-RETURN-TYPE-OF-D-->S-EXPR-LIST.R
 (325 12 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (276 12 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (209 11 (:REWRITE ALISTP-WHEN-ATOM))
 (68 30 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (68 30 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (68 30 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (39 1 (:REWRITE HONS-DUPLICITY-ALIST-P-OF-CONS))
 (38 38 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (38 38 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (38 38 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (30 30 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (30 30 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (30 30 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (30 30 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (24 24 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (22 11 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (11 11 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (7 6 (:REWRITE DEFAULT-CDR))
 (6 1 (:DEFINITION NATP))
 (2 2 (:REWRITE DEFAULT-CAR))
 (1 1 (:REWRITE CDR-CONS))
 )
(SYNTHETO::RETURN-TYPE-OF-D-->S-EXPR-LIST.R)
(SYNTHETO::RETURN-TYPE-OF-D-->S-EXPR-FIELD-VAL-PAIRS.R)
(SYNTHETO::RETURN-TYPE-OF-D-->S-BRANCHES.R)
(SYNTHETO::VARIABLE-NAMES
 (54 3 (:REWRITE SYNTHETO::TYPED-VARIABLE-LISTP-WHEN-NOT-CONSP))
 (12 6 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (12 6 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (12 6 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (11 2 (:REWRITE SYNTHETO::TYPED-VARIABLEP-WHEN-MAYBE-TYPED-VARIABLEP))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (5 1 (:REWRITE SYNTHETO::MAYBE-TYPED-VARIABLEP-WHEN-TYPED-VARIABLEP))
 (4 2 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (3 1 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (2 2 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (2 2 (:TYPE-PRESCRIPTION SYNTHETO::MAYBE-TYPED-VARIABLEP))
 (1 1 (:TYPE-PRESCRIPTION SYNTHETO::TYPED-VARIABLEP))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::SYMBOL-LISTP-OF-VARIABLE-NAMES
 (465 32 (:REWRITE SYMBOL-LISTP-WHEN-NOT-CONSP))
 (74 30 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (74 30 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (74 30 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (60 60 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (60 60 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (44 44 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (30 30 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (30 30 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (30 30 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (30 30 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (30 30 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (24 8 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (24 8 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (24 8 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (16 16 (:REWRITE SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP))
 (16 16 (:REWRITE SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP))
 (16 16 (:REWRITE APT::SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP))
 (10 10 (:REWRITE DEFAULT-CDR))
 (9 9 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::D-->A-EXPR)
(SYNTHETO::D-->A-TYPE-NAME)
(SYNTHETO::SYMBOLP-OF-D-->A-TYPE-NAME)
(SYNTHETO::D-->S-FIELD+TYPE-PAIRS
 (54 3 (:REWRITE SYNTHETO::FIELD-LISTP-WHEN-NOT-CONSP))
 (11 5 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (11 5 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (11 5 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (3 1 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (1 1 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-FIELD+TYPE-PAIRS)
(SYNTHETO::D-->S-SUM-TYPE-ALTERNATIVES
 (54 3 (:REWRITE SYNTHETO::ALTERNATIVE-LISTP-WHEN-NOT-CONSP))
 (11 5 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (11 5 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (11 5 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (3 1 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (1 1 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-SUM-TYPE-ALTERNATIVES)
(SYNTHETO::CHECK-INTEGER-SATISYFING-PRED)
(SYNTHETO::FIND-VAL-SATISFYING-PRED
 (336 6 (:DEFINITION LENGTH))
 (318 6 (:DEFINITION LEN))
 (261 117 (:REWRITE DEFAULT-CDR))
 (261 36 (:REWRITE RATIONALP-OF-CAR-WHEN-RATIONAL-LISTP))
 (261 36 (:REWRITE INTEGERP-OF-CAR-WHEN-INTEGER-LISTP))
 (248 78 (:REWRITE DEFAULT-+-2))
 (213 21 (:DEFINITION RATIONAL-LISTP))
 (213 21 (:DEFINITION INTEGER-LISTP))
 (156 27 (:REWRITE RATIONAL-LISTP-OF-CDR-WHEN-RATIONAL-LISTP))
 (156 27 (:REWRITE INTEGER-LISTP-OF-CDR-WHEN-INTEGER-LISTP))
 (150 6 (:REWRITE CONSP-OF-CAR-WHEN-ALISTP))
 (130 78 (:REWRITE DEFAULT-+-1))
 (90 9 (:REWRITE ALISTP-OF-CDR))
 (74 74 (:REWRITE DEFAULT-CAR))
 (72 24 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (72 24 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (72 24 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (68 68 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (60 15 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (56 56 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (48 48 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (48 12 (:DEFINITION INTEGER-ABS))
 (33 33 (:REWRITE RATIONAL-LISTP-WHEN-NOT-CONSP))
 (33 33 (:REWRITE INTEGER-LISTP-WHEN-NOT-CONSP))
 (30 30 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (30 30 (:TYPE-PRESCRIPTION ALISTP))
 (30 15 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (24 24 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (24 24 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (24 24 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (24 24 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (24 24 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (24 24 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (24 24 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (24 24 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (24 24 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (24 24 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (24 24 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (24 24 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (22 14 (:REWRITE DEFAULT-<-2))
 (18 18 (:TYPE-PRESCRIPTION STR::TRUE-LISTP-OF-EXPLODE))
 (18 14 (:REWRITE DEFAULT-<-1))
 (18 12 (:REWRITE STR::CONSP-OF-EXPLODE))
 (18 6 (:REWRITE SYNTHETO::STRINGP-OF-SECOND-TYPE-REF-CONSTRUCTOR-P))
 (15 15 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (15 15 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (15 15 (:REWRITE ALISTP-WHEN-ATOM))
 (12 12 (:REWRITE DEFAULT-UNARY-MINUS))
 (12 6 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (12 6 (:REWRITE STR::COERCE-TO-LIST-REMOVAL))
 (12 4 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (12 4 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (12 4 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (6 6 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (6 6 (:TYPE-PRESCRIPTION LEN))
 (6 6 (:REWRITE STR::EXPLODE-WHEN-NOT-STRINGP))
 (6 6 (:REWRITE DEFAULT-REALPART))
 (6 6 (:REWRITE DEFAULT-NUMERATOR))
 (6 6 (:REWRITE DEFAULT-IMAGPART))
 (6 6 (:REWRITE DEFAULT-DENOMINATOR))
 (6 2 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDDR))
 )
(SYNTHETO::FIND-WITNESS)
(SYNTHETO::D-->S-TYPE-DEFINITION
 (33 3 (:REWRITE CONSP-OF-CAR-WHEN-ALISTP))
 (27 9 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (27 9 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (27 9 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (24 24 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (24 24 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (18 18 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (13 13 (:REWRITE DEFAULT-CDR))
 (12 3 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (11 11 (:REWRITE DEFAULT-CAR))
 (9 9 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (9 9 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (9 9 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (9 9 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (9 9 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (9 9 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (9 9 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (9 9 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (9 9 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (9 9 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (9 9 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (9 9 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (9 3 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (9 3 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (9 3 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (6 6 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (6 6 (:TYPE-PRESCRIPTION ALISTP))
 (6 3 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (6 3 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (4 4 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (3 3 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (3 3 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (3 3 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (3 3 (:REWRITE ALISTP-WHEN-ATOM))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-TYPE-DEFINITION)
(SYNTHETO::D-->S-TYPE-DEFINITIONS
 (54 3 (:REWRITE SYNTHETO::TYPE-DEFINITION-LISTP-WHEN-NOT-CONSP))
 (12 6 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (12 6 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (12 6 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (11 2 (:REWRITE SYNTHETO::TYPE-DEFINITIONP-WHEN-MAYBE-TYPE-DEFINITIONP))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (5 1 (:REWRITE SYNTHETO::MAYBE-TYPE-DEFINITIONP-WHEN-TYPE-DEFINITIONP))
 (4 2 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (3 1 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (2 2 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (2 2 (:TYPE-PRESCRIPTION SYNTHETO::MAYBE-TYPE-DEFINITIONP))
 (1 1 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-DEFINITIONP))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-TYPE-DEFINITIONS)
(SYNTHETO::D-->S-TYPE-RECURSIONS)
(SYNTHETO::TRUE-LISTP-OF-D-->S-TYPE-RECURSIONS)
(SYNTHETO::D-->S-QUANTIFIER)
(SYNTHETO::SYMBOLP-OF-D-->S-QUANTIFIER)
(SYNTHETO::D-->S-FUNCTION-DEFINITION
 (1 1 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-FUNCTION-DEFINITION)
(SYNTHETO::D-->S-FUNCTION-DEFINITIONS
 (54 3 (:REWRITE SYNTHETO::FUNCTION-DEFINITION-LISTP-WHEN-NOT-CONSP))
 (12 6 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (12 6 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (12 6 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (11 2 (:REWRITE SYNTHETO::FUNCTION-DEFINITIONP-WHEN-MAYBE-FUNCTION-DEFINITIONP))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (5 1 (:REWRITE SYNTHETO::MAYBE-FUNCTION-DEFINITIONP-WHEN-FUNCTION-DEFINITIONP))
 (4 2 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (3 1 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (2 2 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (2 2 (:TYPE-PRESCRIPTION SYNTHETO::MAYBE-FUNCTION-DEFINITIONP))
 (1 1 (:TYPE-PRESCRIPTION SYNTHETO::FUNCTION-DEFINITIONP))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-FUNCTION-DEFINITIONS)
(SYNTHETO::D-->S-FUNCTION-RECURSIONS)
(SYNTHETO::TRUE-LISTP-OF-D-->S-FUNCTION-RECURSIONS)
(SYNTHETO::D-->S-FUNCTION-HEADERS
 (54 3 (:REWRITE SYNTHETO::FUNCTION-HEADER-LISTP-WHEN-NOT-CONSP))
 (13 4 (:REWRITE SYNTHETO::FUNCTION-HEADERP-WHEN-MAYBE-FUNCTION-HEADERP))
 (11 5 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (11 5 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (11 5 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (5 1 (:REWRITE SYNTHETO::MAYBE-FUNCTION-HEADERP-WHEN-FUNCTION-HEADERP))
 (4 2 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (3 1 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (2 2 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (2 2 (:TYPE-PRESCRIPTION SYNTHETO::MAYBE-FUNCTION-HEADERP))
 (1 1 (:TYPE-PRESCRIPTION SYNTHETO::FUNCTION-HEADERP))
 (1 1 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-FUNCTION-HEADERS)
(SYNTHETO::D-->S-FUNCTION-SPECIFIER)
(SYNTHETO::TRUE-LISTP-OF-D-->S-FUNCTION-SPECIFIER)
(SYNTHETO::D-->S-SPECIFICATION
 (84 3 (:DEFINITION LEN))
 (47 5 (:REWRITE SYNTHETO::FUNCTION-HEADERP-WHEN-MAYBE-FUNCTION-HEADERP))
 (35 2 (:REWRITE SYNTHETO::MAYBE-FUNCTION-HEADERP-WHEN-FUNCTION-HEADERP))
 (25 1 (:REWRITE DEFAULT-CAR))
 (18 8 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (18 8 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (18 8 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (10 10 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (10 10 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (10 10 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (8 8 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (8 8 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (8 8 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (8 8 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (8 8 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (8 8 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (8 8 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (8 8 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (8 8 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (8 8 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (8 8 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (8 8 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (6 3 (:REWRITE DEFAULT-+-2))
 (5 5 (:TYPE-PRESCRIPTION SYNTHETO::MAYBE-FUNCTION-HEADERP))
 (4 2 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (3 3 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE DEFAULT-+-1))
 (2 2 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (2 2 (:TYPE-PRESCRIPTION SYNTHETO::FUNCTION-HEADERP))
 (2 2 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (2 2 (:LINEAR LOWER-BOUND-OF-LEN-WHEN-SUBLISTP))
 (2 2 (:LINEAR LISTPOS-UPPER-BOUND-STRONG-2))
 (2 2 (:LINEAR LEN-WHEN-PREFIXP))
 )
(SYNTHETO::TRUE-LISTP-OF-D-->S-SPECIFICATION)
(SYNTHETO::D-->S-THEOREM)
(SYNTHETO::TRUE-LISTP-OF-D-->S-THEOREM)
(SYNTHETO::FACTORING-LEMMA
 (5 3 (:REWRITE DEFAULT-+-1))
 (4 4 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 (4 3 (:REWRITE DEFAULT-+-2))
 )
(SYNTHETO::NUMBERP-WHEN-NATP)
(SYNTHETO::NUMBERP-WHEN-INTEGERP)
(SYNTHETO::LOOKUP-TRANSFORM-TABLE)
(SYNTHETO::ALISTP-OF-LOOKUP-TRANSFORM-TABLE
 (53 2 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (47 2 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (40 1 (:REWRITE ALISTP-OF-CDR))
 (35 2 (:REWRITE ALISTP-WHEN-ATOM))
 (22 1 (:REWRITE DEFAULT-CDR))
 (9 5 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (9 5 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (9 5 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (6 6 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (5 5 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (5 5 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (4 4 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (4 4 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (4 2 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (4 2 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (4 2 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (4 2 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (2 2 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 )
(SYNTHETO::GET-TRANSFORM-ARGUMENT-VALUE
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (3 1 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (3 1 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (2 2 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (2 2 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (2 2 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (1 1 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (1 1 (:REWRITE DEFAULT-CAR))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (1 1 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (1 1 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (1 1 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (1 1 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (1 1 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 )
(SYNTHETO::TRANSFORM-ARG-SUBST
 (1709 1 (:DEFINITION PSEUDO-TERMP))
 (1086 2 (:DEFINITION SYMBOL-LISTP))
 (441 68 (:REWRITE DEFAULT-CAR))
 (427 37 (:REWRITE DEFAULT-CDR))
 (387 2 (:REWRITE SYMBOL-LISTP-OF-CDR-WHEN-SYMBOL-LISTP))
 (320 25 (:REWRITE CONSP-OF-CAR-WHEN-ALISTP))
 (275 1 (:REWRITE APT::SYMBOLP-OF-CAAR-WHEN-ISODATA-SYMBOL-ISOMAP-ALISTP))
 (260 6 (:REWRITE SYMBOL-LISTP-WHEN-NOT-CONSP))
 (239 1 (:REWRITE APT::ISODATA-SYMBOL-ISOMAP-ALISTP-OF-CDR-WHEN-ISODATA-SYMBOL-ISOMAP-ALISTP))
 (220 16 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (200 82 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (178 13 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (163 16 (:REWRITE ALISTP-WHEN-ATOM))
 (158 1 (:REWRITE SYMBOLP-OF-CAAR-WHEN-SYMBOL-TRUELIST-ALISTP))
 (158 1 (:REWRITE SYMBOLP-OF-CAAR-WHEN-SYMBOL-SYMBOL-ALISTP))
 (143 63 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (143 63 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (134 1 (:REWRITE SYMBOL-TRUELIST-ALISTP-OF-CDR-WHEN-SYMBOL-TRUELIST-ALISTP))
 (134 1 (:REWRITE SYMBOL-SYMBOL-ALISTP-OF-CDR-WHEN-SYMBOL-SYMBOL-ALISTP))
 (131 2 (:DEFINITION TRUE-LISTP))
 (126 2 (:REWRITE TRUE-LISTP-OF-CAR-WHEN-TRUE-LIST-LISTP))
 (124 3 (:DEFINITION LEN))
 (122 1 (:DEFINITION TRUE-LIST-LISTP))
 (118 118 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (104 104 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (104 104 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (95 2 (:REWRITE APT::ISODATA-SYMBOL-ISOMAP-ALISTP-WHEN-NOT-CONSP))
 (82 82 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (82 82 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (82 82 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (82 82 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (82 82 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (82 82 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (82 82 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (82 82 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (82 82 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (82 82 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (82 82 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (82 82 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (66 3 (:REWRITE ALISTP-OF-CDR))
 (56 3 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP))
 (54 3 (:REWRITE SYNTHETO::TRANSFORM-ARGUMENT-LISTP-WHEN-NOT-CONSP))
 (44 20 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (44 20 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (44 20 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (40 4 (:REWRITE SYMBOL-TRUELIST-ALISTP-WHEN-NOT-CONSP))
 (38 2 (:REWRITE SYMBOL-SYMBOL-ALISTP-WHEN-NOT-CONSP))
 (32 16 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (32 4 (:REWRITE SET::SETS-ARE-TRUE-LISTS-CHEAP))
 (32 2 (:REWRITE TRUE-LIST-LISTP-WHEN-NOT-CONSP))
 (26 26 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (24 12 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (16 16 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (12 6 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (12 2 (:REWRITE TRUE-LISTP-OF-CDAR-WHEN-SYMBOL-TRUELIST-ALISTP))
 (12 2 (:REWRITE TRUE-LISTP-OF-CDAR-WHEN-KEYWORD-TRUELIST-ALISTP))
 (8 8 (:TYPE-PRESCRIPTION SET::SETP-TYPE))
 (8 8 (:REWRITE SYMBOL-TRUELIST-ALISTP-WHEN-SUBSETP-EQUAL))
 (8 4 (:REWRITE SYNTHETO::SETP-WHEN-IDENTIFIER-SETP))
 (8 4 (:REWRITE SET::NONEMPTY-MEANS-SET))
 (7 7 (:TYPE-PRESCRIPTION LEN))
 (6 6 (:REWRITE SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP))
 (6 6 (:REWRITE SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP))
 (6 6 (:REWRITE APT::SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP))
 (6 3 (:REWRITE DEFAULT-+-2))
 (4 4 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SYNTHETO::IDENTIFIER-SETP))
 (4 4 (:TYPE-PRESCRIPTION SET::EMPTY-TYPE))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-THEOREM-SYMBOL-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-TERMFN-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-MACRO-SYMBOL-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-LAMBDA-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-FUNCTION-SYMBOL-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-OF-CDR-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP))
 (4 4 (:REWRITE TRUE-LISTP-OF-CDR-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP))
 (4 4 (:REWRITE SYMBOL-SYMBOL-ALISTP-WHEN-SUBSETP-EQUAL))
 (4 4 (:REWRITE KEYWORD-TRUELIST-ALISTP-WHEN-SUBSETP-EQUAL))
 (4 4 (:REWRITE APT::ISODATA-SYMBOL-ISOMAP-ALISTP-WHEN-SUBSETP-EQUAL))
 (4 4 (:REWRITE SET::IN-SET))
 (3 3 (:REWRITE DEFAULT-+-1))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDDR))
 (2 2 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (2 2 (:REWRITE KEYWORD-TRUELIST-ALISTP-WHEN-NOT-CONSP))
 (2 1 (:REWRITE TRUE-LIST-LISTP-OF-CDR-WHEN-TRUE-LIST-LISTP))
 (2 1 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (1 1 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (1 1 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (1 1 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (1 1 (:REWRITE FREE-VARS-IN-TERM-WHEN-NOT-CONSP-CHEAP))
 )
(SYNTHETO::ALISTP-OF-TRANSFORM-ARG-SUBST
 (10346 9 (:DEFINITION PSEUDO-TERMP))
 (4739 20 (:DEFINITION SYMBOL-LISTP))
 (3036 7 (:REWRITE MEMBER-EQUAL-OF-INTERN-IN-PACKAGE-OF-SYMBOL-IFF))
 (3015 7 (:DEFINITION ALL-SYMBOLS-HAVE-PACKAGEP))
 (2686 36 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP))
 (2470 440 (:REWRITE DEFAULT-CAR))
 (2343 7 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (2240 52 (:DEFINITION ASSOC-EQUAL))
 (2167 7 (:REWRITE SYMBOL-LISTP-OF-FREE-VARS-IN-TERM))
 (2003 296 (:REWRITE DEFAULT-CDR))
 (1845 115 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (1597 111 (:REWRITE CONSP-OF-CAR-WHEN-ALISTP))
 (1597 56 (:REWRITE SYMBOL-LISTP-WHEN-NOT-CONSP))
 (1456 109 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (1332 20 (:REWRITE SYMBOL-LISTP-OF-CDR-WHEN-SYMBOL-LISTP))
 (1224 105 (:REWRITE ALISTP-WHEN-ATOM))
 (1206 492 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (1185 18 (:DEFINITION TRUE-LISTP))
 (1134 18 (:REWRITE TRUE-LISTP-OF-CAR-WHEN-TRUE-LIST-LISTP))
 (1125 9 (:REWRITE APT::SYMBOLP-OF-CAAR-WHEN-ISODATA-SYMBOL-ISOMAP-ALISTP))
 (1116 27 (:DEFINITION LEN))
 (1098 9 (:DEFINITION TRUE-LIST-LISTP))
 (996 22 (:REWRITE CONSP-OF-ASSOC-EQUAL))
 (984 418 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (984 418 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (801 9 (:REWRITE APT::ISODATA-SYMBOL-ISOMAP-ALISTP-OF-CDR-WHEN-ISODATA-SYMBOL-ISOMAP-ALISTP))
 (796 796 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (796 796 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (777 14 (:DEFINITION MEMBER-EQUAL))
 (714 714 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (606 9 (:REWRITE SYMBOLP-OF-CAAR-WHEN-SYMBOL-TRUELIST-ALISTP))
 (606 9 (:REWRITE SYMBOLP-OF-CAAR-WHEN-SYMBOL-SYMBOL-ALISTP))
 (492 492 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (492 492 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (492 492 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (492 492 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (492 492 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (492 492 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (492 492 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (492 492 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (492 492 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (492 492 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (492 492 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (492 492 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (469 7 (:REWRITE SYMBOL-PACKAGE-NAME-WHEN-MEMBER-EQUAL-OF-COMMON-LISP-SYMBOLS-FROM-MAIN-LISP-PACKAGE))
 (414 18 (:REWRITE APT::ISODATA-SYMBOL-ISOMAP-ALISTP-WHEN-NOT-CONSP))
 (403 173 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (403 173 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (403 173 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (392 14 (:REWRITE MEMBER-WHEN-ATOM))
 (390 9 (:REWRITE SYMBOL-TRUELIST-ALISTP-OF-CDR-WHEN-SYMBOL-TRUELIST-ALISTP))
 (390 9 (:REWRITE SYMBOL-SYMBOL-ALISTP-OF-CDR-WHEN-SYMBOL-SYMBOL-ALISTP))
 (336 14 (:REWRITE SUBSETP-CAR-MEMBER))
 (288 36 (:REWRITE SET::SETS-ARE-TRUE-LISTS-CHEAP))
 (288 18 (:REWRITE TRUE-LIST-LISTP-WHEN-NOT-CONSP))
 (272 20 (:REWRITE ALISTP-OF-CDR))
 (252 14 (:REWRITE SUBSETP-WHEN-ATOM-RIGHT))
 (234 36 (:REWRITE SYMBOL-TRUELIST-ALISTP-WHEN-NOT-CONSP))
 (222 222 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (216 18 (:REWRITE SYMBOL-SYMBOL-ALISTP-WHEN-NOT-CONSP))
 (210 105 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (208 12 (:REWRITE HONS-DUPLICITY-ALIST-P-OF-CONS))
 (118 59 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (108 18 (:REWRITE TRUE-LISTP-OF-CDAR-WHEN-SYMBOL-TRUELIST-ALISTP))
 (108 18 (:REWRITE TRUE-LISTP-OF-CDAR-WHEN-KEYWORD-TRUELIST-ALISTP))
 (105 105 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (85 85 (:TYPE-PRESCRIPTION LEN))
 (81 81 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (72 72 (:TYPE-PRESCRIPTION SET::SETP-TYPE))
 (72 72 (:REWRITE SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP))
 (72 72 (:REWRITE SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP))
 (72 72 (:REWRITE APT::SYMBOLP-OF-CAR-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP))
 (72 72 (:REWRITE SYMBOL-TRUELIST-ALISTP-WHEN-SUBSETP-EQUAL))
 (72 36 (:REWRITE SYNTHETO::SETP-WHEN-IDENTIFIER-SETP))
 (72 36 (:REWRITE SET::NONEMPTY-MEANS-SET))
 (71 71 (:TYPE-PRESCRIPTION FREE-VARS-IN-TERM))
 (70 70 (:TYPE-PRESCRIPTION COMMON-LISP-SYMBOLS-FROM-MAIN-LISP-PACKAGE))
 (54 27 (:REWRITE DEFAULT-+-2))
 (44 44 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (44 22 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (36 36 (:TYPE-PRESCRIPTION SYNTHETO::IDENTIFIER-SETP))
 (36 36 (:TYPE-PRESCRIPTION SET::EMPTY-TYPE))
 (36 36 (:REWRITE TRUE-LISTP-WHEN-THEOREM-SYMBOL-LISTP))
 (36 36 (:REWRITE TRUE-LISTP-WHEN-TERMFN-LISTP))
 (36 36 (:REWRITE TRUE-LISTP-WHEN-MACRO-SYMBOL-LISTP))
 (36 36 (:REWRITE TRUE-LISTP-WHEN-LAMBDA-LISTP))
 (36 36 (:REWRITE TRUE-LISTP-WHEN-FUNCTION-SYMBOL-LISTP))
 (36 36 (:REWRITE TRUE-LISTP-OF-CDR-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP))
 (36 36 (:REWRITE TRUE-LISTP-OF-CDR-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP))
 (36 36 (:REWRITE SYMBOL-SYMBOL-ALISTP-WHEN-SUBSETP-EQUAL))
 (36 36 (:REWRITE KEYWORD-TRUELIST-ALISTP-WHEN-SUBSETP-EQUAL))
 (36 36 (:REWRITE APT::ISODATA-SYMBOL-ISOMAP-ALISTP-WHEN-SUBSETP-EQUAL))
 (36 36 (:REWRITE SET::IN-SET))
 (35 35 (:TYPE-PRESCRIPTION ALL-SYMBOLS-HAVE-PACKAGEP))
 (28 28 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (28 28 (:TYPE-PRESCRIPTION STRINGP-SYMBOL-PACKAGE-NAME))
 (28 28 (:REWRITE SUBSETP-MEMBER . 2))
 (28 28 (:REWRITE SUBSETP-MEMBER . 1))
 (27 27 (:REWRITE DEFAULT-+-1))
 (27 9 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDDR))
 (24 8 (:DEFINITION NATP))
 (20 20 (:LINEAR LOWER-BOUND-OF-LEN-WHEN-SUBLISTP))
 (20 20 (:LINEAR LISTPOS-UPPER-BOUND-STRONG-2))
 (20 20 (:LINEAR LEN-WHEN-PREFIXP))
 (18 18 (:REWRITE TERMP-IMPLIES-PSEUDO-TERMP))
 (18 18 (:REWRITE KEYWORD-TRUELIST-ALISTP-WHEN-NOT-CONSP))
 (18 9 (:REWRITE TRUE-LIST-LISTP-OF-CDR-WHEN-TRUE-LIST-LISTP))
 (18 9 (:REWRITE PSEUDO-TERMP-OF-LAMBDA-BODY-CHEAP))
 (14 14 (:REWRITE SUBSETP-WHEN-ATOM-LEFT))
 (14 14 (:REWRITE SUBSETP-TRANS2))
 (14 14 (:REWRITE SUBSETP-TRANS))
 (14 14 (:REWRITE SUBSETP-MEMBER . 4))
 (14 14 (:REWRITE SUBSETP-MEMBER . 3))
 (14 14 (:REWRITE INTERSECTP-MEMBER . 3))
 (14 14 (:REWRITE INTERSECTP-MEMBER . 2))
 (13 13 (:TYPE-PRESCRIPTION PSEUDO-TERM-LISTP))
 (9 9 (:REWRITE TERM-LISTP-IMPLIES-PSEUDO-TERM-LISTP))
 (8 8 (:REWRITE DEFAULT-<-2))
 (8 8 (:REWRITE DEFAULT-<-1))
 (8 8 (:REWRITE CDR-CONS))
 (7 7 (:REWRITE SYMBOL-PACKAGE-NAME-WHEN-MEMBER-EQUAL-AND-ALL-SYMBOLS-HAVE-PACKAGEP))
 (7 7 (:REWRITE FREE-VARS-IN-TERM-WHEN-NOT-CONSP-CHEAP))
 )
(SYNTHETO::EVAL-GROUND-BOOLEAN-TERM
 (672 12 (:DEFINITION LENGTH))
 (636 12 (:DEFINITION LEN))
 (504 216 (:REWRITE DEFAULT-CDR))
 (486 156 (:REWRITE DEFAULT-+-2))
 (446 64 (:REWRITE RATIONALP-OF-CAR-WHEN-RATIONAL-LISTP))
 (446 64 (:REWRITE INTEGERP-OF-CAR-WHEN-INTEGER-LISTP))
 (358 38 (:DEFINITION RATIONAL-LISTP))
 (358 38 (:DEFINITION INTEGER-LISTP))
 (280 12 (:REWRITE CONSP-OF-CAR-WHEN-ALISTP))
 (258 156 (:REWRITE DEFAULT-+-1))
 (236 44 (:REWRITE RATIONAL-LISTP-OF-CDR-WHEN-RATIONAL-LISTP))
 (236 44 (:REWRITE INTEGER-LISTP-OF-CDR-WHEN-INTEGER-LISTP))
 (160 16 (:REWRITE ALISTP-OF-CDR))
 (150 50 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (150 50 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (150 50 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (142 142 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (141 141 (:REWRITE DEFAULT-CAR))
 (118 118 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (112 28 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (100 100 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (96 24 (:DEFINITION INTEGER-ABS))
 (56 56 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (56 56 (:TYPE-PRESCRIPTION ALISTP))
 (56 56 (:REWRITE RATIONAL-LISTP-WHEN-NOT-CONSP))
 (56 56 (:REWRITE INTEGER-LISTP-WHEN-NOT-CONSP))
 (56 28 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (50 50 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (50 50 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (50 50 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (50 50 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (50 50 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (50 50 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (50 50 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (50 50 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (50 50 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (50 50 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (50 50 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (50 50 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (47 29 (:REWRITE DEFAULT-<-2))
 (39 29 (:REWRITE DEFAULT-<-1))
 (36 36 (:TYPE-PRESCRIPTION STR::TRUE-LISTP-OF-EXPLODE))
 (36 24 (:REWRITE STR::CONSP-OF-EXPLODE))
 (36 12 (:REWRITE SYNTHETO::STRINGP-OF-SECOND-TYPE-REF-CONSTRUCTOR-P))
 (28 28 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (28 28 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (28 28 (:REWRITE ALISTP-WHEN-ATOM))
 (27 9 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (27 9 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (27 9 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (24 24 (:REWRITE DEFAULT-UNARY-MINUS))
 (24 12 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (24 12 (:REWRITE STR::COERCE-TO-LIST-REMOVAL))
 (12 12 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (12 12 (:TYPE-PRESCRIPTION LEN))
 (12 12 (:REWRITE STR::EXPLODE-WHEN-NOT-STRINGP))
 (12 12 (:REWRITE DEFAULT-REALPART))
 (12 12 (:REWRITE DEFAULT-NUMERATOR))
 (12 12 (:REWRITE DEFAULT-IMAGPART))
 (12 12 (:REWRITE DEFAULT-DENOMINATOR))
 (12 4 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDDR))
 )
(SYNTHETO::FIND-NEEDED-TRANSFORMS)
(SYNTHETO::ADD-NAMES-TO-TRANSFORMS)
(SUBLIS-EQUAL
 (50 2 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (44 2 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (38 6 (:REWRITE DEFAULT-CAR))
 (32 2 (:REWRITE ALISTP-WHEN-ATOM))
 (29 11 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (20 8 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (20 8 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (18 18 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (12 12 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (12 12 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (11 11 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (11 11 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (11 11 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (11 11 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (11 11 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (11 11 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (11 11 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (11 11 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (11 11 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (11 11 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (11 11 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (11 11 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (4 4 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (4 2 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (2 2 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 2 (:REWRITE CONSP-OF-CAR-WHEN-ALISTP))
 (2 1 (:REWRITE IFF-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (1 1 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 )
(SYNTHETO::D-->S-TRANSFORM
 (508 10 (:DEFINITION BINARY-APPEND))
 (272 32 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (118 19 (:REWRITE HONS-DUPLICITY-ALIST-P-OF-CONS))
 (99 30 (:REWRITE DEFAULT-CDR))
 (96 46 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (96 46 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (96 46 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (81 11 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (77 2 (:DEFINITION TRUE-LISTP))
 (70 70 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (70 70 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (50 50 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (50 7 (:DEFINITION LEN))
 (46 46 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (46 46 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (46 46 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (46 46 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (46 46 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (46 46 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (46 46 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (46 46 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (46 46 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (46 46 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (46 46 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (46 46 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (41 41 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (36 3 (:REWRITE ALISTP-WHEN-ATOM))
 (33 1 (:REWRITE LIST-FIX-WHEN-LEN-ZERO))
 (32 4 (:REWRITE SET::SETS-ARE-TRUE-LISTS-CHEAP))
 (32 2 (:REWRITE CONSP-OF-LIST-FIX))
 (30 10 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (30 10 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (30 10 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (27 9 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (16 1 (:REWRITE LIST-FIX-WHEN-NOT-CONSP))
 (14 7 (:REWRITE DEFAULT-+-2))
 (10 10 (:REWRITE DEFAULT-CAR))
 (10 5 (:REWRITE DEFAULT-<-2))
 (9 9 (:REWRITE CDR-CONS))
 (8 8 (:TYPE-PRESCRIPTION SET::SETP-TYPE))
 (8 4 (:REWRITE SYNTHETO::SETP-WHEN-IDENTIFIER-SETP))
 (8 4 (:REWRITE SET::NONEMPTY-MEANS-SET))
 (7 7 (:REWRITE DEFAULT-+-1))
 (6 3 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (5 5 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (5 5 (:REWRITE DEFAULT-<-1))
 (4 4 (:TYPE-PRESCRIPTION SYNTHETO::IDENTIFIER-SETP))
 (4 4 (:TYPE-PRESCRIPTION SET::EMPTY-TYPE))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-THEOREM-SYMBOL-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-TERMFN-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-MACRO-SYMBOL-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-LAMBDA-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-WHEN-FUNCTION-SYMBOL-LISTP))
 (4 4 (:REWRITE TRUE-LISTP-OF-CDR-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP))
 (4 4 (:REWRITE TRUE-LISTP-OF-CDR-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP))
 (4 4 (:REWRITE SET::IN-SET))
 (3 3 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (2 2 (:REWRITE SYNTHETO::IDENTIFIERP-WHEN-IN-VARIABLE-SUBSTITUTIONP-BINDS-FREE-X))
 (2 2 (:LINEAR LOWER-BOUND-OF-LEN-WHEN-SUBLISTP))
 (2 2 (:LINEAR LISTPOS-UPPER-BOUND-STRONG-2))
 (2 2 (:LINEAR LEN-WHEN-PREFIXP))
 )
(SYNTHETO::D-->S-TOPLEVEL)
(SYNTHETO::TRUE-LISTP-OF-D-->S-TOPLEVEL)
(SYNTHETO::D-->S-TOPLEVEL-LIST
 (54 3 (:REWRITE SYNTHETO::TOPLEVEL-LISTP-WHEN-NOT-CONSP))
 (12 6 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (12 6 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (12 6 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (8 8 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (6 6 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (6 6 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (6 6 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (3 1 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (3 1 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (3 1 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-CAR))
 )
(SYNTHETO::TRUE-LIST-LISTP-OF-D-->S-TOPLEVEL-LIST
 (504 7 (:DEFINITION TRUE-LISTP))
 (465 32 (:REWRITE TRUE-LIST-LISTP-WHEN-NOT-CONSP))
 (140 14 (:REWRITE SET::SETS-ARE-TRUE-LISTS-CHEAP))
 (95 37 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP))
 (95 37 (:REWRITE SYNTHETO::TYPE-REF-CONSTRUCTOR-P-IMPLIES-CONSP))
 (95 37 (:REWRITE SYNTACTIC-EXPLICIT-TRUE-LISTP-FORWARD-TO-CONSP))
 (84 7 (:REWRITE CONSP-OF-CAR-WHEN-ALISTP))
 (74 74 (:TYPE-PRESCRIPTION SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P))
 (74 74 (:TYPE-PRESCRIPTION SYNTHETO::TYPE-REF-CONSTRUCTOR-P))
 (58 58 (:TYPE-PRESCRIPTION SYNTACTIC-EXPLICIT-TRUE-LISTP))
 (56 7 (:REWRITE TRUE-LISTP-OF-CDAR-WHEN-SYMBOL-TRUELIST-ALISTP))
 (56 7 (:REWRITE TRUE-LISTP-OF-CDAR-WHEN-KEYWORD-TRUELIST-ALISTP))
 (37 37 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 2))
 (37 37 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP . 1))
 (37 37 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 2))
 (37 37 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-SYMBOL-SYMBOL-ALISTP . 1))
 (37 37 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 2))
 (37 37 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP . 1))
 (37 37 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 2))
 (37 37 (:REWRITE CONSP-WHEN-MEMBER-EQUAL-OF-KEYWORD-SYMBOL-ALISTP . 1))
 (37 37 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 2))
 (37 37 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-SYMBOL-ISOMAP-ALISTP . 1))
 (37 37 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 2))
 (37 37 (:REWRITE APT::CONSP-WHEN-MEMBER-EQUAL-OF-ISODATA-POS-ISOMAP-ALISTP . 1))
 (28 28 (:TYPE-PRESCRIPTION SET::SETP-TYPE))
 (28 14 (:REWRITE SYNTHETO::SETP-WHEN-IDENTIFIER-SETP))
 (28 14 (:REWRITE SET::NONEMPTY-MEANS-SET))
 (28 7 (:REWRITE ALISTP-WHEN-HONS-DUPLICITY-ALIST-P))
 (24 8 (:REWRITE SYNTHETO::UNARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (24 8 (:REWRITE SYNTHETO::CONSP-CDR-IF-TYPE-REF-CONSTRUCTOR-P))
 (24 8 (:REWRITE SYNTHETO::BINARY-TYPE-CONSTRUCTOR-P-IMPLIES-CONSP-CDR))
 (17 17 (:REWRITE DEFAULT-CDR))
 (15 15 (:REWRITE TRUE-LISTP-WHEN-THEOREM-SYMBOL-LISTP))
 (15 15 (:REWRITE TRUE-LISTP-WHEN-TERMFN-LISTP))
 (15 15 (:REWRITE TRUE-LISTP-WHEN-MACRO-SYMBOL-LISTP))
 (15 15 (:REWRITE TRUE-LISTP-WHEN-LAMBDA-LISTP))
 (15 15 (:REWRITE TRUE-LISTP-WHEN-FUNCTION-SYMBOL-LISTP))
 (14 14 (:TYPE-PRESCRIPTION SYNTHETO::IDENTIFIER-SETP))
 (14 14 (:TYPE-PRESCRIPTION HONS-DUPLICITY-ALIST-P))
 (14 14 (:TYPE-PRESCRIPTION SET::EMPTY-TYPE))
 (14 14 (:TYPE-PRESCRIPTION ALISTP))
 (14 14 (:REWRITE TRUE-LISTP-OF-CDR-WHEN-MEMBER-EQUAL-OF-SYMBOL-TRUELIST-ALISTP))
 (14 14 (:REWRITE TRUE-LISTP-OF-CDR-WHEN-MEMBER-EQUAL-OF-KEYWORD-TRUELIST-ALISTP))
 (14 14 (:REWRITE SYMBOL-TRUELIST-ALISTP-WHEN-SUBSETP-EQUAL))
 (14 14 (:REWRITE KEYWORD-TRUELIST-ALISTP-WHEN-SUBSETP-EQUAL))
 (14 14 (:REWRITE SET::IN-SET))
 (14 7 (:REWRITE CONSP-OF-CAR-WHEN-SYMBOL-TERM-ALISTP-CHEAP))
 (14 7 (:REWRITE ALISTP-WHEN-PSEUDO-TERM-ALISTP-CHEAP))
 (9 9 (:REWRITE DEFAULT-CAR))
 (7 7 (:TYPE-PRESCRIPTION SYMBOL-TERM-ALISTP))
 (7 7 (:TYPE-PRESCRIPTION PSEUDO-TERM-ALISTP))
 (7 7 (:REWRITE SYMBOL-TRUELIST-ALISTP-WHEN-NOT-CONSP))
 (7 7 (:REWRITE KEYWORD-TRUELIST-ALISTP-WHEN-NOT-CONSP))
 (7 7 (:REWRITE HONS-DUPLICITY-ALIST-P-WHEN-NOT-CONSP))
 (7 7 (:REWRITE ALISTP-WHEN-ATOM))
 )
