Changeset 18dd47 in git for Singular/LIB/general.lib

Timestamp:

Aug 12, 1997, 4:01:11 PM (26 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

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

Children:

573ae7acc2dadf68863ca5ee07211c1e9a07b3fb

Parents:

9e76269b6654f6e38d3546d04b318c6693f2f4d9

Message:

* hannes: changed int / into div in
          HNPuiseux.lib finvar.lib general.lib homolog.lib matrix.lib
          poly.lib prim_dec.lib primdec.lib random.lib


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

File:

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

Singular/LIB/general.lib

@@ -1 @@
-// $Id: general.lib,v 1.3 1997-07-10 14:02:30 Singular Exp $
+// $Id: general.lib,v 1.4 1997-08-12 14:01:07 Singular Exp $
 //system("random",787422842);
 //(GMG, last modified 22.06.96)
@@ -273 +273 @@
       {
          s    = e[m]+u[m+1];
-         u[m] = s/(m+1);
+         u[m] = s div (m+1);
          e[m] = s%(m+1);
       }
@@ -303 +303 @@
    intvec r,p,B,Prelim;
    string result,prelim;
-   N = (10*n)/3 + 2;
+   N = (10*n) div 3 + 2;
    p[N+1]=0; p=p+2; r=p;
    for( i=1; i<=N+1; i=i+1 ) { B[i]=2*i-1; }
@@ -317 +317 @@
       {
          r[m] = e%B[m];
-         q    = e/B[m];
+         q    = e div B[m];
          e    = q*(m-1)+p[m-1];
       }
       r[1] = e%10;
-      q    = e/10;
+      q    = e div 10;
       if( q!=10 and q!=9 )
       {
@@ -335 +335 @@
       if( q==10 )
       {
-         Prelim = (Prelim+1)-((Prelim+1)/10)*10;
+         Prelim = (Prelim+1)-((Prelim+1) div 10)*10;
          for( m=size(Prelim); m>0; m=m-1)
          {