Changeset 46de44 in git

Timestamp:

Feb 16, 2002, 2:50:19 PM (21 years ago)

Author:

Mathias Schulze <mschulze@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'f875bbaccd0831e36aaed09ff6adeb3eb45aeb94')

Children:

b760e984c47d38e60c36e200c211040230bad496

Parents:

dcff1e1a496e3f2435055ab70975afe35768e727

Message:

*mschulze: ring change in eigenvals not needed


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

File:

• Singular/LIB/linalg.lib (modified) (2 diffs)

Singular/LIB/linalg.lib

@@ -1 +1 @@
 //GMG last modified: 04/25/2000
 //////////////////////////////////////////////////////////////////////////////
-version="$Id: linalg.lib,v 1.23 2002-02-16 10:58:39 mschulze Exp $";
+version="$Id: linalg.lib,v 1.24 2002-02-16 13:50:19 mschulze Exp $";
 category="Linear Algebra";
 info="
@@ -1249 +1249 @@
 "
 {
-  def R=basering;
-  ring P=0,t,dp;
-  map zero=R,0;
-  matrix M=zero(M);
-  list l=system("eigenvalues",M);
-  setring R;
-  map zero=P,0;
-  return(zero(l));
+  return(system("eigenvalues",M));
 }
 example