(C::EXEC-BINARY-STRICT-PURE-WHEN-SHR
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (29 2 (:REWRITE C::EXPR-VALUEP-WHEN-EXPR-VALUE-OPTIONP))
 (26 1 (:REWRITE C::EXPR-VALUE-OPTIONP-WHEN-EXPR-VALUEP))
 (24 4 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (10 10 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (3 3 (:TYPE-PRESCRIPTION C::EXPR-VALUE-OPTIONP))
 (2 2 (:TYPE-PRESCRIPTION C::EXPR-VALUEP))
 (2 2 (:REWRITE-QUOTED-CONSTANT C::OBJDESIGN-OPTION-FIX-UNDER-OBJDESIGN-OPTION-EQUIV))
 )
(C::SHR-SCHAR-AND-VALUE)
(C::SHR-VALUES-WHEN-SCHAR
 (2 2 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-SCHAR
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (12 12 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:TYPE-PRESCRIPTION C::UCHARP))
 (8 8 (:TYPE-PRESCRIPTION C::SSHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (8 8 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-UCHAR
 (465 465 (:TYPE-PRESCRIPTION EVENP))
 (313 158 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (313 158 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (313 158 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (158 158 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (30 15 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 15 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (12 12 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:TYPE-PRESCRIPTION C::SSHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-SSHORT
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-USHORT
 (465 465 (:TYPE-PRESCRIPTION EVENP))
 (313 158 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (313 158 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (313 158 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (158 158 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (30 15 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 15 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-SINT
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-UINT
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-SLONG
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-ULONG
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-SLLONG
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SCHAR-AND-VALUE-WHEN-ULLONG
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::SCHAR-FIX-WHEN-SCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE)
(C::SHR-VALUES-WHEN-UCHAR
 (2 2 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-SCHAR
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:TYPE-PRESCRIPTION C::SSHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 8 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-UCHAR
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:TYPE-PRESCRIPTION C::SSHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-SSHORT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (12 12 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-USHORT
 (459 459 (:TYPE-PRESCRIPTION EVENP))
 (306 153 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (306 153 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (306 153 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (153 153 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (133 133 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (133 133 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-SINT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (12 12 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-UINT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-SLONG
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (16 16 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-ULONG
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (16 16 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-SLLONG
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (16 16 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UCHAR-AND-VALUE-WHEN-ULLONG
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::UCHAR-FIX-WHEN-UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE)
(C::SHR-VALUES-WHEN-SSHORT
 (2 2 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-SCHAR
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-UCHAR
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (148 148 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-SSHORT
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (12 12 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::USHORTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-USHORT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (148 148 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-SINT
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-UINT
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-SLONG
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-ULONG
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-SLLONG
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SSHORT-AND-VALUE-WHEN-ULLONG
 (471 471 (:TYPE-PRESCRIPTION EVENP))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (314 157 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (157 157 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::SSHORT-FIX-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE)
(C::SHR-VALUES-WHEN-USHORT
 (2 2 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-SCHAR
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 8 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-UCHAR
 (459 459 (:TYPE-PRESCRIPTION EVENP))
 (306 153 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (306 153 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (306 153 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (153 153 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (133 133 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (133 133 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-SSHORT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 8 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-USHORT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-SINT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (12 12 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-UINT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-SLONG
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (16 16 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-ULONG
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (16 16 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-SLLONG
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (16 16 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-USHORT-AND-VALUE-WHEN-ULLONG
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (290 145 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (145 145 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (125 125 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (5 1 (:REWRITE C::USHORT-FIX-WHEN-USHORTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE)
(C::SHR-VALUES-WHEN-SINT
 (2 2 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 )
(C::SHR-SINT-AND-VALUE-WHEN-SCHAR
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 18 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 3 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-UCHAR
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (148 148 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (20 20 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (20 4 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-SSHORT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 18 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 3 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-USHORT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (148 148 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (20 20 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (20 4 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-SINT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::UINTP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-UINT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-SLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-ULONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-SLLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SINT-AND-VALUE-WHEN-ULLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SINT-FIX-WHEN-SINTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-UINT))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-UINT))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE)
(C::SHR-VALUES-WHEN-UINT
 (2 2 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 )
(C::SHR-UINT-AND-VALUE-WHEN-SCHAR
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (28 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (6 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-UCHAR
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (66 66 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (56 4 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 4 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (18 9 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 3 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUEP))
 (12 4 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (9 9 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (8 8 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (8 8 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (6 6 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-SSHORT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (28 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (6 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-USHORT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (66 66 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (56 4 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 4 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (18 9 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 3 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUEP))
 (12 4 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (9 9 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (8 8 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (8 8 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (6 6 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-SINT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-UINT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SINTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-SLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (10 10 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SINTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-ULONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (10 10 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (10 10 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SINTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-SLLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (10 10 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (10 10 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SINTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-UINT-AND-VALUE-WHEN-ULLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (10 10 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (10 10 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::ULONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SINTP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::UINT-FIX-WHEN-UINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SINTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE)
(C::SHR-VALUES-WHEN-SLONG
 (2 2 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-SCHAR
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 3 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-UCHAR
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (148 148 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (22 22 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (20 4 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-SSHORT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 3 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-USHORT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (148 148 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (22 22 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (20 4 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-SINT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-UINT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (20 20 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-SLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-ULONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-SLLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLONG-AND-VALUE-WHEN-ULLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLONG-FIX-WHEN-SLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE)
(C::SHR-VALUES-WHEN-ULONG
 (2 2 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-SCHAR
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (28 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (6 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-UCHAR
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (66 66 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (56 4 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 4 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (18 9 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 3 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUEP))
 (12 4 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (9 9 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (8 8 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-SSHORT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (28 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (6 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-USHORT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (66 66 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (56 4 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 4 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (18 9 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (15 3 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUEP))
 (12 4 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (9 9 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (8 8 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-SINT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (5 1 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-UINT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLONGP))
 (8 8 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (5 1 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-SLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-ULONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:TYPE-PRESCRIPTION C::SLLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (12 12 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SLONGP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-SLLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (14 14 (:TYPE-PRESCRIPTION C::ULLONGP))
 (14 14 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (10 10 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (10 10 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SLONGP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-ULONG-AND-VALUE-WHEN-ULLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (10 10 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (10 10 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-ULLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (8 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::ULONG-FIX-WHEN-ULONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SLONGP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-SLLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-SLLONG))
 )
(C::SHR-SLLONG-AND-VALUE)
(C::SHR-VALUES-WHEN-SLLONG
 (2 2 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-SCHAR
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (15 3 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (6 6 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-UCHAR
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (148 148 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (22 22 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (20 4 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (8 8 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-SSHORT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (15 3 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-USHORT
 (435 435 (:TYPE-PRESCRIPTION EVENP))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (293 148 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (148 148 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (128 128 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (84 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (36 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (28 14 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (22 22 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (20 4 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (18 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (16 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (14 14 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (8 8 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-SINT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (6 6 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-UINT
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (20 20 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-SLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-ULONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (20 20 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-SLLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (13 2 (:REWRITE C::VALUE-INTEGERP-WHEN-ULLONGP))
 (13 2 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULLONGP))
 (13 2 (:REWRITE C::PROMOTE-VALUE-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:TYPE-PRESCRIPTION C::ULLONGP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-SLLONG-AND-VALUE-WHEN-ULLONG
 (441 441 (:TYPE-PRESCRIPTION EVENP))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (294 147 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (147 147 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (127 127 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (72 6 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (33 6 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (26 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (18 18 (:TYPE-PRESCRIPTION C::VALUEP))
 (15 6 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (15 3 (:REWRITE C::SLLONG-FIX-WHEN-SLLONGP))
 (14 14 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (12 12 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (2 1 (:REWRITE C::INTEGER-TYPE-BITS-WHEN-TYPE-ULLONG))
 (1 1 (:TYPE-PRESCRIPTION C::TYPE-ULLONG))
 )
(C::SHR-ULLONG-AND-VALUE)
(C::SHR-VALUES-WHEN-ULLONG
 (2 2 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-SCHAR
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (28 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (12 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (6 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UCHARP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UCHARP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::UCHARP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SCHARP-WHEN-MEMBER-EQUAL-OF-SCHAR-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-UCHAR
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (66 66 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (56 4 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 4 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (18 9 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (15 3 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUEP))
 (12 4 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (9 9 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (8 8 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::UCHARP-WHEN-MEMBER-EQUAL-OF-UCHAR-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SSHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SSHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:TYPE-PRESCRIPTION C::SSHORTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-SSHORT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (28 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (12 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (6 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-USHORTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-USHORTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:TYPE-PRESCRIPTION C::USHORTP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SSHORTP-WHEN-MEMBER-EQUAL-OF-SSHORT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-USHORT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (129 66 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (66 66 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (56 4 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (46 46 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 4 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (20 20 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (18 9 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (15 3 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (12 12 (:TYPE-PRESCRIPTION C::VALUEP))
 (12 4 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (9 9 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (8 8 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (8 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::USHORTP-WHEN-MEMBER-EQUAL-OF-USHORT-LISTP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SINTP))
 (4 4 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-SINT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::UINTP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-UINTP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (5 1 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-UINTP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SINTP-WHEN-MEMBER-EQUAL-OF-SINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-UINT
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:TYPE-PRESCRIPTION C::SLONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (5 1 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::UINTP-WHEN-MEMBER-EQUAL-OF-UINT-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-SLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:TYPE-PRESCRIPTION C::ULONGP))
 (6 6 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-ULONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (5 1 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-ULONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SLONGP-WHEN-MEMBER-EQUAL-OF-SLONG-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-ULONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 8 (:TYPE-PRESCRIPTION C::SLLONGP))
 (8 8 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::VALUE-INTEGERP-WHEN-SLLONGP))
 (5 1 (:REWRITE C::VALUE-INTEGER->GET-WHEN-SLLONGP))
 (5 1 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (5 1 (:REWRITE C::PROMOTE-VALUE-WHEN-SLLONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::ULONGP-WHEN-MEMBER-EQUAL-OF-ULONG-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-SLLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (164 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NON-POSITIVE-EXPONENT))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (46 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (40 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (36 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (16 16 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (4 4 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
(C::SHR-ULLONG-AND-VALUE-WHEN-ULLONG
 (189 189 (:TYPE-PRESCRIPTION EVENP))
 (172 2 (:REWRITE MOD-WHEN-INTEGERP-OF-QUOTIENT))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (126 63 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (63 63 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (48 2 (:REWRITE MULTIPLE-WHEN-MOD-0-CHEAP))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONPOSITIVE-AND-NONNEGATIVE-TYPE))
 (43 43 (:TYPE-PRESCRIPTION <=-OF-TRUNCATE-AND-0-WHEN-NONNEGATIVE-AND-NONPOSITIVE-TYPE))
 (42 2 (:TYPE-PRESCRIPTION RATIONALP-OF-MOD))
 (38 2 (:REWRITE MOD-WHEN-<-OF-0))
 (24 2 (:REWRITE C::VALUE-FIX-WHEN-VALUEP))
 (12 12 (:REWRITE C::ULLONGP-WHEN-MEMBER-EQUAL-OF-ULLONG-LISTP))
 (12 6 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 2 (:REWRITE C::VALUEP-WHEN-VALUE-OPTIONP))
 (8 1 (:REWRITE C::TYPE-OF-VALUE-WHEN-SLLONGP))
 (6 6 (:TYPE-PRESCRIPTION C::VALUEP))
 (6 6 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (5 2 (:REWRITE C::VALUE-OPTIONP-WHEN-VALUEP))
 (5 1 (:REWRITE C::ULLONG-FIX-WHEN-ULLONGP))
 (4 4 (:TYPE-PRESCRIPTION C::VALUE-OPTIONP))
 (4 4 (:REWRITE C::VALUEP-WHEN-MEMBER-EQUAL-OF-VALUE-LISTP))
 (2 2 (:TYPE-PRESCRIPTION C::SLLONGP))
 (2 2 (:TYPE-PRESCRIPTION NONNEG-OF-MOD-TYPE-2))
 (2 2 (:TYPE-PRESCRIPTION INTEGERP-OF-MOD-TYPE))
 (2 2 (:REWRITE C::SLLONGP-WHEN-MEMBER-EQUAL-OF-SLLONG-LISTP))
 (2 2 (:REWRITE MOD-WHEN-EQUAL-OF-MOD-AND-0-FREE-CHEAP))
 (2 2 (:REWRITE COMMUTATIVITY-OF-*))
 )
