Changeset 4385f6 in git for Singular/LIB/control.lib

Timestamp:

Jun 21, 2007, 12:31:00 AM (16 years ago)

Author:

Viktor Levandovskyy <levandov@…>

Branches:

(u'spielwiese', 'ec94ef7a30b928574c0c3daf41f6804dff5f6b69')

Children:

1090300c04887cf28b79dd1e56d7a6fcb7e9fca9

Parents:

2301b774f75710335fd07e81ad4de9a8128e462e

Message:

*levandov: minor fix


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

File:

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

Singular/LIB/control.lib

@@ -1 @@
-version="$Id: control.lib,v 1.37 2007-01-23 15:03:29 Singular Exp $";
+version="$Id: control.lib,v 1.38 2007-06-20 22:31:00 levandov Exp $";
 category="System and Control Theory";
 info="
@@ -841 +841 @@
   for (i=1; i<=s1; i++)
   {
-    if (normalize(Den[i]) !=1)
+    Den[i] = normalize(Den[i]);
+    if ( Den[i] !=1)
     {
       F= F, factorize(Den[i],1);