Changeset c5ff4c in git

Timestamp:

Dec 14, 2006, 6:37:54 PM (17 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

a3468ce67f965285eb7517a429f23055fbe2732b

Parents:

3703444c997bb04b388cb5ed654c3e719223bd29

Message:

*hannes: opt.


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

File:

• Singular/LIB/rootsur.lib (modified) (2 diffs)

Singular/LIB/rootsur.lib

@@ -1 @@
-// $Id: rootsur.lib,v 1.3 2006-07-18 15:48:30 Singular Exp $
+// $Id: rootsur.lib,v 1.4 2006-12-14 17:37:54 Singular Exp $
 // E. Tobis  12.Nov.2004, April 2004
 // last change 5. May 2005 (G.-M. Greuel)
@@ -56 +56 @@
     setring ba;
     poly p1 = imap(rba,p1);
-    ispar = ispar || (size(p-p1)!=0);
+    ispar = (size(p-p1)!=0);
   }
   return (ispar);