MathGroup Archive 1995

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

Search the Archive

Re: Mathematica 2.2.3 under Win95

  • To: mathgroup at smc.vnet.net
  • Subject: [mg2305] Re: Mathematica 2.2.3 under Win95
  • From: pmiddents at kendaco.telebyte.com
  • Date: Mon, 23 Oct 1995 12:43:09 -0400
  • Organization: Telebyte North West Silverdale, Wa

>   Marcelo de Almeida Bueno - pos <bueno at ifi.unicamp.br> writes:
>  Dear MathGroupers,
>  
>        I have recently sent to Karl the results of my benchmarks running
>  Mathematica 2.2.3 under Windows for Workgroups (WFW) 3.11. Now, I run the
>  same benchtests with Mathematica 2.2.3 under Windows 95 (W95). I report
>  below the two results, and ask someone to explain me how can WFW 3.11 be
>  faster than W95?
>  
>  *************************************
>        Math 2.2.3 under WFW 3.11:
>  *************************************
>  
>  Timing[N[Sin[1/2],2500]][[1]]
>  7.25 Second
>  
>  Timing[N[Pi,10001]][[1]]
>  10.82 Second
>  
>  Timing[10001!][[1]]
>  7.58 Second
>  
>  First[Timing[Eigenvalues[Table[Random[],{200},{200}]]]]
>  22.3 Second
>  
>  f[x_]:= 4x-4x^2;
>  Timing[ Nest[f,0.6,5000]][[1]]
>  6.538 Second
>  
>  f[x_]:= BesselJ[0,x];
>  Timing[Nest[f,0.6,2500]][[1]]
>  13.786 Second
>  
>  kdv[q_]:=  D[q,t]  - 1/4  D[q,{x,3}] -3/2 q D[q,x]
>  q3:= (-5*E^((11*t)/8) - 45*E^(2*x) - 18*E^((11*t)/16 + x) +
>       162*E^((3*t)/2 + 2*x) - 188*E^((13*t)/16 + 3*x) +
>       162*E^(t/8 + 4*x) - 45*E^((13*t)/8 + 4*x) -
>       18*E^((15*t)/16 + 5*x) - 5*E^(t/4 + 6*x))/
>      (8*(-E^((11*t)/16) + 3*E^x - 3*E^((13*t)/16 + 2*x) +
>         E^(t/8 + 3*x))^2)
>  Timing[Simplify[kdv[q3]]]
>  {52.508 Second, 0}
>  
>  ********************************* 
>        Math 2.2.3 under W95:
>  *********************************
>  
>  Timing[N[Sin[1/2],2500]][[1]]
>  15.029 Second
>  
>  Timing[N[Pi,10001]][[1]]
>  27.115 Second
>  
>  Timing[10001!][[1]]
>  21.048 Second
>  
>  First[Timing[Eigenvalues[Table[Random[],{200},{200}]]]]
>  47.212 Second
>  
>  f[x_]:= 4x-4x^2;
>  Timing[ Nest[f,0.6,5000]][[1]]
>  13.108 Second
>  
>  f[x_]:= BesselJ[0,x];
>  Timing[Nest[f,0.6,2500]][[1]]
>  29.512 Second
>  
>  kdv[q_]:=  D[q,t]  - 1/4  D[q,{x,3}] -3/2 q D[q,x]
>  q3:= (-5*E^((11*t)/8) - 45*E^(2*x) - 18*E^((11*t)/16 + x) +
>       162*E^((3*t)/2 + 2*x) - 188*E^((13*t)/16 + 3*x) +
>       162*E^(t/8 + 4*x) - 45*E^((13*t)/8 + 4*x) -
>       18*E^((15*t)/16 + 5*x) - 5*E^(t/4 + 6*x))/
>      (8*(-E^((11*t)/16) + 3*E^x - 3*E^((13*t)/16 + 2*x) +
>         E^(t/8 + 3*x))^2)
>  Timing[Simplify[kdv[q3]]]
>  {110.971 Second, 0}
>  
>  
>           The two benchtests run on a motherboard SOYO with 256k
>  cache, Intel's DX4 100 MHz and 40 M RAM.
>           A big hug,
>  
>       _/_/  _/_/_/_/_/_/_/_/_/   | Department of Cosmic Rays and Chronology
>      _/ _/_/ _/      _/      _/  | Institute of Physics "Gleb Wataghin"
>     _/  _/  _/_/_/_/_/_/_/_/     | State University of Campinas, UNICAMP
>    _/      _/      _/      _/    | 13083-970 Campinas, Sao Paulo, Brazil
>   _/      _/      _/      _/     | e-mail:    bueno at ifi.unicamp.br
>  _/      _/      _/_/_/_/        | home page: http://www.ifi.unicamp.br/~bueno
>                                  | Tel.: (+55) (192) 398112 or 300646
>  Marcelo de Almeida Bueno        | FAX:  (+55) (192) 393127 or 300646
>  
>  
>  
>  
>                                   
>      
>     
>  
>  
>  
>  
>>>>
I noted the same slowdown in performance on a 486 DX2-66 with 16 MB of RAM. Technical support at WRI 
recomended running a program on the Mathlink during all Mathematica sessions. I found  a small demo program in 
the Samples direcrtory of the Mathlink developers program called addtwo.exe. Shifting this to the WNMath22 
directory and adding it to the  init.m file starts the program each time the MMA kernal is launched. An icon for this 
program will appear on the taskbar. Performance has returned to almost Win 3.1 levels. WRI says this problem will 
be solved inthe next major revision.


  • Prev by Date: Re: TCP/IP for Win95
  • Next by Date: Re: TeX labels in graphs
  • Previous by thread: Mathematica 2.2.3 under Win95
  • Next by thread: Comparison of MMA on Various Machines