Changeset 966787 in git

Timestamp:

Feb 22, 2008, 3:12:29 PM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '91fdef05f09f54b8d58d92a472e9c4a43aa4656f')

Children:

b154b306ecfd2d50ded89d43e370494a5396b61f

Parents:

6f801b4e767f113dae2ed6a6e8b95d7227f2c3db

Message:

hannes: binomial -> bigint


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

Location:

Singular/LIB

Files:

• ncalg.lib (modified) (2 diffs)
• realrad.lib (modified) (2 diffs)

Singular/LIB/ncalg.lib

@@ -1 +1 @@
 ///////////////////////////////////////////////////////////////////////////////
-version="$Id: ncalg.lib,v 1.26 2007-10-31 17:23:43 Singular Exp $";
+version="$Id: ncalg.lib,v 1.27 2008-02-22 14:12:23 Singular Exp $";
 category="Noncommutative";
 info="
@@ -409 +409 @@
   for(j=0; j<=N; j++)
   {
-    k1 = binomial(n-j,j,0);
+    k1 = binomial(n-j,j);
     k1=k1/(n-j);
     k1=k1*((-1)^j);

Singular/LIB/realrad.lib

@@ -1 +1 @@
 ///////////////////////////////////////////////////////////////////////////////
-version="$Id: realrad.lib,v 1.5 2007-07-26 12:35:23 spang Exp $";
+version="$Id: realrad.lib,v 1.6 2008-02-22 14:12:29 Singular Exp $";
 category="real algebra";
 info="
@@ -729 +729 @@
  for (i=1;i<=s;i++)
  {
-   bern[i]=number(c[s+1-i,1])/binomial(s-1,i-1,0);
+   bern[i]=number(c[s+1-i,1])/binomial(s-1,i-1);
  }
  bernsteincoeffs=bern,list(-zweihochN,zweihochN);