fieker-DuValspielwiese
Last change
on this file since 57f6ffd was
4dda3e,
checked in by Hans Schoenemann <hannes@…>, 6 years ago
|
fix: tr. #822 ((ZZ/n)[x] when n is a power of 2)
|
-
Property mode set to
100644
|
File size:
441 bytes
|
Line | |
---|
1 | LIB "tst.lib"; |
---|
2 | tst_init(); |
---|
3 | |
---|
4 | // Ring declarations of the form (ZZ/n)[x] work wrong when n is a power of 2 |
---|
5 | int i; |
---|
6 | ring R1=(ZZ/16)[x]; R1; |
---|
7 | number n=2; |
---|
8 | for(i=1;i<3;i++) { n=n*n;n; } |
---|
9 | number(32768); |
---|
10 | number(65536); |
---|
11 | ring R2=(ZZ/(bigint(2)^64))[x]; R2; |
---|
12 | number n=2; |
---|
13 | for(i=1;i<7;i++) { n=n*n;n; } |
---|
14 | number(32768); |
---|
15 | number(65536); |
---|
16 | ring R3=(ZZ/(bigint(2)^65))[x]; R3; |
---|
17 | number n=2; |
---|
18 | for(i=1;i<8;i++) { n=n*n;n; } |
---|
19 | number(32768); |
---|
20 | number(65536); |
---|
21 | |
---|
22 | tst_status(1);$ |
---|
Note: See
TracBrowser
for help on using the repository browser.