(TMP-DEFTYPES-INTEGERP-OF-IFIX)
(TMP-DEFTYPES-IFIX-WHEN-INTEGERP)
(TMP-DEFTYPES-STRINGP-OF-STR-FIX$INLINE)
(SIMPL-IMP::AEXPP
 (10 10 (:LINEAR ACL2-COUNT-OF-CONSP-POSITIVE))
 )
(SIMPL-IMP::CONSP-WHEN-AEXPP)
(SIMPL-IMP::AEXP-KIND$INLINE)
(SIMPL-IMP::AEXP-KIND-POSSIBILITIES)
(SIMPL-IMP::AEXP-FIX$INLINE
 (10 10 (:LINEAR ACL2-COUNT-OF-CONSP-POSITIVE))
 )
(SIMPL-IMP::AEXPP-OF-AEXP-FIX
 (148 12 (:REWRITE TMP-DEFTYPES-IFIX-WHEN-INTEGERP))
 (140 16 (:REWRITE INTEGERP-OF-CAR-WHEN-INTEGER-LISTP))
 (100 8 (:DEFINITION INTEGER-LISTP))
 (84 12 (:REWRITE INTEGER-LISTP-OF-CDR-WHEN-INTEGER-LISTP))
 (20 20 (:REWRITE INTEGER-LISTP-WHEN-NOT-CONSP))
 (9 9 (:REWRITE STR-FIX-WHEN-STRINGP))
 (8 4 (:DEFINITION IFIX))
 (4 4 (:REWRITE STR-FIX-DEFAULT))
 )
(SIMPL-IMP::AEXP-FIX-WHEN-AEXPP)
(SIMPL-IMP::AEXP-FIX$INLINE)
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT)
(SIMPL-IMP::AEXP-EQUIV$INLINE)
(SIMPL-IMP::AEXP-EQUIV-IS-AN-EQUIVALENCE)
(SIMPL-IMP::AEXP-EQUIV-IMPLIES-EQUAL-AEXP-FIX-1)
(SIMPL-IMP::AEXP-FIX-UNDER-AEXP-EQUIV)
(SIMPL-IMP::EQUAL-OF-AEXP-FIX-1-FORWARD-TO-AEXP-EQUIV)
(SIMPL-IMP::EQUAL-OF-AEXP-FIX-2-FORWARD-TO-AEXP-EQUIV)
(SIMPL-IMP::AEXP-EQUIV-OF-AEXP-FIX-1-FORWARD)
(SIMPL-IMP::AEXP-EQUIV-OF-AEXP-FIX-2-FORWARD)
(SIMPL-IMP::AEXP-KIND$INLINE-OF-AEXP-FIX-X
 (29 21 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (9 9 (:REWRITE TMP-DEFTYPES-IFIX-WHEN-INTEGERP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (5 5 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(SIMPL-IMP::AEXP-KIND$INLINE-AEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::CONSP-OF-AEXP-FIX)
(SIMPL-IMP::TAG-WHEN-AEXPP-FORWARD)
(SIMPL-IMP::TAG-OF-AEXP-FIX)
(SIMPL-IMP::AEXP-CONST->VALUE$INLINE)
(SIMPL-IMP::INTEGERP-OF-AEXP-CONST->VALUE)
(SIMPL-IMP::AEXP-CONST->VALUE$INLINE-OF-AEXP-FIX-X
 (13 5 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::CONSP-OF-AEXP-FIX))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-FIX$INLINE))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::AEXP-CONST->VALUE$INLINE-AEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::AEXP-CONST->VALUE-WHEN-WRONG-KIND
 (2 2 (:REWRITE TMP-DEFTYPES-IFIX-WHEN-INTEGERP))
 )
(SIMPL-IMP::AEXP-CONST)
(SIMPL-IMP::RETURN-TYPE-OF-AEXP-CONST
 (2 2 (:REWRITE TMP-DEFTYPES-IFIX-WHEN-INTEGERP))
 )
(SIMPL-IMP::AEXP-CONST->VALUE-OF-AEXP-CONST
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-CONST))
 )
(SIMPL-IMP::AEXP-CONST-OF-FIELDS
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::AEXP-FIX-WHEN-CONST
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::EQUAL-OF-AEXP-CONST
 (67 7 (:REWRITE INTEGERP-OF-CAR-WHEN-INTEGER-LISTP))
 (50 4 (:DEFINITION INTEGER-LISTP))
 (40 6 (:REWRITE INTEGER-LISTP-OF-CDR-WHEN-INTEGER-LISTP))
 (32 32 (:TYPE-PRESCRIPTION INTEGER-LISTP))
 (10 10 (:REWRITE INTEGER-LISTP-WHEN-NOT-CONSP))
 (9 9 (:REWRITE DEFAULT-CAR))
 (8 8 (:REWRITE DEFAULT-CDR))
 (8 7 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SIMPL-IMP::AEXP-CONST-OF-IFIX-VALUE)
(SIMPL-IMP::AEXP-CONST-INT-EQUIV-CONGRUENCE-ON-VALUE)
(SIMPL-IMP::AEXP-VAR->NAME$INLINE)
(SIMPL-IMP::STRINGP-OF-AEXP-VAR->NAME)
(SIMPL-IMP::AEXP-VAR->NAME$INLINE-OF-AEXP-FIX-X
 (12 4 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::CONSP-OF-AEXP-FIX))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-FIX$INLINE))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::AEXP-VAR->NAME$INLINE-AEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::AEXP-VAR->NAME-WHEN-WRONG-KIND
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(SIMPL-IMP::AEXP-VAR)
(SIMPL-IMP::RETURN-TYPE-OF-AEXP-VAR
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(SIMPL-IMP::AEXP-VAR->NAME-OF-AEXP-VAR
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-VAR))
 )
(SIMPL-IMP::AEXP-VAR-OF-FIELDS
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::AEXP-FIX-WHEN-VAR
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::EQUAL-OF-AEXP-VAR
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SIMPL-IMP::AEXP-VAR-OF-STR-FIX-NAME)
(SIMPL-IMP::AEXP-VAR-STREQV-CONGRUENCE-ON-NAME)
(SIMPL-IMP::AEXP-ADD->LEFT$INLINE)
(SIMPL-IMP::AEXPP-OF-AEXP-ADD->LEFT
 (6 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::AEXP-ADD->LEFT$INLINE-OF-AEXP-FIX-X)
(SIMPL-IMP::AEXP-ADD->LEFT$INLINE-AEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::AEXP-ADD->LEFT-WHEN-WRONG-KIND)
(SIMPL-IMP::AEXP-ADD->RIGHT$INLINE)
(SIMPL-IMP::AEXPP-OF-AEXP-ADD->RIGHT
 (6 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::AEXP-ADD->RIGHT$INLINE-OF-AEXP-FIX-X)
(SIMPL-IMP::AEXP-ADD->RIGHT$INLINE-AEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::AEXP-ADD->RIGHT-WHEN-WRONG-KIND)
(SIMPL-IMP::AEXP-ADD)
(SIMPL-IMP::RETURN-TYPE-OF-AEXP-ADD
 (268 4 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (160 160 (:TYPE-PRESCRIPTION LEN))
 (136 40 (:REWRITE FTY::EQUAL-OF-LEN))
 (16 16 (:TYPE-PRESCRIPTION TRUE-LISTP))
 )
(SIMPL-IMP::AEXP-ADD->LEFT-OF-AEXP-ADD
 (27 6 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-ADD))
 )
(SIMPL-IMP::AEXP-ADD->RIGHT-OF-AEXP-ADD
 (27 6 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-ADD))
 )
(SIMPL-IMP::AEXP-ADD-OF-FIELDS
 (11 5 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::AEXP-FIX-WHEN-ADD
 (11 5 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::EQUAL-OF-AEXP-ADD
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SIMPL-IMP::AEXP-ADD-OF-AEXP-FIX-LEFT)
(SIMPL-IMP::AEXP-ADD-AEXP-EQUIV-CONGRUENCE-ON-LEFT)
(SIMPL-IMP::AEXP-ADD-OF-AEXP-FIX-RIGHT)
(SIMPL-IMP::AEXP-ADD-AEXP-EQUIV-CONGRUENCE-ON-RIGHT)
(SIMPL-IMP::AEXP-MUL->LEFT$INLINE)
(SIMPL-IMP::AEXPP-OF-AEXP-MUL->LEFT
 (6 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::AEXP-MUL->LEFT$INLINE-OF-AEXP-FIX-X)
(SIMPL-IMP::AEXP-MUL->LEFT$INLINE-AEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::AEXP-MUL->LEFT-WHEN-WRONG-KIND)
(SIMPL-IMP::AEXP-MUL->RIGHT$INLINE)
(SIMPL-IMP::AEXPP-OF-AEXP-MUL->RIGHT
 (6 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::AEXP-MUL->RIGHT$INLINE-OF-AEXP-FIX-X)
(SIMPL-IMP::AEXP-MUL->RIGHT$INLINE-AEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::AEXP-MUL->RIGHT-WHEN-WRONG-KIND)
(SIMPL-IMP::AEXP-MUL)
(SIMPL-IMP::RETURN-TYPE-OF-AEXP-MUL
 (268 4 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (160 160 (:TYPE-PRESCRIPTION LEN))
 (136 40 (:REWRITE FTY::EQUAL-OF-LEN))
 (16 16 (:TYPE-PRESCRIPTION TRUE-LISTP))
 )
(SIMPL-IMP::AEXP-MUL->LEFT-OF-AEXP-MUL
 (27 6 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-MUL))
 )
(SIMPL-IMP::AEXP-MUL->RIGHT-OF-AEXP-MUL
 (27 6 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-MUL))
 )
(SIMPL-IMP::AEXP-MUL-OF-FIELDS
 (11 5 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::AEXP-FIX-WHEN-MUL
 (11 5 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::EQUAL-OF-AEXP-MUL)
(SIMPL-IMP::AEXP-MUL-OF-AEXP-FIX-LEFT)
(SIMPL-IMP::AEXP-MUL-AEXP-EQUIV-CONGRUENCE-ON-LEFT)
(SIMPL-IMP::AEXP-MUL-OF-AEXP-FIX-RIGHT)
(SIMPL-IMP::AEXP-MUL-AEXP-EQUIV-CONGRUENCE-ON-RIGHT)
(SIMPL-IMP::AEXP-FIX-REDEF
 (15 5 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (10 10 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::AEXP-COUNT
 (24 12 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-VAR))
 (24 12 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-CONST))
 )
(SIMPL-IMP::NATP-OF-AEXP-COUNT)
(SIMPL-IMP::AEXP-COUNT)
(SIMPL-IMP::AEXP-COUNT-OF-AEXP-FIX-X
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (2 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-VAR))
 (2 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-MUL))
 (2 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-CONST))
 (2 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-ADD))
 )
(SIMPL-IMP::AEXP-COUNT-AEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::AEXP-COUNT-OF-AEXP-ADD
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-KIND$INLINE))
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-VAR))
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-MUL))
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-CONST))
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-ADD))
 )
(SIMPL-IMP::AEXP-COUNT-OF-AEXP-ADD->LEFT)
(SIMPL-IMP::AEXP-COUNT-OF-AEXP-ADD->RIGHT)
(SIMPL-IMP::AEXP-COUNT-OF-AEXP-MUL
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXP-KIND$INLINE))
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-VAR))
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-MUL))
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-CONST))
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-ADD))
 )
(SIMPL-IMP::AEXP-COUNT-OF-AEXP-MUL->LEFT)
(SIMPL-IMP::AEXP-COUNT-OF-AEXP-MUL->RIGHT)
(TMP-DEFTYPES-BOOLEANP-OF-BOOL-FIX$INLINE)
(SIMPL-IMP::BEXPP
 (7 7 (:LINEAR ACL2-COUNT-OF-CONSP-POSITIVE))
 )
(SIMPL-IMP::CONSP-WHEN-BEXPP)
(SIMPL-IMP::BEXP-KIND$INLINE)
(SIMPL-IMP::BEXP-KIND-POSSIBILITIES)
(SIMPL-IMP::BEXP-FIX$INLINE
 (7 7 (:LINEAR ACL2-COUNT-OF-CONSP-POSITIVE))
 )
(SIMPL-IMP::BEXPP-OF-BEXP-FIX
 (200 12 (:REWRITE BOOL-FIX-WHEN-BOOLEANP))
 (164 4 (:REWRITE BOOLEANP-OF-CAR-WHEN-BOOLEAN-LISTP))
 (128 8 (:DEFINITION BOOLEAN-LISTP))
 (108 36 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (100 20 (:REWRITE BOOLEAN-LISTP-OF-CDR-WHEN-BOOLEAN-LISTP))
 (72 72 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (24 24 (:TYPE-PRESCRIPTION BOOLEANP))
 (24 24 (:REWRITE BOOLEAN-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::BEXP-FIX-WHEN-BEXPP)
(SIMPL-IMP::BEXP-FIX$INLINE)
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT)
(SIMPL-IMP::BEXP-EQUIV$INLINE)
(SIMPL-IMP::BEXP-EQUIV-IS-AN-EQUIVALENCE)
(SIMPL-IMP::BEXP-EQUIV-IMPLIES-EQUAL-BEXP-FIX-1)
(SIMPL-IMP::BEXP-FIX-UNDER-BEXP-EQUIV)
(SIMPL-IMP::EQUAL-OF-BEXP-FIX-1-FORWARD-TO-BEXP-EQUIV)
(SIMPL-IMP::EQUAL-OF-BEXP-FIX-2-FORWARD-TO-BEXP-EQUIV)
(SIMPL-IMP::BEXP-EQUIV-OF-BEXP-FIX-1-FORWARD)
(SIMPL-IMP::BEXP-EQUIV-OF-BEXP-FIX-2-FORWARD)
(SIMPL-IMP::BEXP-KIND$INLINE-OF-BEXP-FIX-X
 (28 20 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (22 16 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (13 9 (:REWRITE BOOL-FIX-WHEN-BOOLEANP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (4 4 (:TYPE-PRESCRIPTION BOOLEANP))
 )
(SIMPL-IMP::BEXP-KIND$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::CONSP-OF-BEXP-FIX)
(SIMPL-IMP::TAG-WHEN-BEXPP-FORWARD)
(SIMPL-IMP::TAG-OF-BEXP-FIX)
(SIMPL-IMP::BEXP-CONST->VALUE$INLINE)
(SIMPL-IMP::BOOLEANP-OF-BEXP-CONST->VALUE
 (3 1 (:REWRITE BOOL-FIX-WHEN-BOOLEANP))
 )
(SIMPL-IMP::BEXP-CONST->VALUE$INLINE-OF-BEXP-FIX-X
 (13 5 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-CONST->VALUE$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-CONST->VALUE-WHEN-WRONG-KIND
 (6 2 (:REWRITE BOOL-FIX-WHEN-BOOLEANP))
 (4 4 (:TYPE-PRESCRIPTION BOOLEANP))
 )
(SIMPL-IMP::BEXP-CONST)
(SIMPL-IMP::RETURN-TYPE-OF-BEXP-CONST
 (6 2 (:REWRITE BOOL-FIX-WHEN-BOOLEANP))
 (4 4 (:TYPE-PRESCRIPTION BOOLEANP))
 )
(SIMPL-IMP::BEXP-CONST->VALUE-OF-BEXP-CONST)
(SIMPL-IMP::BEXP-CONST-OF-FIELDS
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-FIX-WHEN-CONST
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::EQUAL-OF-BEXP-CONST
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SIMPL-IMP::BEXP-CONST-OF-BOOL-FIX-VALUE)
(SIMPL-IMP::BEXP-CONST-IFF-CONGRUENCE-ON-VALUE)
(SIMPL-IMP::BEXP-EQUAL->LEFT$INLINE)
(SIMPL-IMP::AEXPP-OF-BEXP-EQUAL->LEFT
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::BEXP-EQUAL->LEFT$INLINE-OF-BEXP-FIX-X
 (12 4 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-EQUAL->LEFT$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-EQUAL->LEFT-WHEN-WRONG-KIND
 (6 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::BEXP-EQUAL->RIGHT$INLINE)
(SIMPL-IMP::AEXPP-OF-BEXP-EQUAL->RIGHT
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::BEXP-EQUAL->RIGHT$INLINE-OF-BEXP-FIX-X
 (12 4 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-EQUAL->RIGHT$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-EQUAL->RIGHT-WHEN-WRONG-KIND
 (6 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::BEXP-EQUAL)
(SIMPL-IMP::RETURN-TYPE-OF-BEXP-EQUAL
 (12 4 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::BEXP-EQUAL->LEFT-OF-BEXP-EQUAL)
(SIMPL-IMP::BEXP-EQUAL->RIGHT-OF-BEXP-EQUAL)
(SIMPL-IMP::BEXP-EQUAL-OF-FIELDS
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-FIX-WHEN-EQUAL
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::EQUAL-OF-BEXP-EQUAL)
(SIMPL-IMP::BEXP-EQUAL-OF-AEXP-FIX-LEFT)
(SIMPL-IMP::BEXP-EQUAL-AEXP-EQUIV-CONGRUENCE-ON-LEFT)
(SIMPL-IMP::BEXP-EQUAL-OF-AEXP-FIX-RIGHT)
(SIMPL-IMP::BEXP-EQUAL-AEXP-EQUIV-CONGRUENCE-ON-RIGHT)
(SIMPL-IMP::BEXP-LESS->LEFT$INLINE)
(SIMPL-IMP::AEXPP-OF-BEXP-LESS->LEFT
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::BEXP-LESS->LEFT$INLINE-OF-BEXP-FIX-X
 (12 4 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-LESS->LEFT$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-LESS->LEFT-WHEN-WRONG-KIND
 (6 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::BEXP-LESS->RIGHT$INLINE)
(SIMPL-IMP::AEXPP-OF-BEXP-LESS->RIGHT
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::BEXP-LESS->RIGHT$INLINE-OF-BEXP-FIX-X
 (12 4 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-LESS->RIGHT$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-LESS->RIGHT-WHEN-WRONG-KIND
 (6 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::BEXP-LESS)
(SIMPL-IMP::RETURN-TYPE-OF-BEXP-LESS
 (12 4 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::BEXP-LESS->LEFT-OF-BEXP-LESS)
(SIMPL-IMP::BEXP-LESS->RIGHT-OF-BEXP-LESS)
(SIMPL-IMP::BEXP-LESS-OF-FIELDS
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-FIX-WHEN-LESS
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::EQUAL-OF-BEXP-LESS)
(SIMPL-IMP::BEXP-LESS-OF-AEXP-FIX-LEFT)
(SIMPL-IMP::BEXP-LESS-AEXP-EQUIV-CONGRUENCE-ON-LEFT)
(SIMPL-IMP::BEXP-LESS-OF-AEXP-FIX-RIGHT)
(SIMPL-IMP::BEXP-LESS-AEXP-EQUIV-CONGRUENCE-ON-RIGHT)
(SIMPL-IMP::BEXP-NOT->ARG$INLINE)
(SIMPL-IMP::BEXPP-OF-BEXP-NOT->ARG
 (6 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 )
(SIMPL-IMP::BEXP-NOT->ARG$INLINE-OF-BEXP-FIX-X)
(SIMPL-IMP::BEXP-NOT->ARG$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-NOT->ARG-WHEN-WRONG-KIND)
(SIMPL-IMP::BEXP-NOT)
(SIMPL-IMP::RETURN-TYPE-OF-BEXP-NOT
 (176 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (104 104 (:TYPE-PRESCRIPTION LEN))
 (90 26 (:REWRITE FTY::EQUAL-OF-LEN))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (10 10 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION BOOLEANP))
 )
(SIMPL-IMP::BEXP-NOT->ARG-OF-BEXP-NOT
 (27 6 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXP-NOT))
 )
(SIMPL-IMP::BEXP-NOT-OF-FIELDS
 (7 3 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-FIX-WHEN-NOT
 (7 3 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::EQUAL-OF-BEXP-NOT)
(SIMPL-IMP::BEXP-NOT-OF-BEXP-FIX-ARG)
(SIMPL-IMP::BEXP-NOT-BEXP-EQUIV-CONGRUENCE-ON-ARG)
(SIMPL-IMP::BEXP-AND->LEFT$INLINE)
(SIMPL-IMP::BEXPP-OF-BEXP-AND->LEFT
 (6 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 )
(SIMPL-IMP::BEXP-AND->LEFT$INLINE-OF-BEXP-FIX-X)
(SIMPL-IMP::BEXP-AND->LEFT$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-AND->LEFT-WHEN-WRONG-KIND)
(SIMPL-IMP::BEXP-AND->RIGHT$INLINE)
(SIMPL-IMP::BEXPP-OF-BEXP-AND->RIGHT
 (6 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 )
(SIMPL-IMP::BEXP-AND->RIGHT$INLINE-OF-BEXP-FIX-X)
(SIMPL-IMP::BEXP-AND->RIGHT$INLINE-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-AND->RIGHT-WHEN-WRONG-KIND)
(SIMPL-IMP::BEXP-AND)
(SIMPL-IMP::RETURN-TYPE-OF-BEXP-AND
 (352 4 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (208 208 (:TYPE-PRESCRIPTION LEN))
 (180 52 (:REWRITE FTY::EQUAL-OF-LEN))
 (24 24 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (20 20 (:TYPE-PRESCRIPTION TRUE-LISTP))
 (4 4 (:TYPE-PRESCRIPTION BOOLEANP))
 )
(SIMPL-IMP::BEXP-AND->LEFT-OF-BEXP-AND
 (27 6 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXP-AND))
 )
(SIMPL-IMP::BEXP-AND->RIGHT-OF-BEXP-AND
 (27 6 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXP-AND))
 )
(SIMPL-IMP::BEXP-AND-OF-FIELDS
 (11 5 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-FIX-WHEN-AND
 (11 5 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::EQUAL-OF-BEXP-AND
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SIMPL-IMP::BEXP-AND-OF-BEXP-FIX-LEFT)
(SIMPL-IMP::BEXP-AND-BEXP-EQUIV-CONGRUENCE-ON-LEFT)
(SIMPL-IMP::BEXP-AND-OF-BEXP-FIX-RIGHT)
(SIMPL-IMP::BEXP-AND-BEXP-EQUIV-CONGRUENCE-ON-RIGHT)
(SIMPL-IMP::BEXP-FIX-REDEF
 (18 6 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::BEXP-COUNT
 (16 8 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-LESS))
 (16 8 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-EQUAL))
 (16 8 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-CONST))
 )
(SIMPL-IMP::NATP-OF-BEXP-COUNT)
(SIMPL-IMP::BEXP-COUNT)
(SIMPL-IMP::BEXP-COUNT-OF-BEXP-FIX-X
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-NOT))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-LESS))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-EQUAL))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-CONST))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-AND))
 )
(SIMPL-IMP::BEXP-COUNT-BEXP-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::BEXP-COUNT-OF-BEXP-NOT
 (5 5 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXP-KIND$INLINE))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-NOT))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-LESS))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-EQUAL))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-CONST))
 (2 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-AND))
 )
(SIMPL-IMP::BEXP-COUNT-OF-BEXP-NOT->ARG)
(SIMPL-IMP::BEXP-COUNT-OF-BEXP-AND
 (10 10 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXP-KIND$INLINE))
 (4 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-NOT))
 (4 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-LESS))
 (4 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-EQUAL))
 (4 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-CONST))
 (4 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-AND))
 )
(SIMPL-IMP::BEXP-COUNT-OF-BEXP-AND->LEFT)
(SIMPL-IMP::BEXP-COUNT-OF-BEXP-AND->RIGHT)
(TMP-DEFTYPES-STRINGP-OF-STR-FIX$INLINE)
(SIMPL-IMP::COMMP
 (10 10 (:LINEAR ACL2-COUNT-OF-CONSP-POSITIVE))
 )
(SIMPL-IMP::COMMAND-FIXTYPES-P-FLAG
 (24 10 (:LINEAR ACL2-COUNT-OF-CONSP-POSITIVE))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(SIMPL-IMP::COMMAND-FIXTYPES-P-FLAG-EQUIVALENCES)
(SIMPL-IMP::CONSP-WHEN-COMMP)
(STD::DEFLIST-LOCAL-BOOLEANP-ELEMENT-THM)
(STD::DEFLIST-LOCAL-ELEMENTP-OF-NIL-THM)
(SIMPL-IMP::COMM-LISTP-OF-CONS)
(SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP)
(SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP)
(SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP)
(SIMPL-IMP::TRUE-LISTP-WHEN-COMM-LISTP-COMPOUND-RECOGNIZER)
(SIMPL-IMP::COMM-LISTP-OF-LIST-FIX)
(SIMPL-IMP::COMM-LISTP-OF-REV)
(SIMPL-IMP::COMM-LISTP-OF-APPEND)
(SIMPL-IMP::COMM-KIND$INLINE)
(SIMPL-IMP::COMM-KIND-POSSIBILITIES)
(SIMPL-IMP::COMM-FIX$INLINE
 (10 10 (:LINEAR ACL2-COUNT-OF-CONSP-POSITIVE))
 )
(SIMPL-IMP::COMMAND-FIXTYPES-FIX-FLAG
 (108 102 (:LINEAR ACL2-COUNT-OF-CONSP-POSITIVE))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(SIMPL-IMP::COMMAND-FIXTYPES-FIX-FLAG-EQUIVALENCES)
(SIMPL-IMP::FLAG-LEMMA-FOR-RETURN-TYPE-OF-COMM-FIX.NEW-X
 (70 18 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (36 12 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (24 24 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (18 6 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (6 6 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(SIMPL-IMP::RETURN-TYPE-OF-COMM-FIX.NEW-X)
(SIMPL-IMP::RETURN-TYPE-OF-COMM-LIST-FIX.NEWX)
(SIMPL-IMP::FLAG-LEMMA-FOR-COMM-FIX-WHEN-COMMP
 (17 4 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (11 11 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 )
(SIMPL-IMP::COMM-FIX-WHEN-COMMP)
(SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP)
(SIMPL-IMP::COMM-FIX$INLINE
 (7 7 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (4 1 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT)
(SIMPL-IMP::COMM-EQUIV$INLINE)
(SIMPL-IMP::COMM-EQUIV-IS-AN-EQUIVALENCE)
(SIMPL-IMP::COMM-EQUIV-IMPLIES-EQUAL-COMM-FIX-1)
(SIMPL-IMP::COMM-FIX-UNDER-COMM-EQUIV)
(SIMPL-IMP::EQUAL-OF-COMM-FIX-1-FORWARD-TO-COMM-EQUIV)
(SIMPL-IMP::EQUAL-OF-COMM-FIX-2-FORWARD-TO-COMM-EQUIV)
(SIMPL-IMP::COMM-EQUIV-OF-COMM-FIX-1-FORWARD)
(SIMPL-IMP::COMM-EQUIV-OF-COMM-FIX-2-FORWARD)
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-LIST-EQUIV$INLINE)
(SIMPL-IMP::COMM-LIST-EQUIV-IS-AN-EQUIVALENCE)
(SIMPL-IMP::COMM-LIST-EQUIV-IMPLIES-EQUAL-COMM-LIST-FIX-1)
(SIMPL-IMP::COMM-LIST-FIX-UNDER-COMM-LIST-EQUIV)
(SIMPL-IMP::EQUAL-OF-COMM-LIST-FIX-1-FORWARD-TO-COMM-LIST-EQUIV)
(SIMPL-IMP::EQUAL-OF-COMM-LIST-FIX-2-FORWARD-TO-COMM-LIST-EQUIV)
(SIMPL-IMP::COMM-LIST-EQUIV-OF-COMM-LIST-FIX-1-FORWARD)
(SIMPL-IMP::COMM-LIST-EQUIV-OF-COMM-LIST-FIX-2-FORWARD)
(SIMPL-IMP::COMM-KIND$INLINE-OF-COMM-FIX-X
 (36 15 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (15 15 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (14 10 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (13 9 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (9 9 (:REWRITE STR-FIX-WHEN-STRINGP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (1 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 )
(SIMPL-IMP::COMM-KIND$INLINE-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::CONSP-OF-COMM-FIX)
(SIMPL-IMP::CAR-OF-COMM-LIST-FIX-X-UNDER-COMM-EQUIV
 (24 3 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (14 2 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LIST-FIX$INLINE))
 (12 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (10 10 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (8 5 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 )
(SIMPL-IMP::CAR-COMM-LIST-EQUIV-CONGRUENCE-ON-X-UNDER-COMM-EQUIV)
(SIMPL-IMP::CDR-OF-COMM-LIST-FIX-X-UNDER-COMM-LIST-EQUIV
 (29 3 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (14 2 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 2 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::CDR-COMM-LIST-EQUIV-CONGRUENCE-ON-X-UNDER-COMM-LIST-EQUIV)
(SIMPL-IMP::CONS-OF-COMM-FIX-X-UNDER-COMM-LIST-EQUIV
 (21 4 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (10 2 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (5 5 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::CONS-COMM-EQUIV-CONGRUENCE-ON-X-UNDER-COMM-LIST-EQUIV)
(SIMPL-IMP::CONS-OF-COMM-LIST-FIX-Y-UNDER-COMM-LIST-EQUIV
 (10 2 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (5 4 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (4 2 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 )
(SIMPL-IMP::CONS-COMM-LIST-EQUIV-CONGRUENCE-ON-Y-UNDER-COMM-LIST-EQUIV)
(SIMPL-IMP::CONSP-OF-COMM-LIST-FIX
 (12 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (7 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (4 4 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (4 1 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::COMM-LIST-FIX-UNDER-IFF
 (12 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (7 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (4 4 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (4 1 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::COMM-LIST-FIX-OF-CONS
 (12 3 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (4 2 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CONS))
 (3 3 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (3 3 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::LEN-OF-COMM-LIST-FIX
 (23 4 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (13 13 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (8 2 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (7 7 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (7 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (4 1 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (1 1 (:REWRITE FTY::EQUAL-OF-LEN))
 )
(SIMPL-IMP::COMM-LIST-FIX-OF-APPEND
 (76 10 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (38 2 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-APPEND))
 (29 29 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (22 16 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (16 2 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-LIST-FIX))
 (12 12 (:TYPE-PRESCRIPTION TRUE-LIST-FIX))
 (10 4 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (8 2 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (4 1 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::COMM-LIST-FIX-OF-REPEAT
 (20 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (10 4 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (6 6 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (1 1 (:REWRITE-QUOTED-CONSTANT SIMPL-IMP::COMM-LIST-FIX-UNDER-COMM-LIST-EQUIV))
 )
(SIMPL-IMP::LIST-EQUIV-REFINES-COMM-LIST-EQUIV
 (98 14 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (72 8 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (70 70 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (60 18 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (48 8 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (36 36 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (16 16 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SIMPL-IMP::NTH-OF-COMM-LIST-FIX
 (107 20 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (84 16 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (69 69 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (37 37 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (36 9 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (32 32 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (32 8 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (2 1 (:REWRITE DEFAULT-+-2))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-+-1))
 )
(SIMPL-IMP::COMM-LIST-EQUIV-IMPLIES-COMM-LIST-EQUIV-APPEND-1
 (238 46 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (162 22 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (160 160 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (96 22 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (94 25 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (81 81 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (44 44 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (6 6 (:REWRITE SIMPL-IMP::CONSP-OF-COMM-LIST-FIX))
 )
(SIMPL-IMP::COMM-LIST-EQUIV-IMPLIES-COMM-LIST-EQUIV-APPEND-2
 (181 34 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (121 121 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (120 16 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (78 21 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (72 16 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (61 61 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (32 32 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (4 4 (:REWRITE SIMPL-IMP::CONSP-OF-COMM-LIST-FIX))
 )
(SIMPL-IMP::COMM-LIST-EQUIV-IMPLIES-COMM-LIST-EQUIV-NTHCDR-2
 (232 37 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (161 161 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (156 20 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (104 29 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (96 20 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (81 81 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (40 40 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::COMM-LIST-EQUIV-IMPLIES-COMM-LIST-EQUIV-TAKE-2
 (476 54 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (333 39 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (272 272 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (215 53 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (204 39 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (172 136 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (78 78 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (50 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (10 10 (:REWRITE-QUOTED-CONSTANT SIMPL-IMP::COMM-LIST-FIX-UNDER-COMM-LIST-EQUIV))
 (1 1 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(SIMPL-IMP::TAG-WHEN-COMMP-FORWARD
 (3 3 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::TAG-OF-COMM-FIX)
(SIMPL-IMP::COMM-ASG->VAR$INLINE)
(SIMPL-IMP::STRINGP-OF-COMM-ASG->VAR)
(SIMPL-IMP::COMM-ASG->VAR$INLINE-OF-COMM-FIX-X
 (13 5 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::CONSP-OF-COMM-FIX))
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-FIX$INLINE))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (6 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::COMM-ASG->VAR$INLINE-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-ASG->VAR-WHEN-WRONG-KIND
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(SIMPL-IMP::COMM-ASG->EXP$INLINE)
(SIMPL-IMP::AEXPP-OF-COMM-ASG->EXP
 (3 1 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 )
(SIMPL-IMP::COMM-ASG->EXP$INLINE-OF-COMM-FIX-X
 (13 5 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(SIMPL-IMP::COMM-ASG->EXP$INLINE-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-ASG->EXP-WHEN-WRONG-KIND
 (6 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::COMM-ASG)
(SIMPL-IMP::RETURN-TYPE-OF-COMM-ASG
 (6 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(SIMPL-IMP::COMM-ASG->VAR-OF-COMM-ASG
 (9 9 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-ASG))
 )
(SIMPL-IMP::COMM-ASG->EXP-OF-COMM-ASG)
(SIMPL-IMP::COMM-ASG-OF-FIELDS
 (3 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::COMM-FIX-WHEN-ASG
 (3 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::EQUAL-OF-COMM-ASG
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SIMPL-IMP::COMM-ASG-OF-STR-FIX-VAR
 (4 2 (:REWRITE SIMPL-IMP::AEXP-FIX-WHEN-AEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::AEXPP))
 )
(SIMPL-IMP::COMM-ASG-STREQV-CONGRUENCE-ON-VAR)
(SIMPL-IMP::COMM-ASG-OF-AEXP-FIX-EXP
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(SIMPL-IMP::COMM-ASG-AEXP-EQUIV-CONGRUENCE-ON-EXP)
(SIMPL-IMP::COMM-IF->COND$INLINE
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::BEXPP-OF-COMM-IF->COND
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 )
(SIMPL-IMP::COMM-IF->COND$INLINE-OF-COMM-FIX-X
 (12 4 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (8 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-IF->COND$INLINE-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-IF->COND-WHEN-WRONG-KIND
 (6 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::COMM-IF->THEN$INLINE
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-LISTP-OF-COMM-IF->THEN
 (10 1 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-IF->THEN$INLINE-OF-COMM-FIX-X
 (32 8 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::CONSP-OF-COMM-FIX))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-FIX$INLINE))
 (12 4 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::COMM-IF->THEN$INLINE-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-IF->THEN-WHEN-WRONG-KIND)
(SIMPL-IMP::COMM-IF->ELSE$INLINE
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-LISTP-OF-COMM-IF->ELSE
 (10 1 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-IF->ELSE$INLINE-OF-COMM-FIX-X
 (32 8 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::CONSP-OF-COMM-FIX))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-FIX$INLINE))
 (12 4 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::COMM-IF->ELSE$INLINE-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-IF->ELSE-WHEN-WRONG-KIND)
(SIMPL-IMP::COMM-IF
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::RETURN-TYPE-OF-COMM-IF
 (16 4 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (6 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (4 4 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-IF->COND-OF-COMM-IF)
(SIMPL-IMP::COMM-IF->THEN-OF-COMM-IF
 (42 6 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-IF))
 (15 6 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 )
(SIMPL-IMP::COMM-IF->ELSE-OF-COMM-IF
 (42 6 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-IF))
 (15 6 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 )
(SIMPL-IMP::COMM-IF-OF-FIELDS
 (10 4 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (3 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-FIX-WHEN-IF
 (10 4 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (3 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::EQUAL-OF-COMM-IF
 (22 22 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SIMPL-IMP::COMM-IF-OF-BEXP-FIX-COND
 (10 4 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-IF-BEXP-EQUIV-CONGRUENCE-ON-COND)
(SIMPL-IMP::COMM-IF-OF-COMM-LIST-FIX-THEN)
(SIMPL-IMP::COMM-IF-COMM-LIST-EQUIV-CONGRUENCE-ON-THEN)
(SIMPL-IMP::COMM-IF-OF-COMM-LIST-FIX-ELSE)
(SIMPL-IMP::COMM-IF-COMM-LIST-EQUIV-CONGRUENCE-ON-ELSE)
(SIMPL-IMP::COMM-WHILE->COND$INLINE
 (1 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::BEXPP-OF-COMM-WHILE->COND
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 )
(SIMPL-IMP::COMM-WHILE->COND$INLINE-OF-COMM-FIX-X
 (12 4 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (1 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-WHILE->COND$INLINE-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-WHILE->COND-WHEN-WRONG-KIND
 (6 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::COMM-WHILE->BODY$INLINE
 (1 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-LISTP-OF-COMM-WHILE->BODY
 (10 1 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (4 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-WHILE->BODY$INLINE-OF-COMM-FIX-X
 (31 7 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::CONSP-OF-COMM-FIX))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-FIX$INLINE))
 (12 4 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (3 1 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 )
(SIMPL-IMP::COMM-WHILE->BODY$INLINE-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-WHILE->BODY-WHEN-WRONG-KIND)
(SIMPL-IMP::COMM-WHILE
 (1 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::RETURN-TYPE-OF-COMM-WHILE
 (8 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (6 2 (:REWRITE SIMPL-IMP::BEXP-FIX-WHEN-BEXPP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::BEXPP))
 (2 2 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-WHILE->COND-OF-COMM-WHILE)
(SIMPL-IMP::COMM-WHILE->BODY-OF-COMM-WHILE
 (42 6 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (18 18 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-WHILE))
 (15 6 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 )
(SIMPL-IMP::COMM-WHILE-OF-FIELDS
 (5 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (3 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (1 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-FIX-WHEN-WHILE
 (5 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (3 1 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (1 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::EQUAL-OF-COMM-WHILE
 (15 15 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-WHILE-OF-BEXP-FIX-COND
 (5 2 (:REWRITE SIMPL-IMP::COMM-LIST-FIX-WHEN-COMM-LISTP))
 (2 2 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-LISTP))
 (1 1 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::COMM-WHILE-BEXP-EQUIV-CONGRUENCE-ON-COND)
(SIMPL-IMP::COMM-WHILE-OF-COMM-LIST-FIX-BODY)
(SIMPL-IMP::COMM-WHILE-COMM-LIST-EQUIV-CONGRUENCE-ON-BODY)
(SIMPL-IMP::COMM-FIX-REDEF
 (12 4 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (8 8 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::COMM-COUNT
 (36 6 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (23 23 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (20 5 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (20 5 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (19 9 (:REWRITE SIMPL-IMP::CONSP-OF-COMM-LIST-FIX))
 (12 6 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-ASG))
 (10 10 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(SIMPL-IMP::COMMAND-FIXTYPES-COUNT-FLAG
 (39 7 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (24 24 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (20 5 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (20 5 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (19 9 (:REWRITE SIMPL-IMP::CONSP-OF-COMM-LIST-FIX))
 (14 7 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-ASG))
 (12 12 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 )
(FLAG::FLAG-EQUIV-LEMMA)
(SIMPL-IMP::COMMAND-FIXTYPES-COUNT-FLAG-EQUIVALENCES)
(SIMPL-IMP::FLAG-LEMMA-FOR-RETURN-TYPE-OF-COMM-COUNT.COUNT
 (18 6 (:DEFINITION SIMPL-IMP::COMM-LIST-COUNT))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-WHILE->BODY$INLINE))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-IF->THEN$INLINE))
 (4 4 (:TYPE-PRESCRIPTION SIMPL-IMP::COMM-IF->ELSE$INLINE))
 )
(SIMPL-IMP::RETURN-TYPE-OF-COMM-COUNT.COUNT)
(SIMPL-IMP::RETURN-TYPE-OF-COMM-LIST-COUNT.COUNT)
(SIMPL-IMP::COMM-COUNT
 (3 3 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 )
(SIMPL-IMP::FLAG-LEMMA-FOR-COMM-COUNT-OF-COMM-FIX-X
 (56 8 (:REWRITE SIMPL-IMP::COMM-FIX-WHEN-COMMP))
 (36 36 (:REWRITE SIMPL-IMP::COMM-LISTP-WHEN-NOT-CONSP))
 (32 8 (:REWRITE DEFAULT-+-2))
 (32 8 (:REWRITE SIMPL-IMP::COMMP-OF-CAR-WHEN-COMM-LISTP))
 (32 8 (:REWRITE SIMPL-IMP::COMM-LISTP-OF-CDR-WHEN-COMM-LISTP))
 (16 16 (:TYPE-PRESCRIPTION SIMPL-IMP::COMMP))
 (16 8 (:REWRITE DEFAULT-+-1))
 (14 8 (:REWRITE DEFAULT-CDR))
 (14 8 (:REWRITE DEFAULT-CAR))
 (4 4 (:REWRITE FOLD-CONSTS-IN-+))
 )
(SIMPL-IMP::COMM-COUNT-OF-COMM-FIX-X)
(SIMPL-IMP::COMM-LIST-COUNT-OF-COMM-LIST-FIX-X)
(SIMPL-IMP::COMM-COUNT-COMM-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-LIST-COUNT-COMM-LIST-EQUIV-CONGRUENCE-ON-X)
(SIMPL-IMP::COMM-COUNT-OF-COMM-IF)
(SIMPL-IMP::COMM-LIST-COUNT-OF-COMM-IF->THEN)
(SIMPL-IMP::COMM-LIST-COUNT-OF-COMM-IF->ELSE)
(SIMPL-IMP::COMM-COUNT-OF-COMM-WHILE)
(SIMPL-IMP::COMM-LIST-COUNT-OF-COMM-WHILE->BODY)
(SIMPL-IMP::COMM-LIST-COUNT-OF-CONS)
(SIMPL-IMP::COMM-COUNT-OF-CAR
 (6 2 (:REWRITE DEFAULT-<-2))
 (6 2 (:REWRITE DEFAULT-<-1))
 (3 1 (:REWRITE DEFAULT-+-2))
 (3 1 (:REWRITE DEFAULT-+-1))
 (2 2 (:REWRITE DEFAULT-CAR))
 )
(SIMPL-IMP::COMM-LIST-COUNT-OF-CDR
 (6 2 (:REWRITE DEFAULT-<-2))
 (6 2 (:REWRITE DEFAULT-<-1))
 (3 1 (:REWRITE DEFAULT-+-2))
 (3 1 (:REWRITE DEFAULT-+-1))
 (2 2 (:REWRITE DEFAULT-CDR))
 )
