restart: with(plots): with(plottools): mason_c 100m Final head:=disk([0,10], 2,thickness=1, color=tan): eye1:=circle([-1,10], .25, color=black): eye2:=circle([1,10], .25, color=black): mouth:=ellipticArc([0,9], .75, .25, 0..-Pi, color=black): body:=line([0,4.5], [0,8], thickness=10, color=blue): arm1:=line([-2,6], [0,7], thickness=10, color=tan): arm2:=line([2,8], [0,7], thickness=10, color=tan): thigh1:=line([-1,.5], [0,4.5], thickness=10, color=tan): thigh2:=line([1,.5], [0,4.5],thickness=10, color=tan): person1:= display([head, eye1, eye2, mouth, body, arm1, arm2, thigh1, thigh2]): head:=disk([0,10], 2,thickness=1, color=tan): eye1:=circle([-1,10], .25, color=black): eye2:=circle([1,10], .25, color=black): mouth:=ellipticArc([0,9], .75, .25, 0..-Pi, color=black): body:=line([0,4.5], [0,8], thickness=10, color=blue): arm1:=line([-2,8], [0,7], thickness=10, color=tan): arm2:=line([2,6], [0,7], thickness=10, color=tan): personblue2 := display(head, eye1, eye2, mouth, body, arm1, arm2): thigh1:=line([-1,.5], [0,4.5], thickness=10, color=tan): thigh2:=line([1,.5], [0,4.5],thickness=10, color=tan): person2:= display([head, eye1, eye2, mouth, body, rotate(arm1, Pi/6, [0,7]), rotate(arm2, Pi/6, [0,7]), thigh1, thigh2]): person1:=display([head, eye1, eye2, mouth, body, rotate(arm1, Pi/6, [0,7]), rotate(arm2, Pi/6, [0,7]), thigh1, thigh2]): person1:=display([head, eye1, eye2, mouth, body, rotate(thigh2, -Pi/4, [0,4.5]), thigh1, arm1, arm2]): person1:=display([head, eye1, eye2, mouth, body, rotate(thigh1, Pi/4, [0,4.5]), rotate(thigh2, -Pi/4, [0,4.5]), arm1, arm2]): ground:=line([-2,0], [20,0], thickness=20, color=red): sun:=disk([1,15], thickness=10, color=yellow): f1:=display(person1, ground, sun): f2:=display(translate(person2, 1, 0), ground, sun): f3:=display(translate(person1, 2, 0), ground, sun): f4:=display(translate(person2, 3, 0), ground, sun): f5:=display(translate(person1, 4, 0), ground, sun): f6:=display(translate(person2, 5, 0), ground, sun): f6:=display(translate(person1, 6, 0), ground, sun): f7:=display(translate(person2, 7, 0), ground, sun): f8:=display(translate(person1, 8, 0), ground, sun): f9:=display(translate(person2, 9, 0), ground, sun): f10:=display(translate(person1, 10, 0), ground, sun): f11:=display(translate(person2, 11, 0), ground, sun): f12:=display(translate(person1, 12, 0), ground, sun): f13:=display(translate(person2, 13, 0), ground, sun): f14:=display(translate(person1, 14, 0), ground, sun): f15:=display(translate(person2, 15, 0), ground, sun): f16:=display(translate(person1, 16, 0), ground, sun): f17:=display(translate(person2, 17, 0), ground, sun): f18:=display(translate(person1, 18, 0), ground, sun): f19:=display(translate(person2, 19, 0), ground, sun): f20:=display(translate(person1, 20, 0), ground, sun): display([f1, f2, f3, f4, f5, f6, f7, f8, f9, f10, f11, f12, f13, f14, f15, f16, f17, f18, f19, f20], insequence=true, scaling=constrained, axes=none, size=[600,400]);#speed=10