Changeset 84375a in git for Singular/LIB

Timestamp:

Nov 16, 2006, 3:57:18 PM (17 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'c5facdfddea2addfd91babd8b9019161dea4b695')

Children:

0492330ba16bb9c2a10d1f1f4b74eef79cdfcf18

Parents:

15e59a13102fc0f6e2b64bf14ec91e919073db59

Message:

*hannes: lsum: static


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

File:

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

Singular/LIB/general.lib

@@ -3 +3 @@
 //eric, added absValue 11.04.2002
 ///////////////////////////////////////////////////////////////////////////////
-version="$Id: general.lib,v 1.51 2006-11-16 10:55:58 Singular Exp $";
+version="$Id: general.lib,v 1.52 2006-11-16 14:57:17 Singular Exp $";
 category="General purpose";
 info="
@@ -959 +959 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc lsum (int n, list l)
+static proc lsum (int n, list l)
 { if (n>10)
   { return( lsum(n/2,list(l[1..(n/2)])) + lsum(n-n/2, list(l[(n/2+1)..n])) );