> with(plots):

> p1:= polarplot(.45, theta = 0....3.14, color=blue):

> p2:= implicitplot(x=-.45,x=-2......0, y=0.....-.5,color=blue):

> p3:= implicitplot(x=.45,x=0....2, y=0.....-.5,color=blue):

> p4:= implicitplot(y=-0.5, x=-0.45....0.45, y=0.....-1,color=blue):

> p5:= implicitplot(x=0.25, x=0....1, y=-0.15....-0.5,color=black):

> p6:= implicitplot(x=-0.25, x=-1....0, y=-0.15....-0.5,color=black):

> p7:= implicitplot(y=0.2, x=-.05.....0.05, y=-1....1,color=yellow):

> p8:= implicitplot(y=4*x, x=0.....0.2, y=0...0.2,color=yellow):

> p9:= implicitplot(-y=4*x, x=0.....-0.2, y=0...0.2,color=yellow):

> p10:= plot([-0.1+.1*cos(t), 0.3+.1*sin(t), t=0....3.14*2],color=black):

> p11:= plot([0.1+.1*cos(t), 0.3+.1*sin(t), t=0....3.14*2],color=black):

> p12:= plot([0.15+.03*cos(t), 0.28+.03*sin(t), t=0....3.14*2],color=black):

> p13:= plot([-0.05+.03*cos(t), 0.28+.03*sin(t), t=0....3.14*2],color=black):

> p14:= plot([.25*cos(t), -.15+.25*sin(t), t=0....2.95/2],color=black):

> p15:= plot([.25*cos(t), -.15+.25*sin(t), t=3.37/2....3.14],color=black):

> p16:= implicitplot(x=-0.25, x=0.....-0.3, y=-0.5.....-0.6,color=yellow):

> p17:= implicitplot(x=0.25, x=0.....0.3, y=-0.5.....-0.6,color=yellow):

> p18:= plot([+1.3 +.45*cos(t), .45*sin(t), t=0....3.14],color=blue):

> p19:= implicitplot(x=.85,x=0......4, y=0.....-.5,color=blue):

> p20:= implicitplot(x=1.75,x=0......4, y=0.....-.5,color=blue):

> p21:= implicitplot(y=-0.5,x=0.85......1.75, y=0.....-2,color=black):

> p22:= implicitplot(x=.85,x=0......4, y=0.....-.5,color=black):

> p23:= implicitplot(y-0.3 = x-1.4,x=0......2, y=0.25....0.35,color=black):

> p24:= implicitplot(-y-0.3 = x-1.9,x=0......2, y=0.15....0.25,color=black):

> p25:= implicitplot(y-0.3 = -x+1.2,x=0......2, y=0.25....0.35,color=black):

> p26:= implicitplot(-y-0.3 = -x+0.7,x=0......2, y=0.15....0.25,color=black):

> p27:= implicitplot(y =0.125, x=1.25......1.35, y=0....2,color=yellow):

> p28:= implicitplot(y+1.125 = x,x=1.25.....1.3, y=-1....2,color=yellow):

> p29:= implicitplot(-y+1.425 = x-.05,x=1.3.....1.35, y=-3....5,color=yellow):

> p30:= implicitplot(-y+1.325 = x-.05,x=1.25.....1.3, y=-3....5,color=yellow):

> p31:= implicitplot(y+1.125 = x-.1,x=1.3.....1.35, y=-1....2,color=yellow):

> p32:= implicitplot(y=x*2/3-0.383,x=-1....0, y=-0.55...-0.6,color=yellow):

> p33:= implicitplot(-y=x*2/3+0.717,x=-1....0, y=-0.55...-0.6,color=yellow):

> p34:= plot([1.3 + .25*cos(t), -.15+.25*sin(t), t=0....2.95/2],color=black):

> p35:= plot([1.3 + .25*cos(t), -.15+.25*sin(t), t=3.37/2....3.14],color=black):

> p36:= implicitplot(x=1.55,x=0.....4, y=-0.15....-0.5,color=black):

> p37:= implicitplot(x=1.05,x=0.....4, y=-0.15....-0.5,color=black):

> p38:= plot([.07*cos(t),0.445+.07*sin(t), t=0....3.14],color=pink):

> p39:= implicitplot(x=y*4 - 2,x=0.03....0.3, y=0.....5,color=pink):

> p40:= implicitplot(-x=y*4 - 2,x=-0.03....-0.3, y=0.....5,color=pink):

> p41:= implicitplot(x=-0.3,x=-0.03....-0.3, y=0.34....0.58,color=pink):

> p42:= implicitplot(x=0.3,x=-0.03....1, y=0.34....0.58,color=pink):

> p43:= implicitplot(y=0.475, x=0.06.....0.2, y=0.....2,color=red):

> p44:= implicitplot(y=0.475, x=-0.06.....-0.2, y=0.....2):

> p45:= implicitplot(y=x*2/3-0.717,x=-1....2, y=-0.55...-0.6,color=yellow):

> p46:= implicitplot(-y=x*2/3+.38,x=-1....2, y=-0.55...-0.6,color=yellow):

> p47:= implicitplot(x=1.05,x=-1....2, y=-0.5...-0.6,color=yellow):

> p48:= implicitplot(x=1.55,x=-1....2, y=-0.5...-0.6,color=yellow):

> p49:= implicitplot(-y=x*2/3-.482,x=-1....4, y=-0.55...-0.6,color=yellow):

> p50:= implicitplot(-y=x*2/3-.15,x=-1....4, y=-0.55...-0.6,color=yellow):

> p51:= implicitplot(y=x*2/3-1.585,x=-1....4, y=-0.55...-0.6,color=yellow):

> p52:= implicitplot(y=x*2/3-1.25,x=-1....4, y=-0.55...-0.6,color=yellow):

> p53:= implicitplot(x=1.3,x=-1....4, y=.449....0.52,color=black):

> p54:= implicitplot(x-0.85=y,x=-1....4, y=.449...0.52,color=black):

> p55:= implicitplot(x-1.755=-y,x=-1....4, y=.449...0.52,color=black):

> p56:= implicitplot(x/2-0.778=-y,x=-1....4, y=.3...0.4,color=red):

> p57:= implicitplot(-x/10-0.014 = -y,x=-1....4, y=0.08...0.1,color=red):

> p58:= implicitplot(y*(1.5)=x-.55,x=-1.....4, y=0.08...0.17):

> p59:= implicitplot(-y*(2)=x-1.15,x=-1.....4, y=0.17...0.23):

> p60:= implicitplot(y*(2)=x-.24,x=-1.....4, y=0.23...0.28):

> p61:= implicitplot(-y=(x*2.2)-2.05,x=-1.....4, y=0.28...0.4, scaling = constrained):

> p62:= plot([.6+(1/3)*cos(t),(.4+(1/6)*sin(t))/2, t=1....2.35],color=blue):

> p63:= plot([.6+(1/3)*cos(t),(.3+(-1/6)*sin(t))/2, t=0.7....2.05],color=blue):

> p64:= plot([-.45+(1/20)*cos(t),(-.3+(1/2)*sin(t))/2, t=2.8/2....3*(3.14)/2],color=blue):

> p65:= plot([1.75+(1/20)*cos(t),(-.3+(1/2)*sin(t))/2, t=3.8/2....-3.14/2],color=blue):

> p66:= plot([.85+(1/20)*cos(t),(-.5+(1/2)*sin(t))/2, t=2.8/2....3*(3.14)/2],color=blue):

> p67:= plot([.5+(1.5)*cos(t),(-.8+(1.5)*sin(t))/2, t=4.43/2.....2*3.408],color=green):

> p68:= implicitplot(x=-1,x=-1.....2, y=-0.4......-1.44,color=brown):

> p69:= implicitplot(x=2.01,x=1.....3, y=-0.4......-1.70,color=brown):

> p70:= plot((1/6)*sin(5*x)-1.6,x=-1.5.....2.5, y=1....-3,color=blue):

> p71:= plot((1/20)*sin(10*x)-1,x=-3.....-2, y=1....-3,color=black):

> p72:= implicitplot(x+2 = y, x=-3...2, y=-0.95....-0.29,color=blue):

> p73:= plot([-2.2+(1/10)*cos(t),-0.3+(1/20)*sin(t), t=0....3.14],color=blue):

> p74:= implicitplot(x=-2.1, x=-3...2, y=-1.05...-0.29,color=blue):

> p75:= plot((1/20)*sin(10*x)+1.5,x=2.....3, y=9....-3,color=blue):

> p76:= plot((1/20)*sin(10*x)+.5,x=2.5...03.5, y=9....-3,color=blue):

> p77:= plot((1/20)*sin(10*x)-2.5,x=0.5......1.5, y=9....-3,color=blue):

> p78:= plot((1/20)*sin(10*x)-2.2,x=-1......-2, y=9....-3,color=blue):

> p79:= plot((1/20)*sin(10*x)+1,x=-1.2.....-2.2, y=9....-3,color=blue):

> p80:= plot([.1+cos(t),1+sin(t), t=0....3.14/2],color=blue):

> p81:= implicitplot(x=.1, x=-1.....9, y=1.8.....2.2,color=green):

> p82:= implicitplot(x+2.1=y, x=-1.....9, y=2.....2.2,color=green):

> p83:= implicitplot(-x+1.9=y, x=-1.....9, y=1.8.....2,color=green):

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

> p85:= plot([-.35+(1/4)*cos(t),2+(1/6)*sin(t), t=3.14....3.14*2],color=green):

> p86:= plot([-.5+.03*cos(t), 2.05+.03*sin(t), t=0....3.14*2],color=black):

> p87:= plot([.47+(1/6)*cos(t),.4+(1/6)*sin(t), t=0....3.14/2]):

> p88:= plot([.47+(1/4)*cos(t),.4+(1/4)*sin(t), t=0....3.14/2]):

> p89:= plot([.47+(2/6)*cos(t),.4+(2/6)*sin(t), t=0....3.14/2]):

> p90:= plot([-1.55+cos(t),7+sin(t), t=0....3.14],color=violet):

> p91:= plot([-2.22+(1/3)*cos(t),7+(1/3)*sin(t), t=0....3.14],color=violet):

> p92:= plot([-1.55+(1/3)*cos(t),7+(1/3)*sin(t), t=0....3.14],color=violet):

> p93:= plot([-0.89+(1/3)*cos(t),7+(1/3)*sin(t), t=0....3.14],color=violet):

> p94:= implicitplot(x+4.05=y/2, x=-3.....9, y=5.....7,color=black):

> p95:= implicitplot(-x+.95=y/2, x=-3.....9, y=5...7,color=black):

> p96:= implicitplot(-x-.65=y/5.6, x=-3.....9, y=5...7,color=black):

> p97:= implicitplot(x+2.43=y/5.8, x=-3.....9, y=5...7,color=black):

> p98:= plot([-1.56+(1/4)*cos(t),4.77+(1/4)*sin(t), t=0....3.14*2],color=blue):

> p99:= implicitplot(x=-1.65, x=-2....3,y=4.3...4.548,color=blue):

> p100:= implicitplot(x=-1.45, x=-2....3,y=4.3...4.548,color=blue):

> p101:= plot([-1.4+.03*cos(t), 4.85+.03*sin(t), t=0....3.14*2],color=black):

> p102:= plot([-1.65+.03*cos(t), 4.85+.03*sin(t), t=0....3.14*2],color=black):

> p103:= plot([-1.55+.1*cos(t), 4.65+.03*sin(t), t=0....3.14*2],color=red):

> p104:= implicitplot(y=4.655, x=-1.6...-1.48,y=1.......8,color=red):

> p105:= plot([2+0.8*cos(t), 7+0.8*sin(t), t=0....3.14*2],color=orange):

> p106:= implicitplot(y=2.5, x=-3......4,y=1.....3,color=brown):

> p107:= plot([-1+2*cos(t), .5+3*sin(t), t=1.05...2.42],color=green):

> p108:= plot([1+2*cos(t), .5+3*sin(t), t=0.73....2.42],color=green):

> p109:= implicitplot(y-7=x-2, x=-3......4,y=7.75.....8.25,color=yellow):

> p110:= implicitplot(y-7=x-2, x=-3......4,y=5.75....6.25,color=yellow):

> p111:= implicitplot(-y+7=x-2, x=-3......4,y=7.75.....8.25,color=yellow):

> p112:= implicitplot(-y+7=x-2, x=-3......4,y=5.75....6.25,color=yellow):

> p113:= implicitplot(y=7, x=3.....4,y=6.....8,color=yellow):

> p114:= implicitplot(y=7, x=0.5.....1,y=6.....8,color=yellow):

> p115:= implicitplot(x=2, x=3.....0,y=8.....8.5,color=yellow):

> p116:= implicitplot(x=2, x=3.....0,y=5.5.....6,color=yellow):

> p117:= implicitplot(y=4.7, x=-2.....-1.8,y=4.....6,color=green):

> p118:= implicitplot(y=4.7, x=-1.28.....-1.08,y=4.....6,color=green):

> p119:= implicitplot(y=-3, x=-4.....4,y=-4.....6,color=yellow):

> p120:= implicitplot(y=8.5, x=-4.....4,y=-4.....9,color=yellow):

> p121:= implicitplot(x=-3, x=-7.....3,y=-3.....8.5,color=green):

> p122:= implicitplot(x=3.5, x=-3.....4,y=-3.....8.5,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,p39,p40,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,p99,p100,p101,p102,p103,p104,p105,p106,p107,p108,p109,p110,p111,p112,p113,p114,p115,p116,p117,p118,p119,p120,p121,p122);