p9.mw

Examples of Animations 

(9) 

 

coordinate systems :  

prolatespheroidal, rectangular and rosecylindrical 

 

> with(plots); -1
 

 

prolatespheroidal 

 

> animate3d(`*`(u, `*`(cos(`*`(v, `*`(t))))), u = 1 .. 3, v = 1 .. 4, t = 2 .. 4, coords = prolatespheroidal, frames = 50)
 

Plot
 

 

rectangular 

 

> animate3d(`*`(cos(sin(`*`(u, `*`(`^`(v, 2))))), `*`(sin(cos(`*`(u, `*`(`^`(t, 2))))))), u = 1 .. 3, v = 1 .. 4, t = 2 .. 4, coords = rectangular, frames = 50)
animate3d(`*`(cos(sin(`*`(u, `*`(`^`(v, 2))))), `*`(sin(cos(`*`(u, `*`(`^`(t, 2))))))), u = 1 .. 3, v = 1 .. 4, t = 2 .. 4, coords = rectangular, frames = 50)
 

Plot
 

 

rosecylindrical 

 

> animate3d(arcsin(`+`(`*`(u, `*`(v)), t)), u = `+`(`-`(Pi)) .. Pi, v = -1 .. 1, t = `+`(`-`(Pi)) .. Pi, coords = rosecylindrical, frames = 50)
 

Plot