Comparison of Maple on Various Machines

From: karl@faepds01.tu-graz.ac.at (karl unterkofler)
 
  readlib(history):
  history():

 
  timing(evalf(Pi,10001)):

# HP 9000/735:                                                62.90 seconds 
# HP 9000/730:                                                94.00 seconds 
# Decstation 3100:                                           122.81 seconds
# HP 9000/715/50:                                            127.48 seconds 
# Quadra 700/20MB:                                           147.63 seconds                 

 timing(5000!):
 
# HP 9000/735:                                                20.56 seconds    
# HP 9000/730:                                                30.38 seconds
# Decstation 3100:                                            37.26 seconds
# HP 9000/715/50:                                             38.43 seconds 
# Quadra 700/20MB:                                            42.95 seconds    

 with(linalg,eigenvals,randmatrix):
  

 timing(eigenvals(randmatrix(15,15))):
 
# HP 9000/735:                                                11.91 seconds    
# HP 9000/730:                                                18.81 seconds
# HP 9000/715/50:                                             28.23 seconds 
# Decstation 3100:                                            42.06 seconds
# Quadra 700/20MB:                                            61.30 seconds


 f:=x-> 4*x- 4* x^2:
 

 timing((f@@5000)(0.6)):
 

# HP 9000/735:                                                3.18 seconds    
# HP 9000/730:                                                5.03 seconds
# HP 9000/715/50:                                             7.91 seconds 
# Decstation 3100:                                           11.30 seconds
# Quadra 700/20MB:                                           18.03 seconds


 g:=x->BesselJ(0,x):

 

 timing((g@@2500)(0.6)):

 

# HP 9000/735:                                                2.03 seconds    
# HP 9000/730:                                                3.35 seconds
# HP 9000/715/50:                                             4.73 seconds 
# Decstation 3100:                                            8.46 seconds
# Quadra 700/20MB:                                           14.50 seconds


 kdv:= q-> diff(q,t)  - 1/4 * diff(q,x$3) -3/2 *q* diff(q,x):

 
 q3:= ( -5*exp( 11* t/8) -45 * exp( 2*x) - 18 * exp( 11 *t/16 +x) +
        162* exp( 3 *t/2 + 2 * x) - 188*exp( 13 *t/16 + 3 *x)+
        162* exp( t/8 + 4 *x)- 45* exp( 13* t/8 + 4 * x)-
        18* exp( 15*t/16 + 5 * x) - 5*exp(t/4 + 6 *x)  )/
         ( 8*  (- exp( 11*t/16) + 3*exp(x)- 3* exp(13 *t/16+ 2* x)+
           exp( t/8+ 3*x))^2):

  

 kdv(q3):
 

 timing(simplify("));
 
# HP 9000/735:                                                2.58 seconds  
# HP 9000/730:                                                4.30 seconds
# HP 9000/715/50:                                             6.48 seconds 
# Decstation 3100:                                            9.63 seconds
# Quadra 700/20MB:                                           17.93 seconds
  
  timing(seq(nextprime(i),i=1..3000)):
 
# HP 9000/735:                                                1.90 seconds  
# HP 9000/730:                                                3.25 seconds
# HP 9000/715/50:                                             4.70 seconds 
# Decstation 3100:                                            6.70 seconds
# Quadra700/20MB:                                            15.23 seconds

 timing(integrate(1/( 1+x ^15),x)):
 
# HP 9000/735:                                                3.28 seconds  
# HP 9000/730:                                                5.00 seconds
# HP 9000/715/50:                                             6.46 seconds 
# Decstation 3100:                                           10.68 seconds
# Quadra 700/20MB:                                           22.61 seconds