4807.sagews

p1=polygon([(-5,0),(10,6),(4,-4),(2,-4),(1,-3)],color='pink')

p2=polygon([(10,6),(10,8),(11,9)],color='red')

p3=polygon([(10,6),(12,8),(12,7)],color='red')

p4=polygon([(10,6),(12,6),(12,5)],color='red')

p5=polygon([(1,-3),(3,-1),(3,-2)],color='white')

p6=polygon([(0,2),(-1,3),(-1,4),(0,5),(1,5),(2,4),(2,3),(1,2)],color='white')

p7=polygon([(2,2),(2,4),(3,5),(4,5),(5,4),(5,2),(4,1),(3,1)],color='white')

p8=polygon([(-1,4),(0,5),(1,5),(2,4)],color='pink')

p9=polygon([(2,4),(3,5),(4,5),(5,4)],color='pink')

l1=line([(2,2),(2,4),(3,5),(4,5),(5,4),(5,2),(4,1),(3,1)],thickness=3, color='black')

l2=line([(2,4),(3,5),(4,5),(5,4),(2,4)],thickness=3, color='black')

l3=line([(0,2),(-1,3),(-1,4),(0,5),(1,5),(2,4),(2,3),(1,2),(0,2)],thickness=3, color='black')

l4=line([(-5,0),(0,2),(1,2),(2,3),(2,2),(3,1),(4,1),(5,2),(5,4),(10,6),(4,-4),(2,-4),(1,-3),(-5,0)],thickness=3, color='black')

l5=line([(1,-3),(3,-1),(3,-2),(1,-3)],thickness=3, color='black')

l6=line([(-1,4),(2,4)],thickness=3, color='black')

o1=ellipse((1.7,3.5), 0.3,0.5, fill=true, rgbcolor='black')

o2=circle((1.7,3.5),0.1, fill=true, rgbcolor='white')

o3=ellipse((4,3.5),0.3,0.5,  fill=true, rgbcolor='black')

o4=circle((4,3.5),0.1,fill=true,rgbcolor='white')

o11=ellipse((1.7,3.5), 0.3,0.5, thickness=2, color='black')

o31=ellipse((4,3.5),0.3,0.5,  thickness=2, color='black')

t1=plot(-4,(x,2,4),color='yellow',legend_label='$y=-4$')

t2=plot(-1*x-2,(x,1,2), color='orange', legend_label='$y=x-2$')

t3=plot(-0.5*x-2.5,(x,-5,1),color='red',legend_label='$y=-0.5x-2.5$')

t4=plot(1.66*x-10.66,(x,4,10),color='gold',legend_label='$y=1.66x-10.66$')

show(p1+p2+p3+p4+p5+p6+p7+p8+p9+l1+l2+l3+l4+l5+l6+o1+o2+o3+o4+o11+o31+t1+t2+t3+t4)