Maple Commands  

> Pyth := plot({[0, t, t = -5 .. 0], [5, t, t = -5 .. 0], [t, -5, t = 0 .. 5], [t, 0, t = 0 .. 5], [t, `+`(`-`(`*`(`/`(3, 4), `*`(t)))), t = -`/`(12, 5) .. 0], [t, `*`(`+`(`*`(4, `*`(t))), `/`(1, 3)), t...
Pyth := plot({[0, t, t = -5 .. 0], [5, t, t = -5 .. 0], [t, -5, t = 0 .. 5], [t, 0, t = 0 .. 5], [t, `+`(`-`(`*`(`/`(3, 4), `*`(t)))), t = -`/`(12, 5) .. 0], [t, `*`(`+`(`*`(4, `*`(t))), `/`(1, 3)), t...
Pyth := plot({[0, t, t = -5 .. 0], [5, t, t = -5 .. 0], [t, -5, t = 0 .. 5], [t, 0, t = 0 .. 5], [t, `+`(`-`(`*`(`/`(3, 4), `*`(t)))), t = -`/`(12, 5) .. 0], [t, `*`(`+`(`*`(4, `*`(t))), `/`(1, 3)), t...
Pyth := plot({[0, t, t = -5 .. 0], [5, t, t = -5 .. 0], [t, -5, t = 0 .. 5], [t, 0, t = 0 .. 5], [t, `+`(`-`(`*`(`/`(3, 4), `*`(t)))), t = -`/`(12, 5) .. 0], [t, `*`(`+`(`*`(4, `*`(t))), `/`(1, 3)), t...
 

> with(plots); -1
 

> Sub := plot([`/`(9, 5), t, t = -5 .. `/`(12, 5)], color = blue, linestyle = dash); -1
 

> Anim1 := animate({[`*`(`+`(`*`(`+`(`-`(`*`(`+`(1, `-`(s)), 3))), `/`(1, 5)), `*`(5, `*`(s))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(`*`(`+`(1, `-`(s)), 21), `*`(t)))), t = 0 .. 1], [`+`(`-`(`*`(`/`(12, 5), ...
Anim1 := animate({[`*`(`+`(`*`(`+`(`-`(`*`(`+`(1, `-`(s)), 3))), `/`(1, 5)), `*`(5, `*`(s))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(`*`(`+`(1, `-`(s)), 21), `*`(t)))), t = 0 .. 1], [`+`(`-`(`*`(`/`(12, 5), ...
 

> Anim2 := animate({[0.2e-1, t, t = -5 .. 0], [`+`(`*`(`/`(9, 5), `*`(t))), `*`(`+`(`*`(`/`(12, 5), `+`(1, `-`(s))), `-`(`*`(5, `*`(s)))), `*`(t)), t = 0 .. 1], [`+`(`*`(`/`(9, 5), `*`(t))), `+`(`-`(`*`...
Anim2 := animate({[0.2e-1, t, t = -5 .. 0], [`+`(`*`(`/`(9, 5), `*`(t))), `*`(`+`(`*`(`/`(12, 5), `+`(1, `-`(s))), `-`(`*`(5, `*`(s)))), `*`(t)), t = 0 .. 1], [`+`(`*`(`/`(9, 5), `*`(t))), `+`(`-`(`*`...
 

> Anim3 := animate({[`+`(`*`(5, `*`(cos(theta), `*`(t))), `*`(sin(theta), 0)), `+`(`-`(`*`(5, `*`(sin(theta), `*`(t)))), `*`(cos(theta), 0)), t = 0 .. 1], [`+`(`*`(cos(theta), `*`(`+`(`-`(`*`(`/`(1, 5),...
Anim3 := animate({[`+`(`*`(5, `*`(cos(theta), `*`(t))), `*`(sin(theta), 0)), `+`(`-`(`*`(5, `*`(sin(theta), `*`(t)))), `*`(cos(theta), 0)), t = 0 .. 1], [`+`(`*`(cos(theta), `*`(`+`(`-`(`*`(`/`(1, 5),...
Anim3 := animate({[`+`(`*`(5, `*`(cos(theta), `*`(t))), `*`(sin(theta), 0)), `+`(`-`(`*`(5, `*`(sin(theta), `*`(t)))), `*`(cos(theta), 0)), t = 0 .. 1], [`+`(`*`(cos(theta), `*`(`+`(`-`(`*`(`/`(1, 5),...
Anim3 := animate({[`+`(`*`(5, `*`(cos(theta), `*`(t))), `*`(sin(theta), 0)), `+`(`-`(`*`(5, `*`(sin(theta), `*`(t)))), `*`(cos(theta), 0)), t = 0 .. 1], [`+`(`*`(cos(theta), `*`(`+`(`-`(`*`(`/`(1, 5),...
 

> Labels := textplot([[-.25, -.1,
Labels := textplot([[-.25, -.1,