p1.mw

Examples of Animations 

(1) 

 

coordinate systems :  

cartesian, bipolarcylindrical and bispherical 

 

> with(plots); -1
 

 

cartesian 

 

> animate3d(`*`(x, `*`(cos(`*`(y, `*`(t))))), x = 1 .. 3, y = 1 .. 4, t = 2 .. 4, frames = 50)
 

Plot
 

 

bipolarcylindrical 

 

> animate3d(`*`(cos(`*`(u, `*`(v, `*`(t)))), `*`(sin(`*`(u, `*`(v, `*`(t)))))), u = 1 .. 3, v = 1 .. 9, t = 2 .. 4, coords = bipolarcylindrical, frames = 70)
animate3d(`*`(cos(`*`(u, `*`(v, `*`(t)))), `*`(sin(`*`(u, `*`(v, `*`(t)))))), u = 1 .. 3, v = 1 .. 9, t = 2 .. 4, coords = bipolarcylindrical, frames = 70)
 

Plot
 

 

bispherical 

 

> animate3d(`^`(`*`(v, `*`(t)), sin(`*`(u, `*`(v, `*`(t))))), u = `+`(`*`(`/`(1, 2), `*`(Pi))) .. Pi, v = `+`(`-`(`*`(`/`(1, 2), `*`(Pi)))) .. `+`(`*`(2, `*`(Pi))), t = `+`(`*`(`/`(1, 8), `*`(Pi))) .. P...
 

Plot