Changeset 359b79 in git for Singular/LIB/control.lib

Timestamp:

Oct 7, 2008, 7:55:52 PM (15 years ago)

Author:

Viktor Levandovskyy <levandov@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

0c97d628cec893e481da6229e10b8066c8a40642

Parents:

4f950e90480a2c27ecf206371f3402003926507e

Message:

*levandov: proc smith renamed to oldsmith, it is not mentioned officially in the header anymore


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

File:

• Singular/LIB/control.lib (modified) (6 diffs)

Singular/LIB/control.lib

@@ -1 @@
-version="$Id: control.lib,v 1.38 2007-06-20 22:31:00 levandov Exp $";
+version="$Id: control.lib,v 1.39 2008-10-07 17:55:52 levandov Exp $";
 category="System and Control Theory";
 info="
@@ -22 +22 @@
   leftInverse(R);      a left inverse of R
   rightInverse(R);     a right inverse of R
-  smith(M);            a Smith form of a module M
   colrank(M);          a column rank of M as of matrix
   genericity(M);       analysis of the genericity of parameters
@@ -1140 +1139 @@
 
 //---------------------------------------------------------------
-proc smith( module M )
-"USAGE: smith(M); M a module/matrix
+proc oldsmith( module M )
+"USAGE: oldsmith(M); M a module/matrix
 PURPOSE: computes the Smith normal form of a matrix
 RETURN: a list of length 4 with the following entries:
@@ -1149 +1148 @@
 @*      [4]: a unimodular matrix V,
 such that U*M*V=S. An warning is returned when no Smith form exists.
-NOTE: The Smith form only exists over PIDs (principal ideal domains). Use global ordering for computations!
+NOTE: Older experimental implementation. The Smith form only exists over PIDs (principal ideal domains). Use global ordering for computations!
 "
 {
@@ -1273 +1272 @@
   module M = [x2,x,3x3-4], [2x2-1,4x,5x2], [2x5,3x,4x];
   print(M);
-  list P = smith(M);
+  list P = oldsmith(M);
   print(P[1]);
   matrix N = matrix(M);
@@ -1281 +1280 @@
 // see what happens when the matrix is already in Smith-Form
 //  module M = [x,0,0],[0,x2,0],[0,0,x3];
-//  list L = smith(M);
+//  list L = oldsmith(M);
 // print(L[1]);
 //matrix N=matrix(M);