Changeset 65b78c in git for Tst/Short/slimgb_s.tst

Timestamp:

May 11, 2005, 11:10:40 AM (19 years ago)

Author:

Michael Brickenstein <bricken@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

6b9532ab577ab904fc5d68dc915ac994275cda18

Parents:

227a50aa59e0ec1ed104cc723d0208bc167a2aa4

Message:

*bricken: sort


git-svn-id: file:///usr/local/Singular/svn/trunk@8144 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Tst/Short/slimgb_s.tst (modified) (2 diffs)

Tst/Short/slimgb_s.tst

@@ -1 @@
-// $Id: slimgb_s.tst,v 1.1 2005-05-10 11:45:41 bricken Exp $
+// $Id: slimgb_s.tst,v 1.2 2005-05-11 09:09:21 bricken Exp $
 
 //
@@ -6 +6 @@
 
 LIB "tst.lib";
+
 LIB "poly.lib";
+
 tst_init();
-tst_ignore("CVS: $Id: slimgb_s.tst,v 1.1 2005-05-10 11:45:41 bricken Exp $");
+tst_ignore("CVS: $Id: slimgb_s.tst,v 1.2 2005-05-11 09:09:21 bricken Exp $");
 
 proc char_out(ideal i){
-  return(simplify(lead(i),1));
+  return(sort(simplify(lead(i),1))[1]);
 }
 ring r=0,x(1..5),dp;