Changeset 3e23be in git

Timestamp:

Mar 16, 1999, 3:18:51 PM (25 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

50a84cd1dc10e490985c797f77bee999b63f0986

Parents:

bc7e5b542d1eb33867373d8931a4db749c0780ab

Message:

*hannes: added () for parametric rings


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

File:

• Singular/LIB/primdec.lib (modified) (3 diffs)

Singular/LIB/primdec.lib

@@ -1 @@
-// $Id: primdec.lib,v 1.30 1999-03-15 12:18:28 Singular Exp $
+// $Id: primdec.lib,v 1.31 1999-03-16 14:18:51 Singular Exp $
 ////////////////////////////////////////////////////////////////////////////////
 // primdec.lib                                                                //
@@ -11 +11 @@
 ////////////////////////////////////////////////////////////////////////////////
 
-version="$Id: primdec.lib,v 1.30 1999-03-15 12:18:28 Singular Exp $";
+version="$Id: primdec.lib,v 1.31 1999-03-16 14:18:51 Singular Exp $";
 info="
 LIBRARY: primdec.lib: PROCEDURE FOR PRIMARY DECOMPOSITION
@@ -3151 +3151 @@
   def oldring=basering;
   string n=system("neworder",PS);
-  execute "ring r="+charstr(oldring)+",("+n+"),dp;";
+  execute "ring r=("+charstr(oldring)+"),("+n+"),dp;";
   ideal PS=imap(oldring,PS);
   matrix m=char_series(PS);  // We compute an irreducible