simple cap

By Aparna Pradeep
e1=ellipse(w=50,h=20,fill="white",stroke="white")
show(e1)
p1=point(x=-50,y=0)
p2=point(x=-20,y=30)
p3=point(x=0,y=40)
p4=point(x=20,y=20)
p5=point(x=40,y=0)
shape=polygon([p1,p2,p3,p4,p5],fill="red")
show(shape)
c1=circle(r=10,x=0,y=40,fill="white")
show(c1)