(TMP-DEFTYPES-NATP-OF-NFIX)
(TMP-DEFTYPES-NFIX-WHEN-NATP
 (2 2 (:REWRITE DEFAULT-<-2))
 (2 2 (:REWRITE DEFAULT-<-1))
 )
(TMP-DEFTYPES-SYMBOLP-OF-SYMBOL-FIX)
(TMP-DEFTYPES-STRINGP-OF-STR-FIX$INLINE)
(VCD-VAR-ELEM-P
 (40 10 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (14 14 (:REWRITE DEFAULT-CAR))
 (10 10 (:REWRITE DEFAULT-CDR))
 )
(CONSP-WHEN-VCD-VAR-ELEM-P)
(VCD-VAR-ELEM-FIX$INLINE)
(VCD-VAR-ELEM-P-OF-VCD-VAR-ELEM-FIX
 (18 18 (:REWRITE STR-FIX-WHEN-STRINGP))
 (12 4 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (8 8 (:TYPE-PRESCRIPTION NATP))
 (6 6 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P
 (5 2 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (1 1 (:DEFINITION STRIP-CARS))
 (1 1 (:DEFINITION ALISTP))
 )
(VCD-VAR-ELEM-FIX$INLINE
 (5 2 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (1 1 (:DEFINITION STRIP-CARS))
 (1 1 (:DEFINITION ALISTP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT)
(VCD-VAR-ELEM-EQUIV$INLINE)
(VCD-VAR-ELEM-EQUIV-IS-AN-EQUIVALENCE)
(VCD-VAR-ELEM-EQUIV-IMPLIES-EQUAL-VCD-VAR-ELEM-FIX-1)
(VCD-VAR-ELEM-FIX-UNDER-VCD-VAR-ELEM-EQUIV)
(EQUAL-OF-VCD-VAR-ELEM-FIX-1-FORWARD-TO-VCD-VAR-ELEM-EQUIV)
(EQUAL-OF-VCD-VAR-ELEM-FIX-2-FORWARD-TO-VCD-VAR-ELEM-EQUIV)
(VCD-VAR-ELEM-EQUIV-OF-VCD-VAR-ELEM-FIX-1-FORWARD)
(VCD-VAR-ELEM-EQUIV-OF-VCD-VAR-ELEM-FIX-2-FORWARD)
(VCD-VAR-ELEM->V-SIZE$INLINE
 (4 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (1 1 (:DEFINITION STRIP-CARS))
 (1 1 (:DEFINITION ALISTP))
 )
(NATP-OF-VCD-VAR-ELEM->V-SIZE)
(VCD-VAR-ELEM->V-SIZE$INLINE-OF-VCD-VAR-ELEM-FIX-X
 (10 10 (:TYPE-PRESCRIPTION NATP))
 (9 3 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-FIX$INLINE))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 (1 1 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM->V-SIZE$INLINE-VCD-VAR-ELEM-EQUIV-CONGRUENCE-ON-X)
(VCD-VAR-ELEM->V-TYPE$INLINE
 (4 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(SYMBOLP-OF-VCD-VAR-ELEM->V-TYPE)
(VCD-VAR-ELEM->V-TYPE$INLINE-OF-VCD-VAR-ELEM-FIX-X
 (9 3 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-FIX$INLINE))
 (3 1 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-VAR-ELEM->V-TYPE$INLINE-VCD-VAR-ELEM-EQUIV-CONGRUENCE-ON-X)
(VCD-VAR-ELEM->V-VEC$INLINE
 (4 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(STRINGP-OF-VCD-VAR-ELEM->V-VEC)
(VCD-VAR-ELEM->V-VEC$INLINE-OF-VCD-VAR-ELEM-FIX-X
 (9 3 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-FIX$INLINE))
 (3 1 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 (1 1 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM->V-VEC$INLINE-VCD-VAR-ELEM-EQUIV-CONGRUENCE-ON-X)
(VCD-VAR-ELEM->V-ID$INLINE
 (4 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(STRINGP-OF-VCD-VAR-ELEM->V-ID)
(VCD-VAR-ELEM->V-ID$INLINE-OF-VCD-VAR-ELEM-FIX-X
 (9 3 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-FIX$INLINE))
 (3 1 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 (1 1 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM->V-ID$INLINE-VCD-VAR-ELEM-EQUIV-CONGRUENCE-ON-X)
(VCD-VAR-ELEM)
(VCD-VAR-ELEM-P-OF-VCD-VAR-ELEM
 (16 16 (:REWRITE STR-FIX-WHEN-STRINGP))
 (10 4 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (6 6 (:TYPE-PRESCRIPTION NATP))
 (5 5 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM->V-SIZE-OF-VCD-VAR-ELEM
 (10 10 (:TYPE-PRESCRIPTION NATP))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM))
 )
(VCD-VAR-ELEM->V-TYPE-OF-VCD-VAR-ELEM
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM))
 )
(VCD-VAR-ELEM->V-VEC-OF-VCD-VAR-ELEM
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM))
 )
(VCD-VAR-ELEM->V-ID-OF-VCD-VAR-ELEM
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM))
 )
(VCD-VAR-ELEM-OF-FIELDS
 (3 1 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 )
(VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM
 (3 1 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 )
(EQUAL-OF-VCD-VAR-ELEM
 (56 56 (:REWRITE STR-FIX-WHEN-STRINGP))
 (28 28 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM-OF-NFIX-V-SIZE
 (4 4 (:REWRITE STR-FIX-WHEN-STRINGP))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM-NAT-EQUIV-CONGRUENCE-ON-V-SIZE)
(VCD-VAR-ELEM-OF-SYMBOL-FIX-V-TYPE
 (4 4 (:REWRITE STR-FIX-WHEN-STRINGP))
 (4 2 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 )
(VCD-VAR-ELEM-SYMBOL-EQUIV-CONGRUENCE-ON-V-TYPE)
(VCD-VAR-ELEM-OF-STR-FIX-V-VEC
 (4 2 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM-STREQV-CONGRUENCE-ON-V-VEC)
(VCD-VAR-ELEM-OF-STR-FIX-V-ID
 (4 2 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (2 2 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-VAR-ELEM-STREQV-CONGRUENCE-ON-V-ID)
(VCD-VAR-ELEM-FIX-REDEF)
(VCD-VAR-MAP-P)
(BOOLEANP-OF-SVAR-P-FOR-VCD-VAR-MAP-P-KEY-LEMMA)
(BOOLEANP-OF-VCD-VAR-ELEM-P-FOR-VCD-VAR-MAP-P-VAL-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VCD-VAR-MAP-P-KEY)
(BOOLEANP-OF-VCD-VAR-ELEM-P-FOR-VCD-VAR-MAP-P-VAL)
(VCD-VAR-MAP-P-OF-REPEAT)
(VCD-VAR-MAP-P-OF-REV)
(VCD-VAR-MAP-P-OF-LIST-FIX)
(VCD-VAR-MAP-P-OF-APPEND)
(VCD-VAR-MAP-P-WHEN-NOT-CONSP)
(VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P)
(VCD-VAR-MAP-P-OF-CONS)
(VCD-VAR-MAP-P-OF-FAST-ALIST-CLEAN
 (56 10 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (16 16 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-VAR-MAP-P-OF-HONS-SHRINK-ALIST)
(VCD-VAR-MAP-P-OF-HONS-ACONS)
(VCD-VAR-ELEM-P-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-VAR-MAP-P)
(VCD-VAR-ELEM-P-OF-CDAR-WHEN-VCD-VAR-MAP-P)
(SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P)
(VCD-VAR-MAP-FIX$INLINE)
(VCD-VAR-MAP-P-OF-VCD-VAR-MAP-FIX
 (327 7 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (171 8 (:DEFINITION VCD-VAR-MAP-P))
 (169 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (116 12 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (84 7 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (77 15 (:REWRITE VCD-VAR-ELEM-P-OF-CDAR-WHEN-VCD-VAR-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (36 6 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (30 30 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (28 28 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (26 26 (:REWRITE DEFAULT-CAR))
 (18 18 (:REWRITE DEFAULT-CDR))
 (16 16 (:TYPE-PRESCRIPTION SV::SVEX-ALIST-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-ALIST-P))
 (16 16 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (12 12 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (12 2 (:REWRITE SV::SVEX-ALIST-P-OF-CDR-WHEN-SVEX-ALIST-P))
 (12 2 (:REWRITE SV::SVAR-MAP-P-OF-CDR-WHEN-SVAR-MAP-P))
 (12 2 (:REWRITE SV::SVAR-ALIST-P-OF-CDR-WHEN-SVAR-ALIST-P))
 (8 8 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 )
(VCD-VAR-MAP-FIX-WHEN-VCD-VAR-MAP-P
 (249 29 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (231 29 (:REWRITE VCD-VAR-ELEM-P-OF-CDAR-WHEN-VCD-VAR-MAP-P))
 (229 26 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (61 61 (:REWRITE DEFAULT-CAR))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (36 36 (:REWRITE DEFAULT-CDR))
 (34 34 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (18 18 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (9 9 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-VAR-MAP-FIX$INLINE
 (29 6 (:REWRITE VCD-VAR-ELEM-P-OF-CDAR-WHEN-VCD-VAR-MAP-P))
 (29 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (26 5 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (14 14 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-VAR-MAP-EQUIV$INLINE)
(VCD-VAR-MAP-EQUIV-IS-AN-EQUIVALENCE)
(VCD-VAR-MAP-EQUIV-IMPLIES-EQUAL-VCD-VAR-MAP-FIX-1)
(VCD-VAR-MAP-FIX-UNDER-VCD-VAR-MAP-EQUIV)
(EQUAL-OF-VCD-VAR-MAP-FIX-1-FORWARD-TO-VCD-VAR-MAP-EQUIV)
(EQUAL-OF-VCD-VAR-MAP-FIX-2-FORWARD-TO-VCD-VAR-MAP-EQUIV)
(VCD-VAR-MAP-EQUIV-OF-VCD-VAR-MAP-FIX-1-FORWARD)
(VCD-VAR-MAP-EQUIV-OF-VCD-VAR-MAP-FIX-2-FORWARD)
(CONS-OF-SVAR-FIX-K-UNDER-VCD-VAR-MAP-EQUIV
 (27 4 (:REWRITE VCD-VAR-MAP-FIX-WHEN-VCD-VAR-MAP-P))
 (18 2 (:REWRITE VCD-VAR-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (4 2 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (3 3 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-K-UNDER-VCD-VAR-MAP-EQUIV)
(CONS-OF-VCD-VAR-ELEM-FIX-V-UNDER-VCD-VAR-MAP-EQUIV
 (31 4 (:REWRITE VCD-VAR-MAP-FIX-WHEN-VCD-VAR-MAP-P))
 (22 2 (:REWRITE VCD-VAR-MAP-P-OF-CONS))
 (10 10 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (3 3 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-VCD-VAR-ELEM-EQUIV-CONGRUENCE-ON-V-UNDER-VCD-VAR-MAP-EQUIV)
(CONS-OF-VCD-VAR-MAP-FIX-Y-UNDER-VCD-VAR-MAP-EQUIV
 (17 2 (:REWRITE VCD-VAR-MAP-P-OF-CONS))
 (11 11 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (9 9 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (6 2 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (6 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 4 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-VCD-VAR-MAP-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-VAR-MAP-EQUIV)
(VCD-VAR-MAP-FIX-OF-ACONS
 (17 3 (:REWRITE VCD-VAR-MAP-FIX-WHEN-VCD-VAR-MAP-P))
 (10 1 (:REWRITE VCD-VAR-MAP-P-OF-CONS))
 (5 5 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (4 2 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (2 2 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-VAR-MAP-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VCD-VAR-MAP-P-OF-APPEND))
 (35 11 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (28 1 (:REWRITE VCD-VAR-MAP-P-OF-CONS))
 (22 4 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (22 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (16 4 (:REWRITE VCD-VAR-ELEM-P-OF-CDAR-WHEN-VCD-VAR-MAP-P))
 (16 4 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (9 9 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (8 8 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 )
(CONSP-CAR-OF-VCD-VAR-MAP-FIX
 (20 5 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (14 2 (:REWRITE VCD-VAR-ELEM-FIX-WHEN-VCD-VAR-ELEM-P))
 (14 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (8 2 (:REWRITE VCD-VAR-ELEM-P-OF-CDAR-WHEN-VCD-VAR-MAP-P))
 (8 2 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-VAR-ELEM-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVAR-P))
 )
(TMP-DEFTYPES-STRINGP-OF-STR-FIX$INLINE)
(VCD-ID-MAP-P)
(BOOLEANP-OF-STRINGP-FOR-VCD-ID-MAP-P-KEY-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VCD-ID-MAP-P-VAL-LEMMA)
(BOOLEANP-OF-STRINGP-FOR-VCD-ID-MAP-P-KEY)
(BOOLEANP-OF-SVAR-P-FOR-VCD-ID-MAP-P-VAL)
(VCD-ID-MAP-P-OF-REPEAT)
(VCD-ID-MAP-P-OF-REV)
(VCD-ID-MAP-P-OF-LIST-FIX)
(VCD-ID-MAP-P-OF-APPEND)
(VCD-ID-MAP-P-WHEN-NOT-CONSP)
(VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P)
(VCD-ID-MAP-P-OF-CONS)
(VCD-ID-MAP-P-OF-FAST-ALIST-CLEAN
 (54 10 (:REWRITE VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P))
 (16 16 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 (1 1 (:TYPE-PRESCRIPTION BOOLEANP-OF-STRINGP-FOR-VCD-ID-MAP-P-KEY))
 )
(VCD-ID-MAP-P-OF-HONS-SHRINK-ALIST)
(VCD-ID-MAP-P-OF-HONS-ACONS)
(SVAR-P-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-ID-MAP-P)
(SVAR-P-OF-CDAR-WHEN-VCD-ID-MAP-P)
(STRINGP-OF-CAAR-WHEN-VCD-ID-MAP-P)
(VCD-ID-MAP-FIX$INLINE)
(VCD-ID-MAP-P-OF-VCD-ID-MAP-FIX
 (129 19 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-ID-MAP-P))
 (129 7 (:REWRITE STR-FIX-WHEN-STRINGP))
 (122 7 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (121 8 (:DEFINITION VCD-ID-MAP-P))
 (78 12 (:REWRITE VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P))
 (71 15 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-ID-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CDAR-WHEN-SVAR-MAP-P))
 (30 30 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (26 26 (:REWRITE DEFAULT-CAR))
 (18 18 (:REWRITE DEFAULT-CDR))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-MAP-P))
 (16 16 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (12 2 (:REWRITE SV::SVAR-MAP-P-OF-CDR-WHEN-SVAR-MAP-P))
 (8 8 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (8 4 (:REWRITE STR-FIX-DEFAULT))
 )
(VCD-ID-MAP-FIX-WHEN-VCD-ID-MAP-P
 (174 29 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-ID-MAP-P))
 (153 26 (:REWRITE VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P))
 (130 19 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-ID-MAP-P))
 (61 61 (:REWRITE DEFAULT-CAR))
 (60 15 (:REWRITE SV::SVAR-P-OF-CDAR-WHEN-SVAR-MAP-P))
 (36 36 (:REWRITE DEFAULT-CDR))
 (34 34 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (18 18 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (9 9 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-ID-MAP-FIX$INLINE
 (26 6 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-ID-MAP-P))
 (21 5 (:REWRITE VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P))
 (19 4 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-ID-MAP-P))
 (13 13 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-ID-MAP-EQUIV$INLINE)
(VCD-ID-MAP-EQUIV-IS-AN-EQUIVALENCE)
(VCD-ID-MAP-EQUIV-IMPLIES-EQUAL-VCD-ID-MAP-FIX-1)
(VCD-ID-MAP-FIX-UNDER-VCD-ID-MAP-EQUIV)
(EQUAL-OF-VCD-ID-MAP-FIX-1-FORWARD-TO-VCD-ID-MAP-EQUIV)
(EQUAL-OF-VCD-ID-MAP-FIX-2-FORWARD-TO-VCD-ID-MAP-EQUIV)
(VCD-ID-MAP-EQUIV-OF-VCD-ID-MAP-FIX-1-FORWARD)
(VCD-ID-MAP-EQUIV-OF-VCD-ID-MAP-FIX-2-FORWARD)
(CONS-OF-STR-FIX-K-UNDER-VCD-ID-MAP-EQUIV
 (24 4 (:REWRITE VCD-ID-MAP-FIX-WHEN-VCD-ID-MAP-P))
 (15 2 (:REWRITE VCD-ID-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-ID-MAP-P))
 (6 6 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (3 3 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-STREQV-CONGRUENCE-ON-K-UNDER-VCD-ID-MAP-EQUIV)
(CONS-OF-SVAR-FIX-V-UNDER-VCD-ID-MAP-EQUIV
 (23 4 (:REWRITE VCD-ID-MAP-FIX-WHEN-VCD-ID-MAP-P))
 (14 2 (:REWRITE VCD-ID-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-ID-MAP-P))
 (3 3 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-V-UNDER-VCD-ID-MAP-EQUIV)
(CONS-OF-VCD-ID-MAP-FIX-Y-UNDER-VCD-ID-MAP-EQUIV
 (10 2 (:REWRITE VCD-ID-MAP-P-OF-CONS))
 (9 9 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (6 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 4 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(CONS-VCD-ID-MAP-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-ID-MAP-EQUIV)
(VCD-ID-MAP-FIX-OF-ACONS
 (14 3 (:REWRITE VCD-ID-MAP-FIX-WHEN-VCD-ID-MAP-P))
 (7 1 (:REWRITE VCD-ID-MAP-P-OF-CONS))
 (4 4 (:TYPE-PRESCRIPTION VCD-ID-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (2 2 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-ID-MAP-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VCD-ID-MAP-P-OF-APPEND))
 (35 11 (:REWRITE VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P))
 (25 1 (:REWRITE VCD-ID-MAP-P-OF-CONS))
 (22 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (16 4 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-ID-MAP-P))
 (16 4 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-ID-MAP-P))
 (16 4 (:REWRITE STR-FIX-WHEN-STRINGP))
 (8 8 (:TYPE-PRESCRIPTION SV::SVAR-P))
 )
(CONSP-CAR-OF-VCD-ID-MAP-FIX
 (20 5 (:REWRITE VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P))
 (14 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (10 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 (8 2 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-ID-MAP-P))
 (8 2 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-ID-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVAR-P))
 )
(TMP-DEFTYPES-STRINGP-OF-STR-FIX$INLINE)
(VCD-INST-MAP-P)
(BOOLEANP-OF-STRINGP-FOR-VCD-INST-MAP-P-KEY-LEMMA)
(BOOLEANP-OF-SVARLIST-P-FOR-VCD-INST-MAP-P-VAL-LEMMA)
(BOOLEANP-OF-STRINGP-FOR-VCD-INST-MAP-P-KEY)
(BOOLEANP-OF-SVARLIST-P-FOR-VCD-INST-MAP-P-VAL)
(VCD-INST-MAP-P-OF-REPEAT)
(VCD-INST-MAP-P-OF-REV)
(VCD-INST-MAP-P-OF-LIST-FIX)
(VCD-INST-MAP-P-OF-APPEND)
(VCD-INST-MAP-P-WHEN-NOT-CONSP)
(VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P)
(VCD-INST-MAP-P-OF-CONS)
(VCD-INST-MAP-P-OF-FAST-ALIST-CLEAN
 (54 10 (:REWRITE VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P))
 (16 16 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 (1 1 (:TYPE-PRESCRIPTION BOOLEANP-OF-STRINGP-FOR-VCD-INST-MAP-P-KEY))
 )
(VCD-INST-MAP-P-OF-HONS-SHRINK-ALIST)
(VCD-INST-MAP-P-OF-HONS-ACONS)
(SVARLIST-P-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-INST-MAP-P)
(SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P)
(STRINGP-OF-CAAR-WHEN-VCD-INST-MAP-P)
(VCD-INST-MAP-FIX$INLINE)
(VCD-INST-MAP-P-OF-VCD-INST-MAP-FIX
 (163 7 (:REWRITE STR-FIX-WHEN-STRINGP))
 (139 19 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-INST-MAP-P))
 (131 8 (:DEFINITION VCD-INST-MAP-P))
 (120 7 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (88 12 (:REWRITE VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P))
 (71 15 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (44 6 (:REWRITE SV::SVARLIST-P-OF-CDR-WHEN-SVARLIST-P))
 (40 40 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (36 10 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-ID-MAP-P))
 (32 32 (:REWRITE DEFAULT-CAR))
 (24 24 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (20 20 (:REWRITE DEFAULT-CDR))
 (16 16 (:TYPE-PRESCRIPTION VCD-ID-MAP-P))
 (12 12 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (12 4 (:REWRITE STR-FIX-DEFAULT))
 (8 8 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 (8 2 (:REWRITE VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P))
 )
(VCD-INST-MAP-FIX-WHEN-VCD-INST-MAP-P
 (370 52 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (321 15 (:REWRITE SV::SVARLIST-P-OF-CDR-WHEN-SVARLIST-P))
 (315 26 (:REWRITE VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P))
 (307 19 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-INST-MAP-P))
 (300 18 (:DEFINITION SUBSETP-EQUAL))
 (180 29 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (142 142 (:REWRITE DEFAULT-CAR))
 (96 24 (:DEFINITION MEMBER-EQUAL))
 (84 84 (:REWRITE DEFAULT-CDR))
 (72 72 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (60 60 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (26 26 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (24 24 (:REWRITE FTY::OPEN-MEMBER-EQUAL-ON-LIST-OF-TAGS))
 (18 9 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-ID-MAP-P))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (3 3 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-INST-MAP-FIX$INLINE
 (26 6 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (21 5 (:REWRITE VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P))
 (19 4 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-INST-MAP-P))
 (13 13 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-INST-MAP-EQUIV$INLINE)
(VCD-INST-MAP-EQUIV-IS-AN-EQUIVALENCE)
(VCD-INST-MAP-EQUIV-IMPLIES-EQUAL-VCD-INST-MAP-FIX-1)
(VCD-INST-MAP-FIX-UNDER-VCD-INST-MAP-EQUIV)
(EQUAL-OF-VCD-INST-MAP-FIX-1-FORWARD-TO-VCD-INST-MAP-EQUIV)
(EQUAL-OF-VCD-INST-MAP-FIX-2-FORWARD-TO-VCD-INST-MAP-EQUIV)
(VCD-INST-MAP-EQUIV-OF-VCD-INST-MAP-FIX-1-FORWARD)
(VCD-INST-MAP-EQUIV-OF-VCD-INST-MAP-FIX-2-FORWARD)
(CONS-OF-STR-FIX-K-UNDER-VCD-INST-MAP-EQUIV
 (24 4 (:REWRITE VCD-INST-MAP-FIX-WHEN-VCD-INST-MAP-P))
 (15 2 (:REWRITE VCD-INST-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-INST-MAP-P))
 (6 6 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (4 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (3 3 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-STREQV-CONGRUENCE-ON-K-UNDER-VCD-INST-MAP-EQUIV)
(CONS-OF-SVARLIST-FIX-V-UNDER-VCD-INST-MAP-EQUIV
 (23 4 (:REWRITE VCD-INST-MAP-FIX-WHEN-VCD-INST-MAP-P))
 (14 2 (:REWRITE VCD-INST-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-INST-MAP-P))
 (3 3 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(CONS-SVARLIST-EQUIV-CONGRUENCE-ON-V-UNDER-VCD-INST-MAP-EQUIV)
(CONS-OF-VCD-INST-MAP-FIX-Y-UNDER-VCD-INST-MAP-EQUIV
 (10 2 (:REWRITE VCD-INST-MAP-P-OF-CONS))
 (9 9 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (6 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (4 4 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(CONS-VCD-INST-MAP-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-INST-MAP-EQUIV)
(VCD-INST-MAP-FIX-OF-ACONS
 (14 3 (:REWRITE VCD-INST-MAP-FIX-WHEN-VCD-INST-MAP-P))
 (7 1 (:REWRITE VCD-INST-MAP-P-OF-CONS))
 (4 4 (:TYPE-PRESCRIPTION VCD-INST-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (4 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (2 2 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-INST-MAP-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VCD-INST-MAP-P-OF-APPEND))
 (35 11 (:REWRITE VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P))
 (25 1 (:REWRITE VCD-INST-MAP-P-OF-CONS))
 (22 4 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (16 4 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (16 4 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-INST-MAP-P))
 (16 4 (:REWRITE STR-FIX-WHEN-STRINGP))
 (8 8 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 )
(CONSP-CAR-OF-VCD-INST-MAP-FIX
 (20 5 (:REWRITE VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P))
 (14 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (10 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 (8 2 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (8 2 (:REWRITE STRINGP-OF-CAAR-WHEN-VCD-INST-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 )
(TMP-DEFTYPES-NATP-OF-NFIX)
(TMP-DEFTYPES-NFIX-WHEN-NATP
 (2 2 (:REWRITE DEFAULT-<-2))
 (2 2 (:REWRITE DEFAULT-<-1))
 )
(VCD-OUT-MAP-P)
(BOOLEANP-OF-SVAR-P-FOR-VCD-OUT-MAP-P-KEY-LEMMA)
(BOOLEANP-OF-NATP-FOR-VCD-OUT-MAP-P-VAL-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VCD-OUT-MAP-P-KEY)
(BOOLEANP-OF-NATP-FOR-VCD-OUT-MAP-P-VAL)
(VCD-OUT-MAP-P-OF-REPEAT)
(VCD-OUT-MAP-P-OF-REV)
(VCD-OUT-MAP-P-OF-LIST-FIX)
(VCD-OUT-MAP-P-OF-APPEND)
(VCD-OUT-MAP-P-WHEN-NOT-CONSP)
(VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P)
(VCD-OUT-MAP-P-OF-CONS)
(VCD-OUT-MAP-P-OF-FAST-ALIST-CLEAN
 (56 10 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (16 16 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-OUT-MAP-P-OF-HONS-SHRINK-ALIST)
(VCD-OUT-MAP-P-OF-HONS-ACONS)
(NATP-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-OUT-MAP-P)
(NATP-OF-CDAR-WHEN-VCD-OUT-MAP-P)
(SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P)
(VCD-OUT-MAP-FIX$INLINE)
(VCD-OUT-MAP-P-OF-VCD-OUT-MAP-FIX
 (360 7 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (178 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (177 8 (:DEFINITION VCD-OUT-MAP-P))
 (128 12 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (89 7 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (74 15 (:REWRITE NATP-OF-CDAR-WHEN-VCD-OUT-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (36 6 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (30 30 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (26 26 (:REWRITE DEFAULT-CAR))
 (18 18 (:REWRITE DEFAULT-CDR))
 (18 6 (:DEFINITION NATP))
 (16 16 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVEX-ALIST-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-ALIST-P))
 (16 16 (:TYPE-PRESCRIPTION NATP))
 (16 16 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (12 12 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (12 4 (:DEFINITION NFIX))
 (12 2 (:REWRITE SV::SVEX-ALIST-P-OF-CDR-WHEN-SVEX-ALIST-P))
 (12 2 (:REWRITE SV::SVAR-MAP-P-OF-CDR-WHEN-SVAR-MAP-P))
 (12 2 (:REWRITE SV::SVAR-ALIST-P-OF-CDR-WHEN-SVAR-ALIST-P))
 (10 10 (:REWRITE DEFAULT-<-2))
 (10 10 (:REWRITE DEFAULT-<-1))
 (8 8 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (8 2 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (6 6 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 )
(VCD-OUT-MAP-FIX-WHEN-VCD-OUT-MAP-P
 (246 26 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (213 23 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (52 52 (:REWRITE DEFAULT-CAR))
 (49 10 (:REWRITE NATP-OF-CDAR-WHEN-VCD-OUT-MAP-P))
 (42 12 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (42 12 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (42 12 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (42 12 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (33 33 (:REWRITE DEFAULT-CDR))
 (30 12 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (28 28 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (12 12 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (6 6 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (5 5 (:REWRITE DEFAULT-<-2))
 (5 5 (:REWRITE DEFAULT-<-1))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-OUT-MAP-FIX$INLINE
 (26 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (22 4 (:REWRITE NATP-OF-CDAR-WHEN-VCD-OUT-MAP-P))
 (21 5 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (13 13 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-OUT-MAP-EQUIV$INLINE)
(VCD-OUT-MAP-EQUIV-IS-AN-EQUIVALENCE)
(VCD-OUT-MAP-EQUIV-IMPLIES-EQUAL-VCD-OUT-MAP-FIX-1)
(VCD-OUT-MAP-FIX-UNDER-VCD-OUT-MAP-EQUIV)
(EQUAL-OF-VCD-OUT-MAP-FIX-1-FORWARD-TO-VCD-OUT-MAP-EQUIV)
(EQUAL-OF-VCD-OUT-MAP-FIX-2-FORWARD-TO-VCD-OUT-MAP-EQUIV)
(VCD-OUT-MAP-EQUIV-OF-VCD-OUT-MAP-FIX-1-FORWARD)
(VCD-OUT-MAP-EQUIV-OF-VCD-OUT-MAP-FIX-2-FORWARD)
(CONS-OF-SVAR-FIX-K-UNDER-VCD-OUT-MAP-EQUIV
 (25 4 (:REWRITE VCD-OUT-MAP-FIX-WHEN-VCD-OUT-MAP-P))
 (16 2 (:REWRITE VCD-OUT-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-OUT-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION NATP))
 (4 2 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (3 3 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-K-UNDER-VCD-OUT-MAP-EQUIV)
(CONS-OF-NFIX-V-UNDER-VCD-OUT-MAP-EQUIV
 (30 4 (:REWRITE VCD-OUT-MAP-FIX-WHEN-VCD-OUT-MAP-P))
 (21 2 (:REWRITE VCD-OUT-MAP-P-OF-CONS))
 (10 10 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-OUT-MAP-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (3 3 (:TYPE-PRESCRIPTION NATP))
 (3 3 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-NAT-EQUIV-CONGRUENCE-ON-V-UNDER-VCD-OUT-MAP-EQUIV)
(CONS-OF-VCD-OUT-MAP-FIX-Y-UNDER-VCD-OUT-MAP-EQUIV
 (15 2 (:REWRITE VCD-OUT-MAP-P-OF-CONS))
 (11 11 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (7 7 (:TYPE-PRESCRIPTION NATP))
 (6 2 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (6 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 4 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-VCD-OUT-MAP-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-OUT-MAP-EQUIV)
(VCD-OUT-MAP-FIX-OF-ACONS
 (16 3 (:REWRITE VCD-OUT-MAP-FIX-WHEN-VCD-OUT-MAP-P))
 (9 1 (:REWRITE VCD-OUT-MAP-P-OF-CONS))
 (5 5 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-OUT-MAP-P))
 (4 2 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (3 3 (:TYPE-PRESCRIPTION NATP))
 (2 2 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-OUT-MAP-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VCD-OUT-MAP-P-OF-APPEND))
 (35 11 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (27 1 (:REWRITE VCD-OUT-MAP-P-OF-CONS))
 (22 4 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (22 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (16 4 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (16 4 (:REWRITE NATP-OF-CDAR-WHEN-VCD-OUT-MAP-P))
 (9 9 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (7 7 (:TYPE-PRESCRIPTION NATP))
 )
(CONSP-CAR-OF-VCD-OUT-MAP-FIX
 (20 5 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (14 2 (:REWRITE TMP-DEFTYPES-NFIX-WHEN-NATP))
 (14 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (8 2 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (8 2 (:REWRITE NATP-OF-CDAR-WHEN-VCD-OUT-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION NATP))
 )
(TMP-DEFTYPES-STRINGP-OF-STR-FIX$INLINE)
(VCD-STR-MAP-P)
(BOOLEANP-OF-SVAR-P-FOR-VCD-STR-MAP-P-KEY-LEMMA)
(BOOLEANP-OF-STRINGP-FOR-VCD-STR-MAP-P-VAL-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VCD-STR-MAP-P-KEY)
(BOOLEANP-OF-STRINGP-FOR-VCD-STR-MAP-P-VAL)
(VCD-STR-MAP-P-OF-REPEAT)
(VCD-STR-MAP-P-OF-REV)
(VCD-STR-MAP-P-OF-LIST-FIX)
(VCD-STR-MAP-P-OF-APPEND)
(VCD-STR-MAP-P-WHEN-NOT-CONSP)
(VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P)
(VCD-STR-MAP-P-OF-CONS)
(VCD-STR-MAP-P-OF-FAST-ALIST-CLEAN
 (54 10 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (16 16 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (1 1 (:TYPE-PRESCRIPTION BOOLEANP-OF-STRINGP-FOR-VCD-STR-MAP-P-VAL))
 )
(VCD-STR-MAP-P-OF-HONS-SHRINK-ALIST)
(VCD-STR-MAP-P-OF-HONS-ACONS)
(STRINGP-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-STR-MAP-P)
(STRINGP-OF-CDAR-WHEN-VCD-STR-MAP-P)
(SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P)
(VCD-STR-MAP-FIX$INLINE)
(VCD-STR-MAP-P-OF-VCD-STR-MAP-FIX
 (383 7 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (177 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (173 8 (:DEFINITION VCD-STR-MAP-P))
 (130 12 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (75 19 (:REWRITE STRINGP-OF-CDAR-WHEN-VCD-STR-MAP-P))
 (64 7 (:REWRITE STR-FIX-WHEN-STRINGP))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (36 6 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (30 30 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (26 26 (:REWRITE DEFAULT-CAR))
 (18 18 (:REWRITE DEFAULT-CDR))
 (16 16 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-OUT-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVEX-ALIST-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-ALIST-P))
 (16 16 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (12 12 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (12 2 (:REWRITE SV::SVEX-ALIST-P-OF-CDR-WHEN-SVEX-ALIST-P))
 (12 2 (:REWRITE SV::SVAR-MAP-P-OF-CDR-WHEN-SVAR-MAP-P))
 (12 2 (:REWRITE SV::SVAR-ALIST-P-OF-CDR-WHEN-SVAR-ALIST-P))
 (8 8 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (8 4 (:REWRITE STR-FIX-DEFAULT))
 (8 2 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (8 2 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (6 6 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 )
(VCD-STR-MAP-FIX-WHEN-VCD-STR-MAP-P
 (267 29 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (231 26 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (208 19 (:REWRITE STRINGP-OF-CDAR-WHEN-VCD-STR-MAP-P))
 (61 61 (:REWRITE DEFAULT-CAR))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (36 36 (:REWRITE DEFAULT-CDR))
 (34 34 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (18 18 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (9 9 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-STR-MAP-FIX$INLINE
 (26 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (21 5 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (19 4 (:REWRITE STRINGP-OF-CDAR-WHEN-VCD-STR-MAP-P))
 (13 13 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-STR-MAP-EQUIV$INLINE)
(VCD-STR-MAP-EQUIV-IS-AN-EQUIVALENCE)
(VCD-STR-MAP-EQUIV-IMPLIES-EQUAL-VCD-STR-MAP-FIX-1)
(VCD-STR-MAP-FIX-UNDER-VCD-STR-MAP-EQUIV)
(EQUAL-OF-VCD-STR-MAP-FIX-1-FORWARD-TO-VCD-STR-MAP-EQUIV)
(EQUAL-OF-VCD-STR-MAP-FIX-2-FORWARD-TO-VCD-STR-MAP-EQUIV)
(VCD-STR-MAP-EQUIV-OF-VCD-STR-MAP-FIX-1-FORWARD)
(VCD-STR-MAP-EQUIV-OF-VCD-STR-MAP-FIX-2-FORWARD)
(CONS-OF-SVAR-FIX-K-UNDER-VCD-STR-MAP-EQUIV
 (23 4 (:REWRITE VCD-STR-MAP-FIX-WHEN-VCD-STR-MAP-P))
 (14 2 (:REWRITE VCD-STR-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-STR-MAP-P))
 (3 3 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-K-UNDER-VCD-STR-MAP-EQUIV)
(CONS-OF-STR-FIX-V-UNDER-VCD-STR-MAP-EQUIV
 (29 4 (:REWRITE VCD-STR-MAP-FIX-WHEN-VCD-STR-MAP-P))
 (20 2 (:REWRITE VCD-STR-MAP-P-OF-CONS))
 (10 10 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-STR-MAP-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (3 3 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-STREQV-CONGRUENCE-ON-V-UNDER-VCD-STR-MAP-EQUIV)
(CONS-OF-VCD-STR-MAP-FIX-Y-UNDER-VCD-STR-MAP-EQUIV
 (12 2 (:REWRITE VCD-STR-MAP-P-OF-CONS))
 (11 11 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (6 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 4 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(CONS-VCD-STR-MAP-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-STR-MAP-EQUIV)
(VCD-STR-MAP-FIX-OF-ACONS
 (15 3 (:REWRITE VCD-STR-MAP-FIX-WHEN-VCD-STR-MAP-P))
 (8 1 (:REWRITE VCD-STR-MAP-P-OF-CONS))
 (5 5 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-STR-MAP-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (2 2 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-STR-MAP-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VCD-STR-MAP-P-OF-APPEND))
 (35 11 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (26 1 (:REWRITE VCD-STR-MAP-P-OF-CONS))
 (22 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (16 4 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (16 4 (:REWRITE STRINGP-OF-CDAR-WHEN-VCD-STR-MAP-P))
 (16 4 (:REWRITE STR-FIX-WHEN-STRINGP))
 (9 9 (:TYPE-PRESCRIPTION SV::SVAR-P))
 )
(CONSP-CAR-OF-VCD-STR-MAP-FIX
 (20 5 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (14 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (10 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 (8 2 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (8 2 (:REWRITE STRINGP-OF-CDAR-WHEN-VCD-STR-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVAR-P))
 )
(VCD-SCOPE-TBL-P)
(BOOLEANP-OF-SVAR-P-FOR-VCD-SCOPE-TBL-P-KEY-LEMMA)
(BOOLEANP-OF-SVARLIST-P-FOR-VCD-SCOPE-TBL-P-VAL-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VCD-SCOPE-TBL-P-KEY)
(BOOLEANP-OF-SVARLIST-P-FOR-VCD-SCOPE-TBL-P-VAL)
(VCD-SCOPE-TBL-P-OF-REPEAT)
(VCD-SCOPE-TBL-P-OF-REV)
(VCD-SCOPE-TBL-P-OF-LIST-FIX)
(VCD-SCOPE-TBL-P-OF-APPEND)
(VCD-SCOPE-TBL-P-WHEN-NOT-CONSP)
(VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P)
(VCD-SCOPE-TBL-P-OF-CONS)
(VCD-SCOPE-TBL-P-OF-FAST-ALIST-CLEAN
 (56 10 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (16 16 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 )
(VCD-SCOPE-TBL-P-OF-HONS-SHRINK-ALIST)
(VCD-SCOPE-TBL-P-OF-HONS-ACONS)
(SVARLIST-P-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-SCOPE-TBL-P)
(SVARLIST-P-OF-CDAR-WHEN-VCD-SCOPE-TBL-P)
(SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P)
(VCD-SCOPE-TBL-FIX$INLINE)
(VCD-SCOPE-TBL-P-OF-VCD-SCOPE-TBL-FIX
 (451 7 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (223 8 (:DEFINITION VCD-SCOPE-TBL-P))
 (221 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (168 12 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (150 7 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (77 15 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-SCOPE-TBL-P))
 (52 52 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (44 6 (:REWRITE SV::SVARLIST-P-OF-CDR-WHEN-SVARLIST-P))
 (36 36 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (36 6 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (32 32 (:REWRITE DEFAULT-CAR))
 (32 6 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (30 30 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (20 20 (:REWRITE DEFAULT-CDR))
 (18 18 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (16 16 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-STR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-OUT-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-INST-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVEX-ALIST-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-ALIST-P))
 (16 16 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (12 2 (:REWRITE SV::SVEX-ALIST-P-OF-CDR-WHEN-SVEX-ALIST-P))
 (12 2 (:REWRITE SV::SVAR-MAP-P-OF-CDR-WHEN-SVAR-MAP-P))
 (12 2 (:REWRITE SV::SVAR-ALIST-P-OF-CDR-WHEN-SVAR-ALIST-P))
 (8 8 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (8 2 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (8 2 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (8 2 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (8 2 (:REWRITE VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P))
 )
(VCD-SCOPE-TBL-FIX-WHEN-VCD-SCOPE-TBL-P
 (648 29 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (514 70 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (493 26 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (423 24 (:DEFINITION SUBSETP-EQUAL))
 (324 29 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-SCOPE-TBL-P))
 (312 15 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (195 15 (:REWRITE SV::SVARLIST-P-OF-CDR-WHEN-SVARLIST-P))
 (186 41 (:DEFINITION MEMBER-EQUAL))
 (180 180 (:REWRITE DEFAULT-CAR))
 (130 130 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (113 113 (:REWRITE DEFAULT-CDR))
 (106 34 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (93 93 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (42 15 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (41 41 (:REWRITE FTY::OPEN-MEMBER-EQUAL-ON-LIST-OF-TAGS))
 (35 35 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (18 18 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (9 9 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-SCOPE-TBL-FIX$INLINE
 (29 6 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-SCOPE-TBL-P))
 (29 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (26 5 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (14 14 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 )
(VCD-SCOPE-TBL-EQUIV$INLINE)
(VCD-SCOPE-TBL-EQUIV-IS-AN-EQUIVALENCE)
(VCD-SCOPE-TBL-EQUIV-IMPLIES-EQUAL-VCD-SCOPE-TBL-FIX-1)
(VCD-SCOPE-TBL-FIX-UNDER-VCD-SCOPE-TBL-EQUIV)
(EQUAL-OF-VCD-SCOPE-TBL-FIX-1-FORWARD-TO-VCD-SCOPE-TBL-EQUIV)
(EQUAL-OF-VCD-SCOPE-TBL-FIX-2-FORWARD-TO-VCD-SCOPE-TBL-EQUIV)
(VCD-SCOPE-TBL-EQUIV-OF-VCD-SCOPE-TBL-FIX-1-FORWARD)
(VCD-SCOPE-TBL-EQUIV-OF-VCD-SCOPE-TBL-FIX-2-FORWARD)
(CONS-OF-SVAR-FIX-K-UNDER-VCD-SCOPE-TBL-EQUIV
 (27 4 (:REWRITE VCD-SCOPE-TBL-FIX-WHEN-VCD-SCOPE-TBL-P))
 (18 2 (:REWRITE VCD-SCOPE-TBL-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-SCOPE-TBL-P))
 (6 6 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (4 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (3 3 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-K-UNDER-VCD-SCOPE-TBL-EQUIV)
(CONS-OF-SVARLIST-FIX-V-UNDER-VCD-SCOPE-TBL-EQUIV
 (31 4 (:REWRITE VCD-SCOPE-TBL-FIX-WHEN-VCD-SCOPE-TBL-P))
 (22 2 (:REWRITE VCD-SCOPE-TBL-P-OF-CONS))
 (10 10 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-SCOPE-TBL-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (3 3 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 )
(CONS-SVARLIST-EQUIV-CONGRUENCE-ON-V-UNDER-VCD-SCOPE-TBL-EQUIV)
(CONS-OF-VCD-SCOPE-TBL-FIX-Y-UNDER-VCD-SCOPE-TBL-EQUIV
 (17 2 (:REWRITE VCD-SCOPE-TBL-P-OF-CONS))
 (11 11 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (9 9 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (6 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (6 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 4 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 )
(CONS-VCD-SCOPE-TBL-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-SCOPE-TBL-EQUIV)
(VCD-SCOPE-TBL-FIX-OF-ACONS
 (17 3 (:REWRITE VCD-SCOPE-TBL-FIX-WHEN-VCD-SCOPE-TBL-P))
 (10 1 (:REWRITE VCD-SCOPE-TBL-P-OF-CONS))
 (5 5 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-SCOPE-TBL-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (4 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (2 2 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 )
(VCD-SCOPE-TBL-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VCD-SCOPE-TBL-P-OF-APPEND))
 (35 11 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (28 1 (:REWRITE VCD-SCOPE-TBL-P-OF-CONS))
 (22 4 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (22 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (16 4 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-SCOPE-TBL-P))
 (16 4 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (9 9 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (8 8 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 )
(CONSP-CAR-OF-VCD-SCOPE-TBL-FIX
 (20 5 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (14 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (14 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (8 2 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-SCOPE-TBL-P))
 (8 2 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVAR-P))
 )
(TMP-DEFTYPES-ANY-P$INLINE-OF-IDENTITY)
(TMP-DEFTYPES-IDENTITY-WHEN-ANY-P$INLINE
 (3 3 (:TYPE-PRESCRIPTION IDENTITY))
 )
(TMP-DEFTYPES-SYMBOLP-OF-SYMBOL-FIX)
(VCD-SCOPE-LST-P)
(BOOLEANP-OF-ANY-P-FOR-VCD-SCOPE-LST-P-KEY-LEMMA)
(BOOLEANP-OF-SYMBOLP-FOR-VCD-SCOPE-LST-P-VAL-LEMMA)
(BOOLEANP-OF-ANY-P-FOR-VCD-SCOPE-LST-P-KEY)
(BOOLEANP-OF-SYMBOLP-FOR-VCD-SCOPE-LST-P-VAL)
(VCD-SCOPE-LST-P-OF-REPEAT)
(VCD-SCOPE-LST-P-OF-REV)
(VCD-SCOPE-LST-P-OF-LIST-FIX)
(TRUE-LISTP-WHEN-VCD-SCOPE-LST-P-COMPOUND-RECOGNIZER)
(VCD-SCOPE-LST-P-WHEN-NOT-CONSP)
(VCD-SCOPE-LST-P-OF-CDR-WHEN-VCD-SCOPE-LST-P)
(VCD-SCOPE-LST-P-OF-CONS)
(VCD-SCOPE-LST-P-OF-REMOVE-ASSOC
 (144 28 (:REWRITE VCD-SCOPE-LST-P-OF-CDR-WHEN-VCD-SCOPE-LST-P))
 (40 40 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 )
(VCD-SCOPE-LST-P-OF-PUT-ASSOC)
(VCD-SCOPE-LST-P-OF-FAST-ALIST-CLEAN)
(VCD-SCOPE-LST-P-OF-HONS-SHRINK-ALIST)
(VCD-SCOPE-LST-P-OF-HONS-ACONS)
(SYMBOLP-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-SCOPE-LST-P)
(ALISTP-WHEN-VCD-SCOPE-LST-P-REWRITE)
(ALISTP-WHEN-VCD-SCOPE-LST-P)
(SYMBOLP-OF-CDAR-WHEN-VCD-SCOPE-LST-P)
(ANY-P-OF-CAAR-WHEN-VCD-SCOPE-LST-P)
(VCD-SCOPE-LST-FIX$INLINE
 (1 1 (:TYPE-PRESCRIPTION IDENTITY))
 )
(VCD-SCOPE-LST-P-OF-VCD-SCOPE-LST-FIX
 (85 7 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 (80 14 (:REWRITE SYMBOLP-OF-CDAR-WHEN-VCD-SCOPE-LST-P))
 (71 32 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 (59 7 (:DEFINITION VCD-SCOPE-LST-P))
 (42 9 (:REWRITE VCD-SCOPE-LST-P-OF-CDR-WHEN-VCD-SCOPE-LST-P))
 (22 22 (:REWRITE DEFAULT-CAR))
 (18 18 (:REWRITE DEFAULT-CDR))
 (18 2 (:REWRITE ANY-P-OF-CAAR-WHEN-VCD-SCOPE-LST-P))
 )
(VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P
 (87 21 (:REWRITE VCD-SCOPE-LST-P-OF-CDR-WHEN-VCD-SCOPE-LST-P))
 (80 19 (:REWRITE SYMBOLP-OF-CDAR-WHEN-VCD-SCOPE-LST-P))
 (35 31 (:REWRITE DEFAULT-CAR))
 (34 30 (:REWRITE DEFAULT-CDR))
 (7 7 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (4 4 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-SCOPE-LST-FIX$INLINE
 (4 4 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-SCOPE-LST-P-OF-CDR-WHEN-VCD-SCOPE-LST-P))
 (4 1 (:REWRITE SYMBOLP-OF-CDAR-WHEN-VCD-SCOPE-LST-P))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 )
(VCD-SCOPE-LST-EQUIV$INLINE)
(VCD-SCOPE-LST-EQUIV-IS-AN-EQUIVALENCE)
(VCD-SCOPE-LST-EQUIV-IMPLIES-EQUAL-VCD-SCOPE-LST-FIX-1)
(VCD-SCOPE-LST-FIX-UNDER-VCD-SCOPE-LST-EQUIV)
(EQUAL-OF-VCD-SCOPE-LST-FIX-1-FORWARD-TO-VCD-SCOPE-LST-EQUIV)
(EQUAL-OF-VCD-SCOPE-LST-FIX-2-FORWARD-TO-VCD-SCOPE-LST-EQUIV)
(VCD-SCOPE-LST-EQUIV-OF-VCD-SCOPE-LST-FIX-1-FORWARD)
(VCD-SCOPE-LST-EQUIV-OF-VCD-SCOPE-LST-FIX-2-FORWARD)
(CONS-OF-IDENTITY-K-UNDER-VCD-SCOPE-LST-EQUIV)
(CONS-EQUAL-CONGRUENCE-ON-K-UNDER-VCD-SCOPE-LST-EQUIV)
(CONS-OF-SYMBOL-FIX-V-UNDER-VCD-SCOPE-LST-EQUIV
 (23 4 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (14 2 (:REWRITE VCD-SCOPE-LST-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (3 3 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 )
(CONS-SYMBOL-EQUIV-CONGRUENCE-ON-V-UNDER-VCD-SCOPE-LST-EQUIV)
(CONS-OF-VCD-SCOPE-LST-FIX-Y-UNDER-VCD-SCOPE-LST-EQUIV
 (8 2 (:REWRITE VCD-SCOPE-LST-P-OF-CONS))
 (4 4 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(CONS-VCD-SCOPE-LST-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-SCOPE-LST-EQUIV)
(VCD-SCOPE-LST-FIX-OF-ACONS
 (13 3 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (6 1 (:REWRITE VCD-SCOPE-LST-P-OF-CONS))
 (4 4 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (2 2 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 )
(VCD-SCOPE-LST-FIX-OF-APPEND
 (139 19 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (55 55 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (46 28 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 (20 5 (:REWRITE VCD-SCOPE-LST-P-OF-CDR-WHEN-VCD-SCOPE-LST-P))
 (17 1 (:REWRITE VCD-SCOPE-LST-P-OF-CONS))
 (16 4 (:REWRITE SYMBOLP-OF-CDAR-WHEN-VCD-SCOPE-LST-P))
 (16 4 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 (4 1 (:REWRITE ANY-P-OF-CAAR-WHEN-VCD-SCOPE-LST-P))
 )
(CONSP-CAR-OF-VCD-SCOPE-LST-FIX
 (50 10 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (27 27 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (20 5 (:REWRITE VCD-SCOPE-LST-P-OF-CDR-WHEN-VCD-SCOPE-LST-P))
 (14 14 (:REWRITE VCD-SCOPE-LST-P-WHEN-NOT-CONSP))
 (10 2 (:REWRITE SYMBOL-FIX-WHEN-SYMBOLP))
 (8 2 (:REWRITE SYMBOLP-OF-CDAR-WHEN-VCD-SCOPE-LST-P))
 )
(VCD-SCOPES-LST-P)
(STD::DEFLIST-LOCAL-BOOLEANP-ELEMENT-THM)
(VCD-SCOPES-LST-P-OF-CONS)
(VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P)
(VCD-SCOPES-LST-P-WHEN-NOT-CONSP)
(VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P)
(TRUE-LISTP-WHEN-VCD-SCOPES-LST-P-COMPOUND-RECOGNIZER)
(VCD-SCOPES-LST-P-OF-LIST-FIX)
(VCD-SCOPES-LST-P-OF-REV)
(VCD-SCOPES-LST-P-OF-REPEAT)
(VCD-SCOPES-LST-FIX$INLINE)
(VCD-SCOPES-LST-P-OF-VCD-SCOPES-LST-FIX
 (15 1 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (12 5 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (12 2 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (9 1 (:DEFINITION VCD-SCOPES-LST-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (2 1 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 )
(VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P
 (17 4 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (9 3 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 )
(VCD-SCOPES-LST-FIX$INLINE
 (4 4 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (4 1 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 )
(VCD-SCOPES-LST-EQUIV$INLINE)
(VCD-SCOPES-LST-EQUIV-IS-AN-EQUIVALENCE)
(VCD-SCOPES-LST-EQUIV-IMPLIES-EQUAL-VCD-SCOPES-LST-FIX-1)
(VCD-SCOPES-LST-FIX-UNDER-VCD-SCOPES-LST-EQUIV)
(EQUAL-OF-VCD-SCOPES-LST-FIX-1-FORWARD-TO-VCD-SCOPES-LST-EQUIV)
(EQUAL-OF-VCD-SCOPES-LST-FIX-2-FORWARD-TO-VCD-SCOPES-LST-EQUIV)
(VCD-SCOPES-LST-EQUIV-OF-VCD-SCOPES-LST-FIX-1-FORWARD)
(VCD-SCOPES-LST-EQUIV-OF-VCD-SCOPES-LST-FIX-2-FORWARD)
(CAR-OF-VCD-SCOPES-LST-FIX-X-UNDER-VCD-SCOPE-LST-EQUIV
 (21 3 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (12 12 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (12 3 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (12 2 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (6 6 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (3 3 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-FIX$INLINE))
 )
(CAR-VCD-SCOPES-LST-EQUIV-CONGRUENCE-ON-X-UNDER-VCD-SCOPE-LST-EQUIV)
(CDR-OF-VCD-SCOPES-LST-FIX-X-UNDER-VCD-SCOPES-LST-EQUIV
 (29 3 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (14 2 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (8 2 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 )
(CDR-VCD-SCOPES-LST-EQUIV-CONGRUENCE-ON-X-UNDER-VCD-SCOPES-LST-EQUIV)
(CONS-OF-VCD-SCOPE-LST-FIX-X-UNDER-VCD-SCOPES-LST-EQUIV
 (20 4 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (9 2 (:REWRITE VCD-SCOPES-LST-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (5 5 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 )
(CONS-VCD-SCOPE-LST-EQUIV-CONGRUENCE-ON-X-UNDER-VCD-SCOPES-LST-EQUIV)
(CONS-OF-VCD-SCOPES-LST-FIX-Y-UNDER-VCD-SCOPES-LST-EQUIV
 (12 2 (:REWRITE VCD-SCOPES-LST-P-OF-CONS))
 (8 8 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (5 4 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (4 2 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 )
(CONS-VCD-SCOPES-LST-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-SCOPES-LST-EQUIV)
(CONSP-OF-VCD-SCOPES-LST-FIX
 (12 2 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (8 8 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (7 1 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (4 4 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (4 1 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 )
(VCD-SCOPES-LST-FIX-UNDER-IFF
 (12 2 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (8 8 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (7 1 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (4 4 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (4 1 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 )
(VCD-SCOPES-LST-FIX-OF-CONS
 (13 3 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (5 1 (:REWRITE VCD-SCOPES-LST-P-OF-CONS))
 (4 4 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (4 2 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (3 3 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 )
(LEN-OF-VCD-SCOPES-LST-FIX
 (23 4 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (13 13 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (8 2 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (7 7 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (7 1 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (4 1 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (1 1 (:REWRITE FTY::EQUAL-OF-LEN))
 )
(VCD-SCOPES-LST-FIX-OF-APPEND
 (56 10 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (23 23 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (18 12 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (8 2 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (8 2 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (4 1 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 )
(VCD-SCOPES-LST-FIX-OF-REPEAT
 (16 2 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (10 10 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (10 4 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (8 2 (:REWRITE VCD-SCOPES-LST-P-OF-REPEAT))
 (2 2 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (1 1 (:REWRITE-QUOTED-CONSTANT VCD-SCOPES-LST-FIX-UNDER-VCD-SCOPES-LST-EQUIV))
 )
(LIST-EQUIV-REFINES-VCD-SCOPES-LST-EQUIV
 (98 14 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (72 8 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (70 70 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (60 18 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (48 8 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (36 36 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (16 16 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(NTH-OF-VCD-SCOPES-LST-FIX
 (134 30 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (110 23 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (73 73 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (60 60 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (44 11 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (39 39 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (32 8 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (4 4 (:LINEAR LEN-WHEN-PREFIXP))
 (2 1 (:REWRITE DEFAULT-+-2))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-+-1))
 )
(VCD-SCOPES-LST-EQUIV-IMPLIES-VCD-SCOPES-LST-EQUIV-APPEND-1
 (181 32 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (131 17 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (126 126 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (80 17 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (79 22 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (64 64 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (34 34 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(VCD-SCOPES-LST-EQUIV-IMPLIES-VCD-SCOPES-LST-EQUIV-APPEND-2
 (267 46 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (206 26 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (189 189 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (138 39 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (128 26 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (95 95 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (52 52 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (4 4 (:REWRITE CONSP-OF-VCD-SCOPES-LST-FIX))
 )
(VCD-SCOPES-LST-EQUIV-IMPLIES-VCD-SCOPES-LST-EQUIV-NTHCDR-2
 (249 39 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (175 175 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (174 22 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (117 33 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (108 22 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (88 88 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (44 44 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 )
(VCD-SCOPES-LST-EQUIV-IMPLIES-VCD-SCOPES-LST-EQUIV-TAKE-2
 (326 38 (:REWRITE VCD-SCOPES-LST-FIX-WHEN-VCD-SCOPES-LST-P))
 (222 28 (:REWRITE VCD-SCOPE-LST-FIX-WHEN-VCD-SCOPE-LST-P))
 (190 190 (:TYPE-PRESCRIPTION VCD-SCOPES-LST-P))
 (149 39 (:REWRITE VCD-SCOPES-LST-P-OF-CDR-WHEN-VCD-SCOPES-LST-P))
 (140 26 (:REWRITE VCD-SCOPE-LST-P-OF-CAR-WHEN-VCD-SCOPES-LST-P))
 (119 95 (:REWRITE VCD-SCOPES-LST-P-WHEN-NOT-CONSP))
 (54 54 (:TYPE-PRESCRIPTION VCD-SCOPE-LST-P))
 (6 6 (:REWRITE-QUOTED-CONSTANT VCD-SCOPES-LST-FIX-UNDER-VCD-SCOPES-LST-EQUIV))
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(VAL-CHGS-P)
(BOOLEANP-OF-SVAR-P-FOR-VAL-CHGS-P-KEY-LEMMA)
(BOOLEANP-OF-4VEC-P-FOR-VAL-CHGS-P-VAL-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VAL-CHGS-P-KEY)
(BOOLEANP-OF-4VEC-P-FOR-VAL-CHGS-P-VAL)
(VAL-CHGS-P-OF-REPEAT)
(VAL-CHGS-P-OF-REV)
(VAL-CHGS-P-OF-LIST-FIX)
(VAL-CHGS-P-OF-APPEND)
(VAL-CHGS-P-WHEN-NOT-CONSP)
(VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P)
(VAL-CHGS-P-OF-CONS)
(VAL-CHGS-P-OF-FAST-ALIST-CLEAN
 (56 10 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 (16 16 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(VAL-CHGS-P-OF-HONS-SHRINK-ALIST)
(VAL-CHGS-P-OF-HONS-ACONS)
(4VEC-P-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VAL-CHGS-P)
(4VEC-P-OF-CDAR-WHEN-VAL-CHGS-P)
(SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P)
(VAL-CHGS-FIX$INLINE)
(VAL-CHGS-P-OF-VAL-CHGS-FIX
 (483 7 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (231 8 (:DEFINITION VAL-CHGS-P))
 (229 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (176 12 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 (112 7 (:REWRITE SV::4VEC-FIX-OF-4VEC))
 (79 17 (:REWRITE 4VEC-P-OF-CDAR-WHEN-VAL-CHGS-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (42 8 (:REWRITE SV::4VEC-P-WHEN-MAYBE-4VEC-P))
 (38 38 (:TYPE-PRESCRIPTION SV::4VEC-P))
 (36 6 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (30 30 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (26 26 (:REWRITE DEFAULT-CAR))
 (24 6 (:REWRITE SV::MAYBE-4VEC-P-WHEN-4VEC-P))
 (18 18 (:REWRITE DEFAULT-CDR))
 (16 16 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-STR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-SCOPE-TBL-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-OUT-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVEX-ALIST-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-ALIST-P))
 (16 16 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::4VEC-P-WHEN-MEMBER-EQUAL-OF-4VECLIST-P))
 (14 14 (:TYPE-PRESCRIPTION SV::MAYBE-4VEC-P))
 (12 12 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (12 12 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (12 12 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (12 2 (:REWRITE SV::SVEX-ALIST-P-OF-CDR-WHEN-SVEX-ALIST-P))
 (12 2 (:REWRITE SV::SVAR-MAP-P-OF-CDR-WHEN-SVAR-MAP-P))
 (12 2 (:REWRITE SV::SVAR-ALIST-P-OF-CDR-WHEN-SVAR-ALIST-P))
 (8 8 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (8 2 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (8 2 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (8 2 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (8 2 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (6 6 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 )
(VAL-CHGS-FIX-WHEN-VAL-CHGS-P
 (333 32 (:REWRITE 4VEC-P-OF-CDAR-WHEN-VAL-CHGS-P))
 (330 29 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (298 26 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 (86 22 (:REWRITE SV::4VEC-P-WHEN-MAYBE-4VEC-P))
 (67 67 (:REWRITE DEFAULT-CAR))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (47 11 (:REWRITE SV::MAYBE-4VEC-P-WHEN-4VEC-P))
 (44 44 (:REWRITE SV::4VEC-P-WHEN-MEMBER-EQUAL-OF-4VECLIST-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (36 36 (:REWRITE DEFAULT-CDR))
 (34 34 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (21 21 (:TYPE-PRESCRIPTION SV::MAYBE-4VEC-P))
 (18 18 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (9 9 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VAL-CHGS-FIX$INLINE
 (29 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (29 6 (:REWRITE 4VEC-P-OF-CDAR-WHEN-VAL-CHGS-P))
 (26 5 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 (14 14 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(VAL-CHGS-EQUIV$INLINE)
(VAL-CHGS-EQUIV-IS-AN-EQUIVALENCE)
(VAL-CHGS-EQUIV-IMPLIES-EQUAL-VAL-CHGS-FIX-1)
(VAL-CHGS-FIX-UNDER-VAL-CHGS-EQUIV)
(EQUAL-OF-VAL-CHGS-FIX-1-FORWARD-TO-VAL-CHGS-EQUIV)
(EQUAL-OF-VAL-CHGS-FIX-2-FORWARD-TO-VAL-CHGS-EQUIV)
(VAL-CHGS-EQUIV-OF-VAL-CHGS-FIX-1-FORWARD)
(VAL-CHGS-EQUIV-OF-VAL-CHGS-FIX-2-FORWARD)
(CONS-OF-SVAR-FIX-K-UNDER-VAL-CHGS-EQUIV
 (27 4 (:REWRITE VAL-CHGS-FIX-WHEN-VAL-CHGS-P))
 (18 2 (:REWRITE VAL-CHGS-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 (6 6 (:TYPE-PRESCRIPTION SV::4VEC-P))
 (4 2 (:REWRITE SV::4VEC-FIX-OF-4VEC))
 (3 3 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-K-UNDER-VAL-CHGS-EQUIV)
(CONS-OF-4VEC-FIX-V-UNDER-VAL-CHGS-EQUIV
 (31 4 (:REWRITE VAL-CHGS-FIX-WHEN-VAL-CHGS-P))
 (22 2 (:REWRITE VAL-CHGS-P-OF-CONS))
 (10 10 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (6 6 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (3 3 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(CONS-4VEC-EQUIV-CONGRUENCE-ON-V-UNDER-VAL-CHGS-EQUIV)
(CONS-OF-VAL-CHGS-FIX-Y-UNDER-VAL-CHGS-EQUIV
 (17 2 (:REWRITE VAL-CHGS-P-OF-CONS))
 (11 11 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (9 9 (:TYPE-PRESCRIPTION SV::4VEC-P))
 (6 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (6 2 (:REWRITE SV::4VEC-FIX-OF-4VEC))
 (4 4 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(CONS-VAL-CHGS-EQUIV-CONGRUENCE-ON-Y-UNDER-VAL-CHGS-EQUIV)
(VAL-CHGS-FIX-OF-ACONS
 (17 3 (:REWRITE VAL-CHGS-FIX-WHEN-VAL-CHGS-P))
 (10 1 (:REWRITE VAL-CHGS-P-OF-CONS))
 (5 5 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 (4 4 (:TYPE-PRESCRIPTION SV::4VEC-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 2 (:REWRITE SV::4VEC-FIX-OF-4VEC))
 (2 2 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(VAL-CHGS-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VAL-CHGS-P-OF-APPEND))
 (35 11 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 (28 1 (:REWRITE VAL-CHGS-P-OF-CONS))
 (22 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (22 4 (:REWRITE SV::4VEC-FIX-OF-4VEC))
 (16 4 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (16 4 (:REWRITE 4VEC-P-OF-CDAR-WHEN-VAL-CHGS-P))
 (9 9 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (8 8 (:TYPE-PRESCRIPTION SV::4VEC-P))
 )
(CONSP-CAR-OF-VAL-CHGS-FIX
 (20 5 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 (14 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (14 2 (:REWRITE SV::4VEC-FIX-OF-4VEC))
 (8 2 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (8 2 (:REWRITE 4VEC-P-OF-CDAR-WHEN-VAL-CHGS-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION SV::4VEC-P))
 )
(TMP-DEFTYPES-STRINGP-OF-STR-FIX$INLINE)
(VCD-VAL-CHG-P
 (40 10 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (14 14 (:REWRITE DEFAULT-CAR))
 (10 10 (:REWRITE DEFAULT-CDR))
 )
(CONSP-WHEN-VCD-VAL-CHG-P)
(VCD-VAL-CHG-FIX$INLINE)
(VCD-VAL-CHG-P-OF-VCD-VAL-CHG-FIX
 (14 6 (:REWRITE VAL-CHGS-FIX-WHEN-VAL-CHGS-P))
 (8 8 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 (4 4 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P
 (5 2 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (1 1 (:DEFINITION STRIP-CARS))
 (1 1 (:DEFINITION ALISTP))
 )
(VCD-VAL-CHG-FIX$INLINE
 (45 44 (:REWRITE DEFAULT-CAR))
 (42 41 (:REWRITE DEFAULT-CDR))
 (22 13 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (12 2 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 (8 2 (:REWRITE STRINGP-OF-CDAR-WHEN-VCD-STR-MAP-P))
 (7 7 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 (5 5 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 (2 2 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT)
(VCD-VAL-CHG-EQUIV$INLINE)
(VCD-VAL-CHG-EQUIV-IS-AN-EQUIVALENCE)
(VCD-VAL-CHG-EQUIV-IMPLIES-EQUAL-VCD-VAL-CHG-FIX-1)
(VCD-VAL-CHG-FIX-UNDER-VCD-VAL-CHG-EQUIV)
(EQUAL-OF-VCD-VAL-CHG-FIX-1-FORWARD-TO-VCD-VAL-CHG-EQUIV)
(EQUAL-OF-VCD-VAL-CHG-FIX-2-FORWARD-TO-VCD-VAL-CHG-EQUIV)
(VCD-VAL-CHG-EQUIV-OF-VCD-VAL-CHG-FIX-1-FORWARD)
(VCD-VAL-CHG-EQUIV-OF-VCD-VAL-CHG-FIX-2-FORWARD)
(VCD-VAL-CHG->TIMESTAMP$INLINE
 (4 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (1 1 (:DEFINITION STRIP-CARS))
 (1 1 (:DEFINITION ALISTP))
 )
(STRINGP-OF-VCD-VAL-CHG->TIMESTAMP)
(VCD-VAL-CHG->TIMESTAMP$INLINE-OF-VCD-VAL-CHG-FIX-X
 (9 3 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAL-CHG-FIX$INLINE))
 (3 1 (:REWRITE VAL-CHGS-FIX-WHEN-VAL-CHGS-P))
 (2 2 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 )
(VCD-VAL-CHG->TIMESTAMP$INLINE-VCD-VAL-CHG-EQUIV-CONGRUENCE-ON-X)
(VCD-VAL-CHG->VAL-CHGS$INLINE
 (4 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(VAL-CHGS-P-OF-VCD-VAL-CHG->VAL-CHGS)
(VCD-VAL-CHG->VAL-CHGS$INLINE-OF-VCD-VAL-CHG-FIX-X
 (9 3 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (1 1 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-VAL-CHG->VAL-CHGS$INLINE-VCD-VAL-CHG-EQUIV-CONGRUENCE-ON-X)
(VCD-VAL-CHG)
(VCD-VAL-CHG-P-OF-VCD-VAL-CHG
 (8 4 (:REWRITE VAL-CHGS-FIX-WHEN-VAL-CHGS-P))
 (4 4 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-VAL-CHG->TIMESTAMP-OF-VCD-VAL-CHG
 (6 6 (:TYPE-PRESCRIPTION VCD-VAL-CHG))
 )
(VCD-VAL-CHG->VAL-CHGS-OF-VCD-VAL-CHG)
(VCD-VAL-CHG-OF-FIELDS
 (3 1 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 )
(VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG
 (3 1 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 )
(EQUAL-OF-VCD-VAL-CHG
 (24 24 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-VAL-CHG-OF-STR-FIX-TIMESTAMP
 (4 2 (:REWRITE VAL-CHGS-FIX-WHEN-VAL-CHGS-P))
 (2 2 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 )
(VCD-VAL-CHG-STREQV-CONGRUENCE-ON-TIMESTAMP)
(VCD-VAL-CHG-OF-VAL-CHGS-FIX-VAL-CHGS
 (2 2 (:REWRITE STR-FIX-WHEN-STRINGP))
 )
(VCD-VAL-CHG-VAL-CHGS-EQUIV-CONGRUENCE-ON-VAL-CHGS)
(VCD-VAL-CHG-FIX-REDEF)
(VCD-VAL-CHGS-P)
(STD::DEFLIST-LOCAL-BOOLEANP-ELEMENT-THM)
(VCD-VAL-CHGS-P-OF-CONS)
(VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P)
(VCD-VAL-CHGS-P-WHEN-NOT-CONSP)
(VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P)
(TRUE-LISTP-WHEN-VCD-VAL-CHGS-P-COMPOUND-RECOGNIZER)
(VCD-VAL-CHGS-P-OF-LIST-FIX)
(VCD-VAL-CHGS-P-OF-REV)
(VCD-VAL-CHGS-P-OF-REPEAT)
(VCD-VAL-CHGS-FIX$INLINE)
(VCD-VAL-CHGS-P-OF-VCD-VAL-CHGS-FIX
 (15 1 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (12 5 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (12 2 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (9 1 (:DEFINITION VCD-VAL-CHGS-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (2 1 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 )
(VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P
 (17 4 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (9 3 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 )
(VCD-VAL-CHGS-FIX$INLINE
 (4 4 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (4 1 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(VCD-VAL-CHGS-EQUIV$INLINE)
(VCD-VAL-CHGS-EQUIV-IS-AN-EQUIVALENCE)
(VCD-VAL-CHGS-EQUIV-IMPLIES-EQUAL-VCD-VAL-CHGS-FIX-1)
(VCD-VAL-CHGS-FIX-UNDER-VCD-VAL-CHGS-EQUIV)
(EQUAL-OF-VCD-VAL-CHGS-FIX-1-FORWARD-TO-VCD-VAL-CHGS-EQUIV)
(EQUAL-OF-VCD-VAL-CHGS-FIX-2-FORWARD-TO-VCD-VAL-CHGS-EQUIV)
(VCD-VAL-CHGS-EQUIV-OF-VCD-VAL-CHGS-FIX-1-FORWARD)
(VCD-VAL-CHGS-EQUIV-OF-VCD-VAL-CHGS-FIX-2-FORWARD)
(CAR-OF-VCD-VAL-CHGS-FIX-X-UNDER-VCD-VAL-CHG-EQUIV
 (21 3 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (12 12 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (12 3 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (12 2 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (6 6 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (3 3 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-FIX$INLINE))
 )
(CAR-VCD-VAL-CHGS-EQUIV-CONGRUENCE-ON-X-UNDER-VCD-VAL-CHG-EQUIV)
(CDR-OF-VCD-VAL-CHGS-FIX-X-UNDER-VCD-VAL-CHGS-EQUIV
 (29 3 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (14 2 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (8 2 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 )
(CDR-VCD-VAL-CHGS-EQUIV-CONGRUENCE-ON-X-UNDER-VCD-VAL-CHGS-EQUIV)
(CONS-OF-VCD-VAL-CHG-FIX-X-UNDER-VCD-VAL-CHGS-EQUIV
 (20 4 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (9 2 (:REWRITE VCD-VAL-CHGS-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (5 5 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(CONS-VCD-VAL-CHG-EQUIV-CONGRUENCE-ON-X-UNDER-VCD-VAL-CHGS-EQUIV)
(CONS-OF-VCD-VAL-CHGS-FIX-Y-UNDER-VCD-VAL-CHGS-EQUIV
 (12 2 (:REWRITE VCD-VAL-CHGS-P-OF-CONS))
 (8 8 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (5 4 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (4 2 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 )
(CONS-VCD-VAL-CHGS-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-VAL-CHGS-EQUIV)
(CONSP-OF-VCD-VAL-CHGS-FIX
 (12 2 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (8 8 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (7 1 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (4 4 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (4 1 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 )
(VCD-VAL-CHGS-FIX-UNDER-IFF
 (12 2 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (8 8 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (7 1 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (4 4 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (4 1 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (4 1 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 )
(VCD-VAL-CHGS-FIX-OF-CONS
 (13 3 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (5 1 (:REWRITE VCD-VAL-CHGS-P-OF-CONS))
 (4 4 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (4 2 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (3 3 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 )
(LEN-OF-VCD-VAL-CHGS-FIX
 (23 4 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (13 13 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (8 2 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (7 7 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (7 1 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (4 1 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (1 1 (:REWRITE FTY::EQUAL-OF-LEN))
 )
(VCD-VAL-CHGS-FIX-OF-APPEND
 (56 10 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (23 23 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (18 12 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (8 2 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (8 2 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (4 1 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 )
(VCD-VAL-CHGS-FIX-OF-REPEAT
 (16 2 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (10 10 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (10 4 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (8 2 (:REWRITE VCD-VAL-CHGS-P-OF-REPEAT))
 (2 2 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (1 1 (:REWRITE-QUOTED-CONSTANT VCD-VAL-CHGS-FIX-UNDER-VCD-VAL-CHGS-EQUIV))
 )
(LIST-EQUIV-REFINES-VCD-VAL-CHGS-EQUIV
 (98 14 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (72 8 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (70 70 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (60 18 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (48 8 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (36 36 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (16 16 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(NTH-OF-VCD-VAL-CHGS-FIX
 (111 25 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (110 23 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (69 69 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (50 50 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (37 37 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (36 9 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (32 8 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (4 4 (:LINEAR LEN-WHEN-PREFIXP))
 (2 1 (:REWRITE DEFAULT-+-2))
 (1 1 (:REWRITE DEFAULT-CDR))
 (1 1 (:REWRITE DEFAULT-+-1))
 )
(VCD-VAL-CHGS-EQUIV-IMPLIES-VCD-VAL-CHGS-EQUIV-APPEND-1
 (181 32 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (131 17 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (126 126 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (80 17 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (79 22 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (64 64 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (34 34 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(VCD-VAL-CHGS-EQUIV-IMPLIES-VCD-VAL-CHGS-EQUIV-APPEND-2
 (267 46 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (206 26 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (189 189 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (138 39 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (128 26 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (95 95 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (52 52 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (4 4 (:REWRITE CONSP-OF-VCD-VAL-CHGS-FIX))
 )
(VCD-VAL-CHGS-EQUIV-IMPLIES-VCD-VAL-CHGS-EQUIV-NTHCDR-2
 (249 39 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (175 175 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (174 22 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (117 33 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (108 22 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (88 88 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (44 44 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 )
(VCD-VAL-CHGS-EQUIV-IMPLIES-VCD-VAL-CHGS-EQUIV-TAKE-2
 (326 38 (:REWRITE VCD-VAL-CHGS-FIX-WHEN-VCD-VAL-CHGS-P))
 (222 28 (:REWRITE VCD-VAL-CHG-FIX-WHEN-VCD-VAL-CHG-P))
 (190 190 (:TYPE-PRESCRIPTION VCD-VAL-CHGS-P))
 (149 39 (:REWRITE VCD-VAL-CHGS-P-OF-CDR-WHEN-VCD-VAL-CHGS-P))
 (140 26 (:REWRITE VCD-VAL-CHG-P-OF-CAR-WHEN-VCD-VAL-CHGS-P))
 (119 95 (:REWRITE VCD-VAL-CHGS-P-WHEN-NOT-CONSP))
 (54 54 (:TYPE-PRESCRIPTION VCD-VAL-CHG-P))
 (6 6 (:REWRITE-QUOTED-CONSTANT VCD-VAL-CHGS-FIX-UNDER-VCD-VAL-CHGS-EQUIV))
 (1 1 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 )
(VCD-CHILD-MAP-P)
(BOOLEANP-OF-SVAR-P-FOR-VCD-CHILD-MAP-P-KEY-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VCD-CHILD-MAP-P-VAL-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VCD-CHILD-MAP-P-KEY)
(BOOLEANP-OF-SVAR-P-FOR-VCD-CHILD-MAP-P-VAL)
(VCD-CHILD-MAP-P-OF-REPEAT)
(VCD-CHILD-MAP-P-OF-REV)
(VCD-CHILD-MAP-P-OF-LIST-FIX)
(VCD-CHILD-MAP-P-OF-APPEND)
(VCD-CHILD-MAP-P-WHEN-NOT-CONSP)
(VCD-CHILD-MAP-P-OF-CDR-WHEN-VCD-CHILD-MAP-P)
(VCD-CHILD-MAP-P-OF-CONS)
(VCD-CHILD-MAP-P-OF-FAST-ALIST-CLEAN
 (56 10 (:REWRITE VCD-CHILD-MAP-P-OF-CDR-WHEN-VCD-CHILD-MAP-P))
 (16 16 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-CHILD-MAP-P-OF-HONS-SHRINK-ALIST)
(VCD-CHILD-MAP-P-OF-HONS-ACONS)
(SVAR-P-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-CHILD-MAP-P)
(SVAR-P-OF-CDAR-WHEN-VCD-CHILD-MAP-P)
(SVAR-P-OF-CAAR-WHEN-VCD-CHILD-MAP-P)
(VCD-CHILD-MAP-FIX$INLINE)
(VCD-CHILD-MAP-P-OF-VCD-CHILD-MAP-FIX
 (655 14 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (237 8 (:DEFINITION VCD-CHILD-MAP-P))
 (235 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-CHILD-MAP-P))
 (182 12 (:REWRITE VCD-CHILD-MAP-P-OF-CDR-WHEN-VCD-CHILD-MAP-P))
 (77 15 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-CHILD-MAP-P))
 (60 60 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (38 6 (:REWRITE SV::SVAR-P-OF-CDAR-WHEN-SVAR-MAP-P))
 (36 6 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (32 6 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-ID-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (28 28 (:TYPE-PRESCRIPTION SV::SVAR-MAP-P))
 (28 28 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (26 26 (:REWRITE DEFAULT-CAR))
 (24 24 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (18 18 (:REWRITE DEFAULT-CDR))
 (16 16 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-STR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-SCOPE-TBL-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-OUT-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-ID-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVEX-ALIST-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-ALIST-P))
 (16 16 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (14 14 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (14 4 (:REWRITE SV::SVAR-MAP-P-OF-CDR-WHEN-SVAR-MAP-P))
 (12 12 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (12 12 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (12 2 (:REWRITE SV::SVEX-ALIST-P-OF-CDR-WHEN-SVEX-ALIST-P))
 (12 2 (:REWRITE SV::SVAR-ALIST-P-OF-CDR-WHEN-SVAR-ALIST-P))
 (8 8 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (8 2 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (8 2 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (8 2 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (8 2 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (8 2 (:REWRITE VCD-ID-MAP-P-OF-CDR-WHEN-VCD-ID-MAP-P))
 (8 2 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 (6 6 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 )
(VCD-CHILD-MAP-FIX-WHEN-VCD-CHILD-MAP-P
 (363 29 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-CHILD-MAP-P))
 (342 29 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-CHILD-MAP-P))
 (328 26 (:REWRITE VCD-CHILD-MAP-P-OF-CDR-WHEN-VCD-CHILD-MAP-P))
 (68 68 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (61 61 (:REWRITE DEFAULT-CAR))
 (60 15 (:REWRITE SV::SVAR-P-OF-CDAR-WHEN-SVAR-MAP-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (42 15 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-ID-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (36 36 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (36 36 (:REWRITE DEFAULT-CDR))
 (18 18 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (18 18 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (9 9 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-ID-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-CHILD-MAP-FIX$INLINE
 (29 6 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-CHILD-MAP-P))
 (29 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-CHILD-MAP-P))
 (26 5 (:REWRITE VCD-CHILD-MAP-P-OF-CDR-WHEN-VCD-CHILD-MAP-P))
 (14 14 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-CHILD-MAP-EQUIV$INLINE)
(VCD-CHILD-MAP-EQUIV-IS-AN-EQUIVALENCE)
(VCD-CHILD-MAP-EQUIV-IMPLIES-EQUAL-VCD-CHILD-MAP-FIX-1)
(VCD-CHILD-MAP-FIX-UNDER-VCD-CHILD-MAP-EQUIV)
(EQUAL-OF-VCD-CHILD-MAP-FIX-1-FORWARD-TO-VCD-CHILD-MAP-EQUIV)
(EQUAL-OF-VCD-CHILD-MAP-FIX-2-FORWARD-TO-VCD-CHILD-MAP-EQUIV)
(VCD-CHILD-MAP-EQUIV-OF-VCD-CHILD-MAP-FIX-1-FORWARD)
(VCD-CHILD-MAP-EQUIV-OF-VCD-CHILD-MAP-FIX-2-FORWARD)
(CONS-OF-SVAR-FIX-K-UNDER-VCD-CHILD-MAP-EQUIV
 (27 4 (:REWRITE VCD-CHILD-MAP-FIX-WHEN-VCD-CHILD-MAP-P))
 (18 2 (:REWRITE VCD-CHILD-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-CHILD-MAP-P))
 (3 3 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-K-UNDER-VCD-CHILD-MAP-EQUIV)
(CONS-OF-SVAR-FIX-V-UNDER-VCD-CHILD-MAP-EQUIV
 (31 4 (:REWRITE VCD-CHILD-MAP-FIX-WHEN-VCD-CHILD-MAP-P))
 (22 2 (:REWRITE VCD-CHILD-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-CHILD-MAP-P))
 (3 3 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-V-UNDER-VCD-CHILD-MAP-EQUIV)
(CONS-OF-VCD-CHILD-MAP-FIX-Y-UNDER-VCD-CHILD-MAP-EQUIV
 (20 20 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (17 2 (:REWRITE VCD-CHILD-MAP-P-OF-CONS))
 (12 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 4 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-VCD-CHILD-MAP-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-CHILD-MAP-EQUIV)
(VCD-CHILD-MAP-FIX-OF-ACONS
 (17 3 (:REWRITE VCD-CHILD-MAP-FIX-WHEN-VCD-CHILD-MAP-P))
 (10 1 (:REWRITE VCD-CHILD-MAP-P-OF-CONS))
 (9 9 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (8 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-CHILD-MAP-P))
 (2 2 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-CHILD-MAP-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VCD-CHILD-MAP-P-OF-APPEND))
 (44 8 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (35 11 (:REWRITE VCD-CHILD-MAP-P-OF-CDR-WHEN-VCD-CHILD-MAP-P))
 (28 1 (:REWRITE VCD-CHILD-MAP-P-OF-CONS))
 (17 17 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (16 4 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-CHILD-MAP-P))
 (16 4 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-CHILD-MAP-P))
 )
(CONSP-CAR-OF-VCD-CHILD-MAP-FIX
 (28 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (20 5 (:REWRITE VCD-CHILD-MAP-P-OF-CDR-WHEN-VCD-CHILD-MAP-P))
 (8 8 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (8 2 (:REWRITE SVAR-P-OF-CDAR-WHEN-VCD-CHILD-MAP-P))
 (8 2 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-CHILD-MAP-P))
 )
(VCD-PARENT-MAP-P)
(BOOLEANP-OF-SVAR-P-FOR-VCD-PARENT-MAP-P-KEY-LEMMA)
(BOOLEANP-OF-SVARLIST-P-FOR-VCD-PARENT-MAP-P-VAL-LEMMA)
(BOOLEANP-OF-SVAR-P-FOR-VCD-PARENT-MAP-P-KEY)
(BOOLEANP-OF-SVARLIST-P-FOR-VCD-PARENT-MAP-P-VAL)
(VCD-PARENT-MAP-P-OF-REPEAT)
(VCD-PARENT-MAP-P-OF-REV)
(VCD-PARENT-MAP-P-OF-LIST-FIX)
(VCD-PARENT-MAP-P-OF-APPEND)
(VCD-PARENT-MAP-P-WHEN-NOT-CONSP)
(VCD-PARENT-MAP-P-OF-CDR-WHEN-VCD-PARENT-MAP-P)
(VCD-PARENT-MAP-P-OF-CONS)
(VCD-PARENT-MAP-P-OF-FAST-ALIST-CLEAN
 (56 10 (:REWRITE VCD-PARENT-MAP-P-OF-CDR-WHEN-VCD-PARENT-MAP-P))
 (16 16 (:REWRITE VCD-PARENT-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-PARENT-MAP-P-OF-HONS-SHRINK-ALIST)
(VCD-PARENT-MAP-P-OF-HONS-ACONS)
(SVARLIST-P-OF-CDR-OF-HONS-ASSOC-EQUAL-WHEN-VCD-PARENT-MAP-P)
(SVARLIST-P-OF-CDAR-WHEN-VCD-PARENT-MAP-P)
(SVAR-P-OF-CAAR-WHEN-VCD-PARENT-MAP-P)
(VCD-PARENT-MAP-FIX$INLINE)
(VCD-PARENT-MAP-P-OF-VCD-PARENT-MAP-FIX
 (555 7 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (255 8 (:DEFINITION VCD-PARENT-MAP-P))
 (253 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-PARENT-MAP-P))
 (200 12 (:REWRITE VCD-PARENT-MAP-P-OF-CDR-WHEN-VCD-PARENT-MAP-P))
 (168 7 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (77 15 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-PARENT-MAP-P))
 (52 52 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (48 6 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (44 6 (:REWRITE SV::SVARLIST-P-OF-CDR-WHEN-SVARLIST-P))
 (36 36 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (36 6 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (32 32 (:REWRITE DEFAULT-CAR))
 (32 6 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-CHILD-MAP-P))
 (32 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (30 30 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (28 28 (:TYPE-PRESCRIPTION VCD-SCOPE-TBL-P))
 (26 6 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-SCOPE-TBL-P))
 (20 20 (:REWRITE DEFAULT-CDR))
 (18 18 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (16 16 (:TYPE-PRESCRIPTION VCD-VAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-STR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-OUT-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-INST-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VCD-CHILD-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION VAL-CHGS-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVEX-ALIST-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-MAP-P))
 (16 16 (:TYPE-PRESCRIPTION SV::SVAR-ALIST-P))
 (16 16 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (16 16 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (14 14 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 (12 12 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (12 2 (:REWRITE SV::SVEX-ALIST-P-OF-CDR-WHEN-SVEX-ALIST-P))
 (12 2 (:REWRITE SV::SVAR-MAP-P-OF-CDR-WHEN-SVAR-MAP-P))
 (12 2 (:REWRITE SV::SVAR-ALIST-P-OF-CDR-WHEN-SVAR-ALIST-P))
 (10 4 (:REWRITE VCD-SCOPE-TBL-P-OF-CDR-WHEN-VCD-SCOPE-TBL-P))
 (8 8 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (8 8 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (8 2 (:REWRITE VCD-VAR-MAP-P-OF-CDR-WHEN-VCD-VAR-MAP-P))
 (8 2 (:REWRITE VCD-STR-MAP-P-OF-CDR-WHEN-VCD-STR-MAP-P))
 (8 2 (:REWRITE VCD-OUT-MAP-P-OF-CDR-WHEN-VCD-OUT-MAP-P))
 (8 2 (:REWRITE VCD-INST-MAP-P-OF-CDR-WHEN-VCD-INST-MAP-P))
 (8 2 (:REWRITE VCD-CHILD-MAP-P-OF-CDR-WHEN-VCD-CHILD-MAP-P))
 (8 2 (:REWRITE VAL-CHGS-P-OF-CDR-WHEN-VAL-CHGS-P))
 )
(VCD-PARENT-MAP-FIX-WHEN-VCD-PARENT-MAP-P
 (705 29 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-PARENT-MAP-P))
 (541 26 (:REWRITE VCD-PARENT-MAP-P-OF-CDR-WHEN-VCD-PARENT-MAP-P))
 (514 70 (:REWRITE SV::SVARLIST-P-WHEN-SUBSETP-EQUAL))
 (423 24 (:DEFINITION SUBSETP-EQUAL))
 (375 29 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-PARENT-MAP-P))
 (312 15 (:REWRITE SV::SVAR-P-OF-CAR-WHEN-SVARLIST-P))
 (195 15 (:REWRITE SV::SVARLIST-P-OF-CDR-WHEN-SVARLIST-P))
 (186 41 (:DEFINITION MEMBER-EQUAL))
 (180 180 (:REWRITE DEFAULT-CAR))
 (130 130 (:TYPE-PRESCRIPTION MEMBER-EQUAL))
 (113 113 (:REWRITE DEFAULT-CDR))
 (106 34 (:REWRITE SV::SVAR-P-WHEN-MEMBER-EQUAL-OF-SVARLIST-P))
 (93 93 (:TYPE-PRESCRIPTION SUBSETP-EQUAL))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVEX-ALIST-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-MAP-P))
 (60 15 (:REWRITE SV::SVAR-P-OF-CAAR-WHEN-SVAR-ALIST-P))
 (42 15 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-SCOPE-TBL-P))
 (42 15 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-INST-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-VAR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-STR-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-SCOPE-TBL-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-OUT-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-CHILD-MAP-P))
 (42 15 (:REWRITE SVAR-P-OF-CAAR-WHEN-VAL-CHGS-P))
 (41 41 (:REWRITE FTY::OPEN-MEMBER-EQUAL-ON-LIST-OF-TAGS))
 (35 35 (:REWRITE SV::SVARLIST-P-WHEN-NOT-CONSP))
 (18 18 (:REWRITE VCD-SCOPE-TBL-P-WHEN-NOT-CONSP))
 (18 18 (:REWRITE SV::SVEX-ALIST-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-MAP-P-WHEN-SUBSETP-EQUAL))
 (18 18 (:REWRITE SV::SVAR-ALIST-P-WHEN-SUBSETP-EQUAL))
 (9 9 (:REWRITE VCD-VAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-STR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-OUT-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-INST-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VCD-CHILD-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE VAL-CHGS-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVEX-ALIST-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-MAP-P-WHEN-NOT-CONSP))
 (9 9 (:REWRITE SV::SVAR-ALIST-P-WHEN-NOT-CONSP))
 (6 6 (:REWRITE FTY::PROVE-EQUAL-OF-CONS-WHEN-FIRST-QUOTEP))
 (3 3 (:REWRITE FTY::EQUAL-OF-CONS-BY-EQUAL-OF-STRIP-CARS))
 )
(VCD-PARENT-MAP-FIX$INLINE
 (29 6 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-PARENT-MAP-P))
 (29 6 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-PARENT-MAP-P))
 (26 5 (:REWRITE VCD-PARENT-MAP-P-OF-CDR-WHEN-VCD-PARENT-MAP-P))
 (14 14 (:REWRITE VCD-PARENT-MAP-P-WHEN-NOT-CONSP))
 )
(FTY::TMP-DEFFIXTYPE-IDEMPOTENT
 (1 1 (:REWRITE VCD-PARENT-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-PARENT-MAP-EQUIV$INLINE)
(VCD-PARENT-MAP-EQUIV-IS-AN-EQUIVALENCE)
(VCD-PARENT-MAP-EQUIV-IMPLIES-EQUAL-VCD-PARENT-MAP-FIX-1)
(VCD-PARENT-MAP-FIX-UNDER-VCD-PARENT-MAP-EQUIV)
(EQUAL-OF-VCD-PARENT-MAP-FIX-1-FORWARD-TO-VCD-PARENT-MAP-EQUIV)
(EQUAL-OF-VCD-PARENT-MAP-FIX-2-FORWARD-TO-VCD-PARENT-MAP-EQUIV)
(VCD-PARENT-MAP-EQUIV-OF-VCD-PARENT-MAP-FIX-1-FORWARD)
(VCD-PARENT-MAP-EQUIV-OF-VCD-PARENT-MAP-FIX-2-FORWARD)
(CONS-OF-SVAR-FIX-K-UNDER-VCD-PARENT-MAP-EQUIV
 (27 4 (:REWRITE VCD-PARENT-MAP-FIX-WHEN-VCD-PARENT-MAP-P))
 (18 2 (:REWRITE VCD-PARENT-MAP-P-OF-CONS))
 (6 6 (:TYPE-PRESCRIPTION VCD-PARENT-MAP-P))
 (6 6 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (4 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (3 3 (:REWRITE VCD-PARENT-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-SVAR-EQUIV-CONGRUENCE-ON-K-UNDER-VCD-PARENT-MAP-EQUIV)
(CONS-OF-SVARLIST-FIX-V-UNDER-VCD-PARENT-MAP-EQUIV
 (31 4 (:REWRITE VCD-PARENT-MAP-FIX-WHEN-VCD-PARENT-MAP-P))
 (22 2 (:REWRITE VCD-PARENT-MAP-P-OF-CONS))
 (10 10 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (6 6 (:TYPE-PRESCRIPTION VCD-PARENT-MAP-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (3 3 (:REWRITE VCD-PARENT-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-SVARLIST-EQUIV-CONGRUENCE-ON-V-UNDER-VCD-PARENT-MAP-EQUIV)
(CONS-OF-VCD-PARENT-MAP-FIX-Y-UNDER-VCD-PARENT-MAP-EQUIV
 (17 2 (:REWRITE VCD-PARENT-MAP-P-OF-CONS))
 (11 11 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (9 9 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (6 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (6 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (4 4 (:REWRITE VCD-PARENT-MAP-P-WHEN-NOT-CONSP))
 )
(CONS-VCD-PARENT-MAP-EQUIV-CONGRUENCE-ON-Y-UNDER-VCD-PARENT-MAP-EQUIV)
(VCD-PARENT-MAP-FIX-OF-ACONS
 (17 3 (:REWRITE VCD-PARENT-MAP-FIX-WHEN-VCD-PARENT-MAP-P))
 (10 1 (:REWRITE VCD-PARENT-MAP-P-OF-CONS))
 (5 5 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (4 4 (:TYPE-PRESCRIPTION VCD-PARENT-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (4 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (4 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (2 2 (:REWRITE VCD-PARENT-MAP-P-WHEN-NOT-CONSP))
 )
(VCD-PARENT-MAP-FIX-OF-APPEND
 (100 100 (:TYPE-PRESCRIPTION BINARY-APPEND))
 (60 6 (:REWRITE VCD-PARENT-MAP-P-OF-APPEND))
 (35 11 (:REWRITE VCD-PARENT-MAP-P-OF-CDR-WHEN-VCD-PARENT-MAP-P))
 (28 1 (:REWRITE VCD-PARENT-MAP-P-OF-CONS))
 (22 4 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (22 4 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (16 4 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-PARENT-MAP-P))
 (16 4 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-PARENT-MAP-P))
 (9 9 (:TYPE-PRESCRIPTION SV::SVAR-P))
 (8 8 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 )
(CONSP-CAR-OF-VCD-PARENT-MAP-FIX
 (20 5 (:REWRITE VCD-PARENT-MAP-P-OF-CDR-WHEN-VCD-PARENT-MAP-P))
 (14 2 (:REWRITE SV::SVARLIST-FIX-WHEN-SVARLIST-P))
 (14 2 (:REWRITE SV::SVAR-FIX-WHEN-SVAR-P))
 (8 2 (:REWRITE SVARLIST-P-OF-CDAR-WHEN-VCD-PARENT-MAP-P))
 (8 2 (:REWRITE SVAR-P-OF-CAAR-WHEN-VCD-PARENT-MAP-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVARLIST-P))
 (4 4 (:TYPE-PRESCRIPTION SV::SVAR-P))
 )
