Applications, Examples and Libraries

Share your work here

07_eng.mw

A collection from 20 problems for students.
12 variants for each problem.
Adequate solution.
Programs are built into the buttons.
Kit has been used successfully for 12 years.

HTML & full archive

A collection from 43 problems for students. 12 variants for each problem. Adequate solution. Programs are built into the buttons. Kit has been used successfully for 12 years.

01.mw  - index

01.zip - tasks

Full Collection of problems...

 

   There are a lot of Maple applications in calculus,...

SHA-0.3.zip includes a Maple archive and help data base that implement the SHA algorithm (SHA-1, SHA-224, SHA-256, SHA-384, and SHA-512).  The implementation is interpreted Maple, so will be considerably slower than a compiled routine, but these should be fast enough for likely uses in Maple.  For example

CodeTools:-Usage(SHA("The quick brown fox jumps over the lazy dog", 512));
memory used=502.00KiB,...

In 2010-2011, I persuaded tens of thousands of Russian and Ukrainian students and students in that Maple - a very useful thing.
Testimonials - the number of visits and thanks.
So I decided to resurrect some of my old sites.
Not just for history!

The first: Maple PoverTools.

http://powertool.narod.ru/

The complexplot3d command can color by using (complex) argument for the hue, and compute height z by magnitude. So, when rotated to view the x-y plane straight on, it can provide a nice coloring of the argument of whatever complex-valued expression is being plotted.

Another way to obtain a similar plot is to use densityplot (with appropriate values for its scaletorange option) and apply argument to the expression or function being plotted. For some kinds of complex-valued...

The June edition of the IBM Ponder This website poses the following puzzle:

Assume that cars have a length of two units and that they are parked along the circumference of a circle whose length is 100 units, which is marked as 100 segments, each one exactly one unit long.

A car can park on any two adjacent free segments (i.e., it does not need any extra maneuvering space).

The problem

Back in 1996 I was working for the Symbolic Computation Group at the University of Waterloo, developing algorithms and code...

11_1_eng.mw This Maple worksheet Ukrainian students have downloaded 84.581 times a week. ("ZNO")

I would like to pay  attention  to the PhD thesis by John Baber in an actual field of complex analysis done with Maple: http://arxiv.org/PS_cache/arxiv/pdf/1106/1106.4737v1.pdf . It should be noticed that the usage of Maple is an essential tool of this work (for example, see p. 28, 43, and around), not a fashion trend.

Sleep Sort is a hilarious (to me anyway) joke dressed up as a sorting algorithm.

Here it is in non-obfuscated (if somewhat garbagey) Maple code (need version 15 since it uses ?Threads,Sleep )

SleepSort := proc(L::list(posint),$)
local Lout, p, i;
    Lout := NULL;

    p := proc(n::posint,$)
        Threads:-Sleep(n);
        Lout := Lout, n;
    end proc:

    Threads:-Wait( seq( Threads:-Create( p(i...

Answering to that question, I posted several procedures finding minimal polynomials for the elements of finite fields. The best one was the following,

alias(a=RootOf(T^100+T^97+T^96+T^93+T^91+T^89+T^87+T^86+T^82+T^81+T^71+T^70+T^67+T^61+
T^60+T^57+T^54+T^53+T^52+T^49+T^48+T^45+T^44+T^42+T^39+T^36+T^33+T^32+T^31+T^29+T^28+T^27+
T^26+T^24+T^23+T^22+T^18+T^17+T^16+T^14+T^13+T^12+T^10+T^8+T^7+T^6+T^3+T+1)):

F:=GF(2,100,op(a)):
z:=F:-input(2):

MinPolyGF:=proc(x,y:=_X)
local A, i;
A:=Matrix(100,...

I recently stumbled upon a hypnotic video of 15 out-of-phase pendulums from a physics experiment at Harvard University.

The...

Following Christopher2222 request, I wrote the following procedures for "exact" cubic Hermite spline interpolation,

p:=proc(x0,p0,m0,x1,p1,m1,x)
local t,d;
d:=x1-x0;
t:=(x-x0)/d;
p0+(d*m0+(3*(p1-p0)-d*(2*m0+m1)+(2*(p0-p1)+d*(m0+m1))*t)*t)*t
end:

pb:=proc(x0,p0,x1,p1,m1,x)
local t,d;
d:=x1-x0;
t:=(x-x0)/d;
p0+(2*(p1-p0)-d*m1+(p0-p1+d*m1)*t)*t
end:

pe:=proc(x0,p0,m0,x1,p1,x...
First 62 63 64 65 66 67 68 Last Page 64 of 77