p11.mw

Examples of Animations 

(11) 

 

coordinate systems :  

tangentsphere and toroidal 

 

> with(plots); -1
 

 

tangentsphere 

 

> animate3d(`/`(`*`(sin(`*`(u, `*`(v, `*`(t)))), `*`(cos(`*`(u, `*`(v, `*`(t)))))), `*`(u, `*`(v, `*`(t)))), u = 1 .. `+`(`*`(`/`(1, 2), `*`(Pi))), v = 1 .. 4, t = 1 .. Pi, coords = tangentsphere, frame...
animate3d(`/`(`*`(sin(`*`(u, `*`(v, `*`(t)))), `*`(cos(`*`(u, `*`(v, `*`(t)))))), `*`(u, `*`(v, `*`(t)))), u = 1 .. `+`(`*`(`/`(1, 2), `*`(Pi))), v = 1 .. 4, t = 1 .. Pi, coords = tangentsphere, frame...
 

Plot
 

 

toroidal 

 

> animate3d(`/`(`*`(sin(`*`(`^`(u, 2))), `*`(cos(v))), `*`(sin(t))), u = 1 .. 4, v = -1 .. 4, t = 1 .. 4, coords = toroidal, frames = 70)
 

Plot