Changeset 40e810d in git

Timestamp:

Jul 22, 2010, 10:43:40 PM (13 years ago)

Author:

Viktor Levandovskyy <levandov@…>

Branches:

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

Children:

587f72ea2194532a90e0b34af68040f12a9fbfd5

Parents:

6a07ebc345b4d288003fb8b5928acd85f2815aca

Message:

*levandov: keywords added, minor cleanup

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

File:

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

Singular/LIB/jacobson.lib

@@ -40 +40 @@
 divideUnits(L);     create ones out of units in the output of smith or jacobson
 
-
 SEE ALSO: control_lib
+
+KEYWORDS: Jacobson form; Jacobson normal form; Smith form; Smith normal form; matrix diagonalization;
+
 ";
 
@@ -1137 +1139 @@
 
 // things blow up
-matrix m[3][4] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+1)^3, (x+s)^2, x*s;
+matrix m[2][3] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+1)^3;
+matrix m[2][3] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+s)^2; // variation
+matrix m[2][4] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+1)^3, (x+s)^2, x*s; // bug!
+matrix m[3][4] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+1)^3, (x+s)^2, x*s; // here the last row contains zeros
 
 // this one is quite nasty and time consumig