source: git/Tst/Wester/C.tst @ 41eaf02

spielwiese
Last change on this file since 41eaf02 was 2e49a5, checked in by Olaf Bachmann <obachman@…>, 23 years ago
* initial commit git-svn-id: file:///usr/local/Singular/svn/trunk@5001 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 262 bytes
Line 
1LIB "tst.lib"; tst_init();
2ring R = 0, a, lp;
3number x = 13*17*31;
4number y = 13*19*29;
5number q;
6
7tst_InitTimer();
8
9for (int i = 1; i <= 200; i++)
10{
11  q = gcd(x^(300 + (i mod 181)), y^(200 + (i mod 183)));
12}
13
14tst_ReportTimer("C");
15
16q;
17kill R;
18
19tst_status(1); $
Note: See TracBrowser for help on using the repository browser.