Changeset 53d601 in git for Singular/LIB/ncalg.lib

Timestamp:

Apr 15, 2009, 10:17:58 AM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '8d54773d6c9e2f1d2593a28bc68b7eeab54ed529')

Children:

52328628095f0818a3c034679299b8636883a90f

Parents:

cbdc04ee89f2f33ca319928387757b771f459803

Message:

*hannes: fixed Weyl call


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

File:

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

Singular/LIB/ncalg.lib

@@ -1 +1 @@
 ///////////////////////////////////////////////////////////////////////////////
-version="$Id: ncalg.lib,v 1.32 2009-04-09 12:04:42 seelisch Exp $";
+version="$Id: ncalg.lib,v 1.33 2009-04-15 08:17:58 Singular Exp $";
 category="Noncommutative";
 info="
@@ -616 +616 @@
   string sord2 = "(a(0:" + string(n) + ")," + sord + ")";
   execute("ring GR = (0,b(1..@d)),(x(1..n),d(1..n)),"+sord2+";");
-  Weyl();
+  def W=Weyl(); setring W;
   int i,j;
   poly p;
@@ -627 +627 @@
       p = p+ A[i,j]*x(j)*d(j);
     }
-  I = I, p;
+    I = I, p;
   }
   I = I, imap(r1,I0);