Changeset 8d2416 in git for Tst/Short/factorizep_s.tst

Timestamp:

May 10, 2012, 4:43:36 PM (11 years ago)

Author:

Martin Lee <martinlee84@…>

Branches:

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

Children:

6b6c822fcfbbabb80e5ab1e0487f5de527e8785a

Parents:

6f0279ecd605db3872247f2211d8efd1ac65d42a

git-author:

Martin Lee <martinlee84@web.de>2012-05-10 16:43:36+02:00

git-committer:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-05-10 18:23:39+02:00

Message:

chg: added polys from #424,#425 and sage_trac #12928 to test

File:

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

Tst/Short/factorizep_s.tst

@@ -342 +342 @@
 }
 
+ring r = 2,(x,y),dp;
+poly f=x^6 + y^5 + x^5 + y^4;
+poly g=x^6 + y^6 + x^5 + x^3 + x + 1;
+poly h=x^6 + x*y^5 + y^5 + y^4 + x*y^2 + y^3 + 1;
+list l1, l2, l3;
+for (int i= 1; i < 33002; i= i+33)
+{
+  system ("--random", i);
+  l1= factorize (f);
+  l2= factorize (g);
+  l3= factorize (h);
+  l1;
+  l2;
+  l3;
+  if (size (l1[1]) != 2)
+  {
+    l1;
+    break;
+  }
+  if (size (l2[1]) != 3)
+  {
+    l2;
+    break;
+  }
+  if (size (l3[1]) != 3)
+  {
+    l3;
+    break;
+  }
+}
+
 tst_status(1);$