> with(linalg):

Warning, new definition for norm

Warning, new definition for trace

> with(plots):

> p1:=plot(-10+1/10*cos(t),t=-10*Pi..10*Pi,color=green):

> p2:=plot(-19/2+1/10*cos(t),t=-9.5*Pi..9.5*Pi,color=red):

> p3:=plot(-9+1/10*cos(t),t=-9*Pi..9*Pi,color=green):

> p4:=plot(-17/2+1/10*cos(t),t=-8.5*Pi..8.5*Pi,color=red):

> p5:=plot(-8+1/10*cos(t),t=-8*Pi..8*Pi,color=green):

> p6:=plot(-15/2+1/10*cos(t),t=-7.5*Pi..7.5*Pi,color=red):

> p7:=plot(-7+1/10*cos(t),t=-7*Pi..7*Pi,color=green):

> p8:=plot(-13/2+1/10*cos(t),t=-6.5*Pi..6.5*Pi,color=red):

> p9:=plot(-6+1/10*cos(t),t=-6*Pi..6*Pi,color=green):

> p10:=plot(-11/2+1/10*cos(t),t=-5.5*Pi..5.5*Pi,color=red):

> p11:=plot(-5+1/10*cos(t),t=-5*Pi..5*Pi,color=green):

> p12:=plot(-9/2+1/10*cos(t),t=-4.5*Pi..4.5*Pi,color=red):

> p13:=plot(-4+1/10*cos(t),t=-4*Pi..4*Pi,color=green):

> p14:=plot(-7/2+1/10*cos(t),t=-3.5*Pi..3.5*Pi,color=red):

> p15:=plot(-3+1/10*cos(t),t=-3*Pi..3*Pi,color=green):

> p16:=plot(-5/2+1/10*cos(t),t=-2.5*Pi..2.5*Pi,color=red):

> p17:=plot(-2+1/10*cos(t),t=-2*Pi..2*Pi,color=green):

> p18:=plot(-3/2+1/10*cos(t),t=-1.5*Pi..1.5*Pi,color=red):

> p19:=plot(-1+1/10*cos(t),t=-1*Pi..1*Pi,color=green):

> p20:=plot(-1/2+1/10*cos(t),t=-1/2*Pi..1/2*Pi,color=red):

> p21:=polarplot([-cos(t)/2,2*sin(t),t=0..10],color=blue):

> p22:=plot([12+cos(t),-4+1/6*sin(t),t=0..2*Pi],color=violet):

> p23:=plot([-12+cos(t),-4+1/6*sin(t),t=0..2*Pi],color=blue):

> p24:=plot([-7+cos(t),-8+1/6*sin(t),t=0..2*Pi],color=blue):

> p25:=plot([-5+cos(t),-5+1/6*sin(t),t=0..2*Pi],color=violet):

> p26:=plot([-10+cos(t),-7+1/6*sin(t),t=0..2*Pi],color=violet):

> p27:=plot([6*cos(t),-10.5+1/6*sin(t),t=0..2*Pi],color=red):

> p28:=plot([cos(t),-10.5+sin(t),t=0..2*Pi],color=red):

> p29:=plot([7+cos(t),-8+1/6*sin(t),t=0..2*Pi],color=blue):

> p30:=plot([5+cos(t),-5+1/6*sin(t),t=0..2*Pi],color=blue):

> p31:=plot([2+cos(t),-1+1/6*sin(t),t=0..2*Pi],color=blue):

> p32:=plot([3+cos(t),-3.5+1/6*sin(t),t=0..2*Pi],color=red):

> p33:=plot([-5+cos(t),-3+1/6*sin(t),t=0..2*Pi],color=violet):

> p34:=plot([cos(t),-2+1/6*sin(t),t=0..2*Pi],color=blue):

> p35:=plot([6+cos(t),-2+1/6*sin(t),t=0..2*Pi],color=violet):

> p36:=plot([4.5+cos(t),-6.5+1/6*sin(t),t=0..2*Pi],color=violet):

> p37:=plot([2.5+cos(t),-9+1/6*sin(t),t=0..2*Pi],color=violet):

> p38:=plot([-2.5+cos(t),-7+1/6*sin(t),t=0..2*Pi],color=blue):

> p41:=plot([15+cos(t),-9+1/6*sin(t),t=0..2*Pi],color=violet):

> p42:=plot([13+cos(t),-10+1/6*sin(t),t=0..2*Pi],color=blue):

> p43:=plot([-12+cos(t),-9.5+1/6*sin(t),t=0..2*Pi],color=violet):

> p44:=plot([-16+cos(t),-7+1/6*sin(t),t=0..2*Pi],color=blue):

> p45:=plot([17+cos(t),-7+1/6*sin(t),t=0..2*Pi],color=violet):

> p46:=plot([-22+cos(t),-9+1/6*sin(t),t=0..2*Pi],color=red):

> p47:=plot([-12+cos(t),-6+1/6*sin(t),t=0..2*Pi],color=red):

> p48:=plot([-17+cos(t),-8+1/6*sin(t),t=0..2*Pi],color=red):

> p49:=plot([12+cos(t),-6+1/6*sin(t),t=0..2*Pi],color=red):

> p50:=plot([22.5+cos(t),-8.5+1/6*sin(t),t=0..2*Pi],color=blue):

> p51:= polarplot(1.5+sin(5*theta)/5,theta=0..2*Pi, color=blue,scaling=constrained):

> p52:= polarplot(1+sin(5*theta)/2,theta=0..2*Pi, color=green,scaling=constrained):

> p53:= plot([-27+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p54:= plot([-25+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p55:= plot([-24+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p56:= plot([-24+cos(t),-11+1/5*sin(t),t=0..2*Pi],color=green):

> p57:= plot([-24+cos(t),-11.75+1/5*sin(t),t=0..2*Pi],color=green):

> p58:= plot([-28.5+cos(t),-10.5+1/6*sin(t),t=0..2*Pi],color=green):

> p59:= plot([-22+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p60:= plot([-21+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p61:= plot([-20+cos(t),-10.5+1/2*sin(t),t=0..2*Pi],color=green):

> p62:= plot([-21+cos(t),-11+1/5*sin(t),t=0..2*Pi],color=green):

> p63:= plot([-20+cos(t),-11.5+1/2*sin(t),t=0..2*Pi],color=green):

> p64:= plot([-18+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p65:= plot([-17+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p66:= plot([-16+cos(t),-10.5+1/2*sin(t),t=0..2*Pi],color=green):

> p67:= plot([-17+cos(t),-11+1/5*sin(t),t=0..2*Pi],color=green):

> p68:= plot([-16+cos(t),-11.5+1/2*sin(t),t=0..2*Pi],color=green):

> p69:= plot([-14+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p70:= plot([-13+cos(t),-10.5+1/5*sin(t),t=0..2*Pi],color=green):

> p71:= plot([-12+cos(t),-10.75+1/5*sin(t),t=0..2*Pi],color=green):

> p72:= plot([-12+cos(t),-11.5+1/2*sin(t),t=0..2*Pi],color=green):

> p73:= plot([-11+cos(t),-10.5+1/5*sin(t),t=0..2*Pi],color=green):

> p74:= plot([-10+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p75:= plot([-6+cos(t),-11+1/1.25*sin(t),t=0..2*Pi],color=green):

> p76:= plot([-5+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p77:= plot([-5+cos(t),-11.85+1/5*sin(t),t=0..2*Pi],color=green):

> p78:= plot([-4+cos(t),-10.5+1/3*sin(t),t=0..2*Pi],color=green):

> p79:= plot([-4+cos(t),-11.5+1/3*sin(t),t=0..2*Pi],color=green):

> p80:= plot([-2+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p81:= plot([-.5+cos(t),-11+1/5*sin(t),t=0..2*Pi],color=green):

> p82:= plot([1+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p83:= plot([3+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p84:= plot([4+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p85:= plot([5+cos(t),-10.5+1/2*sin(t),t=0..2*Pi],color=green):

> p86:= plot([4+cos(t),-10+1/5*sin(t),t=0..2*Pi],color=green):

> p87:= plot([5+cos(t),-11.5+1/2*sin(t),t=0..2*Pi],color=green):

> p88:= plot([7+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p89:= plot([9+cos(t),-10.5+1/3*sin(t),t=0..2*Pi],color=green):

> p90:= plot([9+cos(t),-11.5+1/3*sin(t),t=0..2*Pi],color=green):

> p91:= plot([10.5+cos(t),-10.2+1/5*sin(t),t=0..2*Pi],color=green):

> p92:= plot([10.5+cos(t),-11+1/5*sin(t),t=0..2*Pi],color=green):

> p93:= plot([10.5+cos(t),-11.75+1/5*sin(t),t=0..2*Pi],color=green):

> p94:= plot([12+cos(t),-10.5+1/4*sin(t),t=0..2*Pi],color=green):

> p95:= plot([12+cos(t),-11.5+1/4*sin(t),t=0..2*Pi],color=green):

> p96:= plot([13.5+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p97:= plot([14.5+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p98:= plot([15.5+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p100:= plot([16.5+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p101:= plot([14.75+cos(t),-11.2+1/1.25*sin(t),t=0..2*Pi],color=green):

> p102:= plot([18+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p103:= plot([19.5+cos(t),-10.5+1/6*sin(t),t=0..2*Pi],color=green):

> p104:= plot([21+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> p105:= plot([23+cos(t),-11.2+1/1.25*sin(t),t=0..2*Pi],color=green):

> p106:= plot([24.5+cos(t),-10.25+1/5*sin(t),t=0..2*Pi],color=green):

> p107:= plot([24.5+cos(t),-11+1/5*sin(t),t=0..2*Pi],color=green):

> p108:= plot([26+cos(t),-11.2+1/1.25*sin(t),t=0..2*Pi],color=green):

> p109:= plot([27.3+cos(t),-10.5+1/3*sin(t),t=0..2*Pi],color=green):

> p110:= plot([27.3+cos(t),-11.5+1/3*sin(t),t=0..2*Pi],color=green):

> p111:= plot([28.5+cos(t),-10.2+1/5*sin(t),t=0..2*Pi],color=green):

> p112:= plot([28.5+cos(t),-11+1/5*sin(t),t=0..2*Pi],color=green):

> p113:= plot([28.5+cos(t),-11.85+1/5*sin(t),t=0..2*Pi],color=green):

> p114:= plot([30+cos(t),-10.5+1/4*sin(t),t=0..2*Pi],color=green):

> p115:= plot([30+cos(t),-11.5+1/4*sin(t),t=0..2*Pi],color=green):

> p116:= plot([-30+cos(t),-11+sin(t),t=0..2*Pi],color=green):

> 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,p41,p42,p43,p44,p45,p46,p47,p48,p49,p50,p51,p52,p53,p54,p55,p56,p57,p58,p59,p60,p61,p62,p63,p64,p65,p66,p67,p68,p69,p70,p71,p72,p73,p74,p75,p76,p77,p78,p79,p80,p81,p82,p83,p84,p85,p86,p87,p88,p89,p90,p91,p92,p93,p94,p95,p96,p97,p98,p100,p101,p102,p103,p104,p105,p106,p107,p108,p109,p110,p111,p112,p113,p114,p115,p116);

>