(PFIELD::ADD-EVISC-TUPLES-FOR-POWERS-OF-2
 (489 489 (:TYPE-PRESCRIPTION EVENP))
 (437 274 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (437 274 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (437 274 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (274 274 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (52 19 (:REWRITE DEFAULT-<-1))
 (32 15 (:REWRITE DEFAULT-COERCE-1))
 (23 13 (:REWRITE DEFAULT-CDR))
 (23 13 (:REWRITE DEFAULT-CAR))
 (22 22 (:REWRITE DEFAULT-COERCE-2))
 (20 19 (:REWRITE DEFAULT-<-2))
 (18 7 (:REWRITE DEFAULT-COERCE-3))
 (17 6 (:REWRITE DEFAULT-+-2))
 (17 6 (:REWRITE DEFAULT-+-1))
 (16 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-EXPONENTS-LINEAR))
 (13 13 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (13 13 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (11 1 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (8 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-EXPONENTS-LINEAR-NEGATIVE-EXPONENT))
 (8 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-BASE-LINEAR))
 (8 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-4))
 (8 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-2))
 (5 1 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (4 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-3))
 (4 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-1))
 (2 2 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (2 2 (:REWRITE ZP-OPEN))
 (2 1 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (1 1 (:REWRITE SYMBOL-PACKAGE-NAME-PKG-WITNESS-NAME))
 (1 1 (:REWRITE RATIONALP-IMPLIES-ACL2-NUMBERP))
 (1 1 (:REWRITE DEFAULT-PKG-IMPORTS))
 )
(PFIELD::ADD-EVISC-TUPLES-FOR-NEGATED-POWERS-OF-2
 (567 567 (:TYPE-PRESCRIPTION EVENP))
 (471 282 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (471 282 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (471 282 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (282 282 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (72 34 (:REWRITE DEFAULT-COERCE-1))
 (64 34 (:REWRITE DEFAULT-CDR))
 (64 34 (:REWRITE DEFAULT-CAR))
 (56 12 (:REWRITE DEFAULT-<-1))
 (47 47 (:REWRITE DEFAULT-COERCE-2))
 (34 13 (:REWRITE DEFAULT-COERCE-3))
 (22 2 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (19 7 (:REWRITE DEFAULT-+-2))
 (19 7 (:REWRITE DEFAULT-+-1))
 (12 12 (:REWRITE DEFAULT-<-2))
 (12 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-EXPONENTS-LINEAR))
 (12 1 (:REWRITE PFIELD::NEG-WHEN-NOT-INTEGERP-CHEAP))
 (11 11 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 11 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (10 2 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (8 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-EXPONENTS-LINEAR-NEGATIVE-EXPONENT))
 (8 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-BASE-LINEAR))
 (6 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-4))
 (6 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-2))
 (4 4 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (4 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-3))
 (4 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-1))
 (4 2 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (2 2 (:REWRITE ZP-OPEN))
 (2 2 (:REWRITE SYMBOL-PACKAGE-NAME-PKG-WITNESS-NAME))
 (2 2 (:REWRITE DEFAULT-UNARY-MINUS))
 (2 2 (:REWRITE DEFAULT-PKG-IMPORTS))
 (1 1 (:REWRITE PFIELD::NEG-WHEN-NOT-POSP-ARG2-CHEAP))
 (1 1 (:REWRITE PFIELD::NEG-WHEN-CONSTANT-ARG1))
 )
(PFIELD::ADD-EVISC-TUPLES-FOR-INVERSE-POWERS-OF-2
 (576 576 (:TYPE-PRESCRIPTION EVENP))
 (477 285 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (477 285 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (477 285 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (285 285 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (86 41 (:REWRITE DEFAULT-COERCE-1))
 (82 42 (:REWRITE DEFAULT-CDR))
 (82 42 (:REWRITE DEFAULT-CAR))
 (56 12 (:REWRITE DEFAULT-<-1))
 (54 54 (:REWRITE DEFAULT-COERCE-2))
 (34 13 (:REWRITE DEFAULT-COERCE-3))
 (22 2 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (19 7 (:REWRITE DEFAULT-+-2))
 (19 7 (:REWRITE DEFAULT-+-1))
 (12 12 (:REWRITE DEFAULT-<-2))
 (12 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-EXPONENTS-LINEAR))
 (11 11 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (11 11 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (10 2 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (8 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-EXPONENTS-LINEAR-NEGATIVE-EXPONENT))
 (8 8 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-BASE-LINEAR))
 (6 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-4))
 (6 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-2))
 (4 4 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (4 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-3))
 (4 4 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-1))
 (4 2 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (2 2 (:REWRITE ZP-OPEN))
 (2 2 (:REWRITE SYMBOL-PACKAGE-NAME-PKG-WITNESS-NAME))
 (2 2 (:REWRITE DEFAULT-UNARY-MINUS))
 (2 2 (:REWRITE DEFAULT-PKG-IMPORTS))
 )
(PFIELD::ADD-EVISC-TUPLES-FOR-NEGATED-INVERSE-POWERS-OF-2
 (903 903 (:TYPE-PRESCRIPTION EVENP))
 (695 394 (:TYPE-PRESCRIPTION EXPT-TYPE-ODD-EXPONENT-NEGATIVE-BASE))
 (695 394 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-2))
 (695 394 (:TYPE-PRESCRIPTION EXPT-TYPE-EVEN-EXPONENT-1))
 (394 394 (:TYPE-PRESCRIPTION EXPT-TYPE-SMALL-BASE-NEGATIVE-EXPONENT))
 (100 50 (:REWRITE DEFAULT-CDR))
 (100 50 (:REWRITE DEFAULT-CAR))
 (100 48 (:REWRITE DEFAULT-COERCE-1))
 (88 21 (:REWRITE DEFAULT-<-1))
 (61 61 (:REWRITE DEFAULT-COERCE-2))
 (34 13 (:REWRITE DEFAULT-COERCE-3))
 (22 2 (:REWRITE INTERN-IN-PACKAGE-OF-SYMBOL-IS-IDENTITY))
 (21 21 (:REWRITE DEFAULT-<-2))
 (19 7 (:REWRITE DEFAULT-+-2))
 (19 7 (:REWRITE DEFAULT-+-1))
 (17 17 (:REWRITE EXPT-WHEN-NOT-INTEGERP-ARG1-CHEAP))
 (17 17 (:REWRITE EXPT-WHEN-NOT-ACL2-NUMBERP-CHEAP))
 (16 12 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-EXPONENTS-LINEAR))
 (12 12 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-EXPONENTS-LINEAR-NEGATIVE-EXPONENT))
 (12 12 (:LINEAR <-OF-EXPT-AND-EXPT-SAME-BASE-LINEAR))
 (10 2 (:REWRITE DEFAULT-INTERN-IN-PACKAGE-OF-SYMBOL))
 (8 6 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-4))
 (8 6 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-2))
 (6 6 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-3))
 (6 6 (:LINEAR EXPT-WHEN-NEGATIVE-EXPONENT-LINEAR-1))
 (4 4 (:TYPE-PRESCRIPTION MEMBER-SYMBOL-NAME))
 (4 4 (:REWRITE ZP-OPEN))
 (4 2 (:REWRITE DEFAULT-SYMBOL-PACKAGE-NAME))
 (3 1 (:REWRITE PFIELD::FEP-OF-INV))
 (2 2 (:REWRITE SYMBOL-PACKAGE-NAME-PKG-WITNESS-NAME))
 (2 2 (:REWRITE DEFAULT-UNARY-MINUS))
 (2 2 (:REWRITE DEFAULT-PKG-IMPORTS))
 (2 1 (:REWRITE PFIELD::NEG-WHEN-NOT-INTEGERP-CHEAP))
 (1 1 (:REWRITE PFIELD::NEG-WHEN-NOT-POSP-ARG2-CHEAP))
 (1 1 (:REWRITE PFIELD::NEG-WHEN-CONSTANT-ARG1))
 (1 1 (:REWRITE PFIELD::FEP-WHEN-CONSTANT))
 )
