chiark / gitweb /
Implement efficient reduction for pleasant-looking primes.
[catacomb] / tests / mpreduce
1 # $Id: mpreduce,v 1.1 2004/03/27 00:04:46 mdw Exp $
2 #
3 # Tests for efficient reduction
4
5 reduce {
6   0x72e2c37447f8bca34c4a39b130ea8e5c9a7d8b54564aa88ea773
7   0x367aa8f5ba9ac4e8e2ea198b8af2c3b3081deab392ffc05715783b245a62a6fa
8   0x08e8c03ebf398c63d71d8fd7ca4ece12367a8dde180ca650afb6;
9
10   0xfffffffdffffffffffffffffffffffff
11   0x7fb838a8a0a95046b9d9d9fb4440f7bbc1a7bd3b
12   0xa019c198b9d9d9fb4440f7bc415ff5e4;
13 }
14
15 modexp {
16   0xfffffffdffffffffffffffffffffffff 2 
17     0xfffffffdfffffffffffffffffffffffe 1;
18   0xfffffffdffffffffffffffffffffffff 2 
19     0xfffffffdfffffffffffffffffffffffd 
20     0x7fffffff000000000000000000000000;
21 }