Changeset b9a0c3 in git for Singular/extra.cc

Timestamp:

Jun 11, 2002, 4:57:06 PM (22 years ago)

Author:

Viktor Levandovskyy <levandov@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

ad678c7812ca3b2d11be0f27aa9d9a921ef76c32

Parents:

ab71396ec87ab065e8cea8638cc269c0ae28eb19

Message:

plural c_ij==0 check added


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

File:

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

Singular/extra.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR      *
 *****************************************/
-/* $Id: extra.cc,v 1.187 2002-06-06 16:02:09 levandov Exp $ */
+/* $Id: extra.cc,v 1.188 2002-06-11 14:57:06 levandov Exp $ */
 /*
 * ABSTRACT: general interface to internals of Singular ("system" command)
@@ -1466 +1466 @@
         for(j=i+1;j<=currRing->N;j++)
         {
+          if (MATELEM(currRing->nc->C,i,j)==NULL)
+          {
+            Werror("Incorrect input : matrix of coefficients contains zeros in the upper triangle!");
+            return TRUE;
+          }
           if (!nEqual(pGetCoeff(pN),pGetCoeff(MATELEM(currRing->nc->C,i,j)))) IsSkewConstant=0; 
           if (MATELEM(currRing->nc->D,i,j)==NULL) /* quasicommutative case */