MathGroup Archive 1997

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Re: GroebnerBasis

  • To: mathgroup at smc.vnet.net
  • Subject: [mg5774] Re: [mg5762] Re: GroebnerBasis
  • From: "Benjamin Tubb" <brtubb at cybertron.com>
  • Date: Sat, 18 Jan 1997 14:58:30 -0500
  • Sender: owner-wri-mathgroup at wolfram.com

On Tuesday, January 14, 1997 9:42 AM, you wrote:
 
>I ran all these on the same machine, a pentium pro (200mz).

You might be interested to compare (as a benchmark) your timing results
with mine on a non-Pro 200MHz Pentium, and if RAM affected the results,
I'm using 64MB RAM, with a 512K cache.
 
> In[2]:= GroebnerBasis[{x^5+y^4+z^3-1, x^3+y^2+z^2-1},{x,y,z}];//Timing
> Out[2]= {0.12 Second, Null}

My results was {2.69 Second, Null}.

> In[3]:= $Version
> Out[3]= Linux 3.0 (October 4, 1996)            

In case the OS is significantly affecting the results (and apparently it
is), mine is (actually running Win95):

Microsoft Windows 3.0 (October 6, 1996)

> In[6]:= GroebnerBasis[{8*x^2
> -2*x*y-6*x*z+3*x+3*y^2-7*y*z+10*y+10*z^2-8*z-4,
>         10*x^2-2*x*y+6*x*z-6*x+9*y^2-y*z-4*y-2*z^2+5*z-9,
>         5*x^2+8*x*y+4*x*z+8*x+9*y^2-6*y*z+2*y-z^2-7*z+5}, {x,y,z}]; //
> Timing
> Out[6]= {0.1 Second, Null}

My result was {1.1 Second,Null}.

> In[8]:= GroebnerBasis[{x^31 - x^6 - x - y, x^8 - z, x^10 - t},
> {x,y,z,t}]; // Timing
> Out[8]= {0.32 Second, Null}

My result was {3.13,Null}.

> In[9]:= GroebnerBasis[{45*p+35*s-165*b-36, 35*p+40*z+25*t-27*s,
>     15*w+25*p*s+30*z-18*t-165*b^2, -9*w+15*p*t+20*z*s,
>   w*p+2*z*t-11*b^3, 99*w-11*s*b+3*b^2}, {b,t,s,w,p,z}]; // Timing
> Out[9]= {8.05 Second, Null}
> 

My result was {77.77 Second,Null}!!!

I knew I should have "opted" for the Pentium Pro instead ... <g>.

Benjamin R. Tubb
brtubb at cybertron.com
http://www.cybertron.com/~brtubb




  • Prev by Date: Re: inert wrapping function
  • Next by Date: Plots with mathematica
  • Previous by thread: Re: GroebnerBasis
  • Next by thread: combining lists