Changeset 7f1e81 in git for Singular/LIB/solve.lib

Timestamp:

Jan 6, 2009, 3:15:21 PM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

0ec631113cffb5514bd57d9346933d09fcbbc548

Parents:

577c14692ef00b8a6d8470158473aeb6af6b08b3

Message:

*hannes: force (univar.) results to type number


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

File:

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

Singular/LIB/solve.lib

@@ -1 +1 @@
 ///////////////////////////////////////////////////////////////////////////////
-version="$Id: solve.lib,v 1.36 2007-05-07 17:00:36 Singular Exp $";
+version="$Id: solve.lib,v 1.37 2009-01-06 14:15:21 Singular Exp $";
 category="Symbolic-numerical solving";
 info="
@@ -773 +773 @@
         execute("ring rinC =(complex,"+string(outprec)+"),("+varstr(basering)+"),lp;");
         list SOL;
-        for (ii=1; ii<=size(L); ii++ ) { execute("SOL[ii]="+L[ii]+";"); }
+        for (ii=1; ii<=size(L); ii++ ) { execute("SOL[ii]=number("+L[ii]+");"); }
         export SOL;
         if (nodisp==0) { print(SOL); }