(ALIST-LISTP)
(ALIST-LISTP-FORWARD-TO-TRUE-LISTP
 (9 3 (:DEFINITION ALISTP))
 (7 7 (:REWRITE DEFAULT-CDR))
 (6 6 (:REWRITE DEFAULT-CAR))
 (4 2 (:DEFINITION TRUE-LISTP))
 )
(ALISTP-OF-CAR-WHEN-ALIST-LISTP
 (2 2 (:REWRITE DEFAULT-CAR))
 (1 1 (:REWRITE DEFAULT-CDR))
 )
(ALISTP-OF-CDR-WHEN-ALIST-LISTP
 (4 1 (:REWRITE ALISTP-OF-CAR-WHEN-ALIST-LISTP))
 (3 1 (:DEFINITION ALISTP))
 (2 2 (:REWRITE DEFAULT-CDR))
 (2 2 (:REWRITE DEFAULT-CAR))
 )
(ALISTP-OF-NTH
 (25 25 (:REWRITE DEFAULT-CAR))
 (17 17 (:REWRITE DEFAULT-CDR))
 (8 2 (:REWRITE ALISTP-OF-CDR-WHEN-ALIST-LISTP))
 (4 4 (:REWRITE ZP-OPEN))
 (2 2 (:REWRITE DEFAULT-+-2))
 (2 2 (:REWRITE DEFAULT-+-1))
 )
