(CRYPTO::GENRANDOM-AUX
 (9 9 (:TYPE-PRESCRIPTION RATIONALP-MOD))
 (9 9 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (9 9 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (9 9 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (9 9 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (9 9 (:TYPE-PRESCRIPTION MOD-NONNEGATIVE))
 (9 9 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (9 9 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (9 9 (:TYPE-PRESCRIPTION INTEGERP-MOD))
 )
(CRYPTO::GENRANDOM)
(CRYPTO::GENRANDOM-AUX-INTEGER
 (6 2 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (6 2 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (2 2 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (2 2 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (2 2 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (2 2 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (2 2 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 )
(CRYPTO::GENRANDOM-AUX-MINIMUM
 (10 2 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (10 2 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (2 2 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (2 2 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (2 2 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (2 2 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 )
(CRYPTO::GENRANDOM-AUX-MAXIMUM
 (500 100 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (500 100 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (349 8 (:REWRITE MOD-X-Y-=-X . 3))
 (346 8 (:REWRITE MOD-ZERO . 3))
 (342 8 (:REWRITE MOD-X-Y-=-X . 4))
 (317 8 (:REWRITE CANCEL-MOD-+))
 (230 230 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (230 230 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (230 230 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (169 8 (:REWRITE MOD-ZERO . 2))
 (130 22 (:TYPE-PRESCRIPTION NOT-INTEGERP-4A))
 (128 4 (:LINEAR MOD-BOUNDS-3))
 (100 100 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (100 100 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (100 100 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (100 100 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 (98 11 (:REWRITE |(* y x)|))
 (83 29 (:REWRITE DEFAULT-*-2))
 (72 8 (:REWRITE |(* (* x y) z)|))
 (44 8 (:LINEAR MOD-BOUNDS-2))
 (40 4 (:REWRITE SIMPLIFY-SUMS-<))
 (40 4 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-<))
 (40 4 (:REWRITE PREFER-POSITIVE-ADDENDS-<))
 (34 16 (:REWRITE MOD-COMPLETION))
 (32 8 (:REWRITE |(* c (* d x))|))
 (29 29 (:REWRITE NORMALIZE-FACTORS-GATHER-EXPONENTS))
 (29 29 (:REWRITE DEFAULT-*-1))
 (26 8 (:REWRITE MOD-NEG))
 (26 8 (:REWRITE MOD-MINUS-2))
 (26 8 (:REWRITE MOD-CANCEL-*))
 (25 8 (:REWRITE SIMPLIFY-MOD-+-MOD-WEAK))
 (22 22 (:TYPE-PRESCRIPTION NOT-INTEGERP-3A))
 (22 22 (:TYPE-PRESCRIPTION NOT-INTEGERP-2A))
 (22 22 (:TYPE-PRESCRIPTION NOT-INTEGERP-1A))
 (22 4 (:REWRITE DEFAULT-<-2))
 (22 4 (:REWRITE DEFAULT-<-1))
 (22 1 (:REWRITE REWRITE-MOD-MOD-WEAK))
 (20 2 (:REWRITE SIMPLIFY-SUMS-EQUAL))
 (20 2 (:REWRITE SIMPLIFY-PRODUCTS-GATHER-EXPONENTS-EQUAL))
 (20 2 (:REWRITE PREFER-POSITIVE-ADDENDS-EQUAL))
 (13 13 (:REWRITE REDUCE-INTEGERP-+))
 (13 13 (:REWRITE INTEGERP-MINUS-X))
 (13 13 (:REWRITE |(integerp (* c x))|))
 (13 13 (:META META-INTEGERP-CORRECT))
 (8 8 (:REWRITE SIMPLIFY-MOD-+-MINUS-MOD))
 (8 8 (:REWRITE MOD-X-Y-=-X . 2))
 (7 1 (:REWRITE |(equal (* x y) 0)|))
 (5 5 (:REWRITE NORMALIZE-TERMS-SUCH-AS-1/AX+BX))
 (5 5 (:REWRITE DEFAULT-UNARY-/))
 (5 1 (:REWRITE MOD-POSITIVE . 3))
 (4 4 (:REWRITE REMOVE-WEAK-INEQUALITIES-TWO))
 (4 4 (:REWRITE |(< (- x) (- y))|))
 (3 3 (:REWRITE REMOVE-WEAK-INEQUALITIES-ONE))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-=-0))
 (2 2 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-0-<-A+AB))
 (2 2 (:REWRITE |(equal (- x) 0)|))
 (2 2 (:REWRITE |(equal (- x) (- y))|))
 (2 2 (:REWRITE |(< 0 (- x))|))
 (1 1 (:REWRITE SIMPLIFY-TERMS-SUCH-AS-A+AB-<-0))
 (1 1 (:REWRITE MOD-ZERO . 1))
 (1 1 (:REWRITE MOD-POSITIVE . 2))
 (1 1 (:REWRITE MOD-POSITIVE . 1))
 (1 1 (:REWRITE MOD-NONPOSITIVE))
 (1 1 (:REWRITE MOD-+-CANCEL-0-WEAK))
 (1 1 (:REWRITE |(< 0 (* x y))|))
 (1 1 (:REWRITE |(< (- x) 0)|))
 (1 1 (:REWRITE |(< (* x y) 0)|))
 )
(CRYPTO::GENRANDOM-INTEGER
 (10 2 (:TYPE-PRESCRIPTION MOD-ZERO . 1))
 (10 2 (:TYPE-PRESCRIPTION MOD-POSITIVE . 2))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-4B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-3B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-2B))
 (4 4 (:TYPE-PRESCRIPTION NOT-INTEGERP-1B))
 (2 2 (:TYPE-PRESCRIPTION MOD-POSITIVE . 1))
 (2 2 (:TYPE-PRESCRIPTION MOD-NONPOSITIVE))
 (2 2 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 2))
 (2 2 (:TYPE-PRESCRIPTION MOD-NEGATIVE . 1))
 )
