source: git/Tst/Short/parallel_l.tst @ f1cfef

jengelh-datetimespielwiese
Last change on this file since f1cfef was f1cfef, checked in by Andreas Steenpass <steenpass@…>, 11 years ago
add tests for parallel.lib und realclassify.lib These libraries are work in progress, so for the moment, the tests are just taken from the examples in the documentation.
  • Property mode set to 100644
File size: 786 bytes
Line 
1LIB "tst.lib";
2tst_init();
3
4LIB "parallel.lib";
5LIB "primdec.lib";
6
7ring r = 0, (x,y,z), lp;
8ideal i = z8+z6+4z5+4z3+4z2+4, y-z2;
9ideal j = 3x3y+x3+xy3+y2z2, 2x3z-xy-xz3-y4-z2, 2x2yz-2xy2+xz2-y4;
10list commands = list("std", "primdecGTZ", "primdecSY",
11                     "std", "primdecGTZ", "primdecSY");
12list args = list(list(i), list(i), list(i),
13                 list(j), list(j), list(j));
14parallelWaitN(commands, args, 3);
15
16commands = list("primdecGTZ", "primdecSY");
17args = list(list(i), list(i));
18parallelWaitFirst(commands, args);
19
20ring s = 0, (x,y,z), dp;
21ideal i1 = z8+z6+4z5+4z3+4z2+4, y-z2;
22ideal i2 = x10+x9y2, y8-x2y7;
23ideal i3 = x3-2xy, x2y-2y2+x;
24string command = "std";
25list args = list(list(i1), list(i2), list(i3));
26parallelWaitAll(command, args);
27
28tst_status(1);$
Note: See TracBrowser for help on using the repository browser.