Changeset 335380 in git for Singular/extra.cc

Timestamp:

Feb 22, 2001, 8:12:57 PM (23 years ago)

Author:

Viktor Levandovskyy <levandov@…>

Branches:

(u'spielwiese', '6e5adcba05493683b94648c659a729c189812c77')

Children:

35679e8ba2e1e01d3aeb88d71d2cf46e5413eb4a

Parents:

08911644113263ab362bcd3330c19577a763878c

Message:

plural corrections


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

File:

• Singular/extra.cc (modified) (3 diffs)

Singular/extra.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR      *
 *****************************************/
-/* $Id: extra.cc,v 1.161 2001-02-21 10:08:11 Singular Exp $ */
+/* $Id: extra.cc,v 1.162 2001-02-22 19:12:57 levandov Exp $ */
 /*
 * ABSTRACT: general interface to internals of Singular ("system" command)
@@ -1214 +1214 @@
           for(j=i+1;j<=nv;j++)
           { 
-            currRing->nc->MTsize[UPMATELEM(i,j)]=DefMTsize; /* default sizes */
-            currRing->nc->MT[UPMATELEM(i,j)]=mpNew(DefMTsize,DefMTsize);
+            currRing->nc->MTsize[UPMATELEM(i,j,curring->N)]=DefMTsize; /* default sizes */
+            currRing->nc->MT[UPMATELEM(i,j,curring->N)]=mpNew(DefMTsize,DefMTsize);
             p=pOne();
             pSetCoeff(p,nCopy(pGetCoeff(MATELEM(currRing->nc->C,i,j))));
@@ -1222 +1222 @@
             pSetm(p);
             p=pAdd(p,pCopy(MATELEM(currRing->nc->D,i,j)));
-            MATELEM(currRing->nc->MT[UPMATELEM(i,j)],1,1)=p;
+            MATELEM(currRing->nc->MT[UPMATELEM(i,j,curring->N)],1,1)=p;
             /* set MT[i,j,1,1] to c_i_j*x_i*x_j + D_i_j */
           }