Changeset b43de70 in git

Timestamp:

Jul 5, 2007, 11:40:41 AM (16 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')

Children:

3e0a7b701f69415fa222b6ba126e090b85ed6ccc

Parents:

3fe88f9ced305a990206937457913848f1f57c71

Message:

*hannes: M(..) test


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

File:

• kernel/ring.cc (modified) (2 diffs)

kernel/ring.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ring.cc,v 1.62 2007-05-24 14:19:04 Singular Exp $ */
+/* $Id: ring.cc,v 1.63 2007-07-05 09:40:41 Singular Exp $ */
 
 /*
@@ -194 +194 @@
   int i=0,j,typ=1;
   int sz = (int)sqrt((double)(order->length()-2));
-
+  if ((sz*sz)!=(order->length()-2))
+  {
+    WerrorS("Matrix order is not a square matrix");
+    typ=0;
+  }
   while ((i<sz) && (typ==1))
   {