> with(plots);
> p1:=plot([3*t, -5, t=-2...5.6], color=black,scaling=constrained):#table top
> p2:=plot([(1-t)-1.5*t,(-5*t),t=0.56..1],color = brown,axes=none):#flower pot
> p3:=plot([t,-2.8, t= -4.1..-.4],color=brown):#flower pot
> p4:=plot([-4*(1-t)-3*t,-3*(1-t)+(-5*t),t=-.10..1],color = brown):#flower pot
> p5:=polarplot(1+sin(7*theta), theta=0...2*Pi, color= red):#flower
> p6:=polarplot(1-cos(7*theta), theta=2*Pi...4*Pi, color= magenta):#flower
> p7:=polarplot(.25-sin(-4*theta), theta=0...2*Pi, color=orange):#flower
> p8:=plot([3*sin(-t), -1.8*tan((1)*t), t=0..1], color=green):#stem
> p9:=plot([.4*cos(t)-3, sin(t)-2.8, t =0..Pi/1.8],color = green):#leaf
> p10:=plot([-.5*cos(t)-2.7, 1*sin(t)-2.5, t= -.3 ..Pi/4.2],color = green):#leaf
> p11:=plot([sin(2*theta)*cos(theta)-2.3, sin(2*theta)*sin(theta)-3.7, theta=0...2*Pi],color=blue):#flower design
> p12:=plot([.8*sin(2*theta)*cos(theta)-2.3, .8*sin(2*theta)*sin(theta)-3.7, theta=0...2*Pi],color=yellow):#flower design
> p13:=plot([.5*sin(2*theta)*cos(theta)-2.3, .5*sin(2*theta)*sin(theta)-3.7, theta=0...2*Pi],color=red):#flower design
>
p14:=plot([9, 5*cos(t)+7.5, t=0...4*Pi],color = black): #window
>
p15:=plot([5*cos(t)+4, 12.5, t=0...4*Pi],color = black): #window
>
p16:=plot([4, 5*cos(t)+7.5, t=0...4*Pi],color = black): #window
>
p17:=plot([5*cos(t)+4, 7.3, t=0...4*Pi],color = black): #window
> p18:=plot([-1, 5*cos(t)+7.5, t= 0...4*Pi],color = black):#window
> p19:=plot([5*cos(t)+4, 2.5, t=0....4*Pi],color = black):#window
> p20:=plot([cos(t)+1, -2*sin(t)+10, t=-5...2],color=yellow):#sun
>
p21:=plot([1,t,t=7.5..8],color=red): #sun ray
>
p22:=plot([1,t,t=12..12.5],color=red): #sun ray
>
p23:=plot([t,10,t=-.5..0],color=red): #sun ray
> p24:=plot([t,10,t=2..2.5],color=red): #sun ray
>
p25:=plot([t,-t+11,t=1.865..2.5],color=orange):#sun ray
>
p26:=plot([t,-t+11,t=-.5..0.15],color=orange): #sun ray
>
p27:=plot([t,t+9,t=1.865..2.6],color=orange): #sun ray
> p28:=plot([t,t+9,t=-.5..0.15],color=orange): #sun ray
> p29:=plot([t+1,-sin(t)/4+3, t=-1..8], color=blue): #wave
> p30:=plot([t+1,-sin(t)/4+4, t=-2..7], color=blue):#wave
> p31:=plot([t+1,-sin(t)/4+5, t=1..8], color=blue):#wave
> p32:=plot([.25*t*cos(-Pi/5)-cos(t)*(.45*sin(2*t))*sin(-Pi/5)+8,(.25*t)*sin(-Pi/5)+(cos(t)*.45*sin(2*t))*cos(-Pi/5)+8,t=0..Pi],color = black): # seagull
> p33:=plot([.25*t*cos(-Pi/5)-cos(t)*(.45*sin(2*t))*sin(-Pi/5)+4,(.25*t)*sin(-Pi/5)+(cos(t)*.45*sin(2*t))*cos(-Pi/5)+10,t=0..Pi],color = black): # seagull
> p34:=plot([.25*t*cos(-Pi/5)-cos(t)*(.45*sin(2*t))*sin(-Pi/5)+2,(.25*t)*sin(-Pi/5)+(cos(t)*.45*sin(2*t))*cos(-Pi/5)+6,t=0..Pi],color = black): # seagull
>
p35:=plot([3*t+12.5,5*t^2-4, t=-.895...0.896],color=blue):#ice cream dish
>
p36:=plot([((3*t^3.5)/2)+10,t-5,t=-2.5...1.1],color = blue): # ice cream dish
>
p37:=plot([(-3*t^3.5)/2+15,t-5,t=-2.5...1.1], color = blue): #ice cream dish
>
p38:=plot([t,-5,t = 10..15], color=blue): #ice cream dish
> p39:=plot([t+12,0, t=-2.19..3.17],color=blue): #ice cream dish
> p40:=plot([cos(theta)+11,-2*sin(theta), theta=-3.15...0], color=gold): #ice cream
>
p41:=plot([cos(theta)+12.5,-2*sin(theta),theta=-2.41...0],color=gold): #ice cream
>
p42:=plot([cos(theta)+14,-2*sin(theta), theta=-2.41...0],color=gold): #ice cream
> p43:=plot([.5*cos(theta)+13.3,-.5*sin(theta)+2.2, theta=0...2*Pi],color=red): #cherry
> p44:=plot([(2*cos(t)/1.2)+15,-2*sin(t)+2.7,t=Pi...Pi+2],color=red):#cherry stem
> p45:=plot([-3*cos(t)-10, 3*sin(t)+10, t=-9...0],color=black):#clock
>
p46:=plot([-10,t,t=7..7.8],color=black): #clock
> p47:=plot([-10,t,t=12.2..13],color=black): #clock
>
p48:=plot([t,10,t=-13..-12.2],color=black): #clock
> p49:=plot([t,10,t=-7..-7.8],color=black): #clock
> p50:=plot([-10,t,t=10..12],color=gold):#clock hands
>
p51:=plot([t,10,t=-10...-8.3],color=gold):#clock hands
> display(p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,p11,p12,p13,p14,p15,p16,p17,p18,p19,p20,p21,p22,p23,p24,p25,p26,p27,p28,p29,p30,p31,p32,p33,p34,p35,p36,p37,p38,p39,p40,p41,p42,p43,p44,p45,p46,p47,p48,p49,p50,p51);