(RULE-ITEMP)
(RULE-ITEM-LISTP)
(RULE-ITEM-LIST-LISTP)
(ELABORATE-RULE-ITEM
 (11 11 (:REWRITE DEFAULT-CAR))
 (8 8 (:REWRITE DEFAULT-CDR))
 (6 3 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (6 2 (:REWRITE STATE-P-IMPLIES-AND-FORWARD-TO-STATE-P1))
 (5 1 (:DEFINITION LEN))
 (5 1 (:DEFINITION ASSOC-EQUAL))
 (2 1 (:REWRITE DEFAULT-+-2))
 (2 1 (:DEFINITION TRUE-LISTP))
 (2 1 (:DEFINITION NTH))
 (1 1 (:REWRITE DEFAULT-+-1))
 )
(SYMBOL-LISTP-OF-ELABORATE-RULE-ITEM
 (5 5 (:REWRITE DEFAULT-CAR))
 (5 1 (:DEFINITION ASSOC-EQUAL))
 (4 4 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE SYMBOL-LISTP-WHEN-SUBSETP-EQUAL-1))
 (2 1 (:DEFINITION NTH))
 )
(ELABORATE-RULE-ITEMS-AUX
 (15 3 (:DEFINITION LEN))
 (10 10 (:REWRITE DEFAULT-CDR))
 (10 5 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (9 9 (:REWRITE DEFAULT-CAR))
 (7 7 (:REWRITE SYMBOL-LISTP-WHEN-SUBSETP-EQUAL-1))
 (6 3 (:REWRITE DEFAULT-+-2))
 (6 3 (:DEFINITION TRUE-LISTP))
 (6 2 (:REWRITE STATE-P-IMPLIES-AND-FORWARD-TO-STATE-P1))
 (5 1 (:DEFINITION TRUE-LIST-FIX))
 (5 1 (:DEFINITION BINARY-APPEND))
 (3 3 (:REWRITE DEFAULT-+-1))
 )
(TRUE-LISTP-OF-ELABORATE-RULE-ITEMS-AUX
 (25 5 (:DEFINITION BINARY-APPEND))
 (17 17 (:REWRITE DEFAULT-CDR))
 (10 10 (:REWRITE DEFAULT-CAR))
 )
(SYMBOL-LISTP-OF-ELABORATE-RULE-ITEMS-AUX
 (15 3 (:DEFINITION BINARY-APPEND))
 (12 12 (:REWRITE SYMBOL-LISTP-WHEN-SUBSETP-EQUAL-1))
 (7 7 (:REWRITE DEFAULT-CAR))
 (6 6 (:REWRITE DEFAULT-CDR))
 (5 1 (:DEFINITION TRUE-LIST-FIX))
 )
(ELABORATE-RULE-ITEMS)
(TRUE-LISTP-OF-ELABORATE-RULE-ITEMS)
(SYMBOL-LISTP-OF-ELABORATE-RULE-ITEMS)
(ELABORATE-RULE-ITEM-LISTS
 (10 2 (:DEFINITION LEN))
 (8 4 (:REWRITE SYMBOLP-OF-CAR-WHEN-SYMBOL-LISTP-CHEAP))
 (7 7 (:REWRITE DEFAULT-CDR))
 (6 6 (:REWRITE DEFAULT-CAR))
 (4 4 (:TYPE-PRESCRIPTION SYMBOL-LISTP))
 (4 2 (:REWRITE DEFAULT-+-2))
 (4 2 (:DEFINITION TRUE-LISTP))
 (2 2 (:REWRITE DEFAULT-+-1))
 )
(SYMBOL-LIST-LISTP-OF-ELABORATE-RULE-ITEM-LISTS
 (8 7 (:REWRITE DEFAULT-CAR))
 (7 6 (:REWRITE DEFAULT-CDR))
 (3 3 (:REWRITE SYMBOL-LISTP-WHEN-SUBSETP-EQUAL-1))
 )
(REMOVE-FROM-ALL
 (8 8 (:REWRITE SYMBOL-LISTP-WHEN-SUBSETP-EQUAL-1))
 (4 4 (:REWRITE DEFAULT-CDR))
 (4 4 (:REWRITE DEFAULT-CAR))
 (4 2 (:DEFINITION TRUE-LISTP))
 )
