Changeset b7fbc4 in git for Tst/Short/parallel_s.tst

Timestamp:

Dec 4, 2013, 8:50:48 PM (9 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

6c8ba30f3cbc3b424a708defb57649b060a4b243843b28b90e7bb33ae285dcdd56c7dc85a67490f8

Parents:

2e553acee0b24bae7b2fe1cb119ef17007180257c5c7aa0443a28ee851d552fdd34d96d06af91ae1

Message:

Merge pull request #439 from steenpass/parallel_sw

new parallel.lib

File:

• Tst/Short/parallel_s.tst (modified) (1 diff)

Tst/Short/parallel_s.tst

@@ -3 +3 @@
 
 LIB "parallel.lib";
-LIB "primdec.lib";
 
-ring r = 0, (x,y,z), lp;
-ideal i = z8+z6+4z5+4z3+4z2+4, y-z2;
-ideal j = 3x3y+x3+xy3+y2z2, 2x3z-xy-xz3-y4-z2, 2x2yz-2xy2+xz2-y4;
-list commands = list("std", "primdecGTZ", "primdecSY",
-                     "std", "primdecGTZ", "primdecSY");
-list args = list(list(i), list(i), list(i),
-                 list(j), list(j), list(j));
-parallelWaitN(commands, args, 3);
+ring R1 = 0, (x,y,z), lp;
+ideal I = 3x3y+x3+xy3+y2z2, 2x3z-xy-xz3-y4-z2, 2x2yz-2xy2+xz2-y4;
+ideal J = x10+x9y2, x2y7-y8;
+list commands = list("std", "std");
+list arguments = list(list(I), list(J));
+parallelWaitN(commands, arguments, 1);
+parallelWaitFirst(commands, arguments);
 
-commands = list("primdecGTZ", "primdecSY");
-args = list(list(i), list(i));
-//parallelWaitFirst(commands, args); // not reproducable!
+ring R2 = 0, (x,y,z), dp;
+ideal I1 = z8+z6+4z5+4z3+4z2+4, -z2+y;
+ideal I2 = x9y2+x10, x2y7-y8;
+ideal I3 = x3-2xy, x2y-2y2+x;
+string command = "std";
+list arguments = list(list(I1), list(I2), list(I3));
+parallelWaitAll(command, arguments);
 
-ring s = 0, (x,y,z), dp;
-ideal i1 = z8+z6+4z5+4z3+4z2+4, y-z2;
-ideal i2 = x10+x9y2, y8-x2y7;
-ideal i3 = x3-2xy, x2y-2y2+x;
-string command = "std";
-list args = list(list(i1), list(i2), list(i3));
-parallelWaitAll(command, args);
+ring R3 = 0, (x,y,z), dp;
+ideal I = x, y, z;
+intvec v = 0:3;
+list l = list(I, v);
+module m1 = x*gen(1);
+module m2;
+command = "size";
+list arguments1 = list(list(I), list(v), list(l), list(m1));
+list arguments2 = list(list(I), list(v), list(l), list(m2));
+parallelTestAND(command, arguments1);
+parallelTestAND(command, arguments2);
+
+ring R4 = 0, (x,y,z), dp;
+ideal I;
+string s;
+list l;
+module m1 = x*gen(1);
+module m2;
+command = "size";
+list arguments1 = list(list(I), list(s), list(l), list(m1));
+list arguments2 = list(list(I), list(s), list(l), list(m2));
+parallelTestOR(command, arguments1);
+parallelTestOR(command, arguments2);
 
 tst_status(1);$