>

> with(plots):

Warning, the name changecoords has been redefined

> with(plottools):

Warning, the name arrow has been redefined

>

> p1:=plot([t*1.2,sin(t),t=0..2.7],color=brown,scaling=constrained):

> p2:=plot([2*t+Pi,.5+sin(t),t=0..3.1],color=brown):

> p3:=plot([(t*1.8)+3*Pi,.6+sin(t),t=-.1..Pi],color=brown):

> p4:=plot([3*t+14.7,3*sin(t)+.2,t=.13..Pi],color=brown):

> p5:=plot([t*1.2-.01,sin(t)-.01,t=0..2.7],color=brown):

> p6:=plot([2*t+Pi-.01,.5+sin(t)-.01,t=0..3.1],color=brown):

> p7:=plot([(t*1.8)+3*Pi-.01,.6+sin(t)-.01,t=-.1..Pi],color=brown):

> p8:=plot([3*t+14.7-.01,3*sin(t)+.2-.01,t=.13..Pi],color=brown):

> p9:=plot([3-sin(t),cos(t)-3,t=-Pi/2..Pi/2],color=black):

> p10:=plot([t+5,5,t=0..5],color=blue):

> p11:=plot([t+3,7,t=0..6],color=aquamarine):

> p12:=plot([t+5,5,t=-4..-2],color=blue):

> p13:=plot([t+5,4.5,t=0..2],color=cyan):

> p14:=plot([t+3,4,t=0..10],color=aquamarine):

> p15:=plot([t*7+2,sin(t)+15,t=1..8],color=black,thickness=2):

> p16:=plot([t,20,t=0..33],color=blue):

> p17:=plot([-8*cos(t)+.4*cos(10*t)+7, 1+3*sin(t)+.4*sin(10*t)-1, t=Pi/6..6.5*Pi/9], color=blue,thickness=2):

> p18:=plot([-6*cos(t)+.4*cos(10*t)+17.9, 1+4*sin(t)+.4*sin(10*t)-.2, t=Pi/10..3*Pi/4], color=blue,thickness=2):

> p19:=plot([t-1,1/6*t+14.2,t=10..35],color=black,thickness=2):

> p20:=plot([t,19+(1/30*t),t=33..45.2],color=black,thickness=2):

> p21:=plot([45+t,13*sin((.25)*t)+20,t=Pi/15..2*Pi],color=black,thickness=2):

> p22:=plot([t,33,t=51..55],color=black,thickness=2):

> p23:=plot([10*cos(t)+.1*cos(10*t)+43.5,3*sin(t)+.4*sin(10*t)-5,t=Pi/12..7*Pi/12],color=brown):

> p24:=plot([50+t,20*sin((.25)*t)+10,t=2*Pi/3..2*Pi],color=black,thickness=2):

> p25:=plot([t*8+20,sin(t)+15.5,t=0..Pi/2],color=black,thickness=2):

> p26:=plot([40*t+180,sin(t)*t+16,t=-Pi..-2.7],color=black,thickness=2):

> p27:=plot([12-1.5*sin(t),cos(t)-4,t=-Pi/2..Pi/2],color=black):

> p28:=plot([20-sin(t),cos(t)-2.5,t=-Pi/2..Pi],color=black):

> p29:=plot([15-.5*sin(t),.5*cos(t)-1,t=-Pi..Pi],color=black):

> p30:=plot([22-.7*sin(t),.5*cos(t)-3,t=-Pi..Pi],color=black):

> p31:=plot([6-.5*cos(t),.2*sin(t)-1.5,t=-Pi..Pi],color=black):

> p32:=plot([8-.5*sin(t),.7*cos(t)-.3,t=-Pi..Pi],color=grey):

> p33:=plot([10-1.3*sin(t),1.1*cos(t)-.5,t=-Pi..Pi],color=black):

> p34:=plot([8-.5*sin(t),.7*cos(t),t=-Pi..Pi],color=grey):

> p35:=plot([t,10,t=1..12],color=blue):

> p36:=plot([t+4,12,t=0..12],color=cyan):

> p37:=plot([t+15,14,t=0..10],color=blue):

> p38:=plot([t+30,13,t=0..10],color=green):

> p39:=plot([t+20,10,t=0..7],color=green):

> p40:=plot([t+23,7,t=0..15],color=grey):

> p41:=plot([t+38,10,t=0..15],color=blue):

> p42:=plot([t+5,18,t=0..13],color=green):

> p43:=plot([3*t+22,.5*sin(t)+3.5,t=0..2*Pi],color=blue,thickness=2):

> p44:=plot([2.5*t+40.5,.9*sin(t)+3.6,t=0..2*Pi],color=blue,thickness=2):

> p45:=plot([t+56,(t^2)/3+3.6,t=0..3],color=blue,thickness=2):

> p46:=plot([2.5*t+55,.9*sin(t)+5.7,t=Pi/2..2*Pi],color=blue,thickness=2):

> p47:=plot([t+55,-1/sqrt(t)+36.25,t=0.1..20],color=black,thickness=2):

> p48:=plot([62,t+20,t=3..12],color=black,thickness=2):

> p49:=plot([75,t+25,t=0..6],color=black,thickness=2):

> p50:=plot([t+75,35.8,t=0..20],color=black,thickness=2):

> p51:=plot([80,t+19,t=0..4],color=black,thickness=2):

> p52:=plot([t+80,1.5*t+23,t=0..3],color=black,thickness=2):

> p53:=plot([83,t+27.4,t=0..4],color=black,thickness=2):

> p54:=plot([.7*sin(t)+30,.7*cos(t)-2,t=0..2*Pi],color=black):

> p55:=plot([.5*sin(t)+25,.5*cos(t)-3,t=-Pi..Pi],color=black):

> p56:=plot([sin(t)+31,cos(t)-2.5,t=-.8..1.5*Pi],color=black):

> p57:=plot([.2*sin(t)+12,.2*cos(t)-2,t=-Pi..Pi],color=sienna):

> p58:=plot([.2*sin(t)+14,.2*cos(t)-3,t=-Pi..Pi],color=sienna):

> p59:=plot([.2*sin(t)+30,.2*cos(t)-2,t=-Pi..Pi],color=khaki):

> p60:=plot([.3*sin(t)+35,.3*cos(t)-2.5,t=-Pi..Pi],color=sienna):

> p61:=plot([.3*sin(t)+40,.3*cos(t)-3.5,t=-Pi..Pi],color=sienna,axes=none):

> p62:=plot([.3*sin(t)+60,.3*cos(t)-3.3,t=0..3*Pi],color=grey):

> p63:=plot([.35*sin(t)+70,.35*cos(t)-2.5,t=0..3*Pi],color=tan):

> p64:=plot([.33*sin(t)+65,.33*cos(t)-2,t=0..3*Pi],color=sienna):

> p65:=plot([t+68,.5*t+13,t=0..22],color=black,thickness=2):

> p66:=plot([t+72,17,t=0..4],color=black,thickness=2):

> p67:=plot([t+89.4,-t+24,t=0..5],color=black,thickness=2):

> p68:=plot([t+94.15,19,t=0..4],color=black,thickness=2):

> p69:=plot([t+85,-1.2*t+21.5,t=0..2],color=black,thickness=2):

> p70:=plot([t+83,1.2*t+18,t=0..2],color=black,thickness=2):

> p71:=ellipse([10,10], 5, 1,filled=true, color=yellow):

> p72:= ellipse([10,34], 6, 5,filled=true, color=yellow):

> p73:=plot([t+24,(-1/2)*t+.2,t=0..3],color=brown):

> p74:=plot([12*cos(t)+.2*cos(10*t)+33,7*sin(t)+.5*sin(10*t)-7.9,t=2*Pi/8..8*Pi/12],color=brown):

> p75:=plot([5*t+70.5,-sin(t)+5.3,t=0..Pi],color=blue,thickness=2):

> p76:=plot([8*t+75,-sin(t)+1,t=0..Pi],color=blue,thickness=2):

> p77:=plot([6*t+79,-sin(t)+3,t=0..Pi],color=blue,thickness=3):

> p78:=plot([5*sin(2*t)+78,4*arcsin(.5*t)+6,t=0..2*Pi],color=BLUE,thickness=2):

> p79:=plot([20*arcsin(2*t)+68,4*sin(.5*t)+13,t=0..3*Pi],color=black,thickness=2):

> p80:=plot([4*cos(2*t)+90,3*arccos(.3*t)+8,t=0..3*Pi],color=blue,thickness=2):

> p81:=plot([2*log(t)+99,3*sin(t)+5.2,t=0..Pi/2],color=blue,thickness=2):

> p82:=plot([10*t+67,-sin(t)-.5,t=0..Pi],color=blue,thickness=2):

> p83:=plot([8*t+53,2.5*sin(t)-3.7,t=0..Pi],color=brown):

> p84:=plot([4*t+48,-sin(t)+1,t=0..1.4*Pi],color=blue,thickness=2):

> p85:=plot([2*t+32,-.5*sin(t)+1.3,t=0..1.3*Pi],color=blue,thickness=2):

> p86:=plot([8-.5*sin(t),.7*cos(t),t=-Pi..Pi],color=black):

> p87:=plot([t+46,12,t=0..7],color=aquamarine):

> p88:=plot([t+60,11,t=0..11],color=blue):

> p89:=plot([t+66,7,t=0..9],color=blue):

> p90:=plot([t+75,8,t=0..5],color=green):

> p91:=plot([t+42,6.5,t=0..6],color=aquamarine):

> p92:=plot([-5.5*cos(.7*t)+65,1.4*sin(t)+1,t=-Pi/4..5/4*Pi],color=grey,thickness=2,filled=true):

> p93:=plot([-5.5*cos(.7*t)+65,1.4*sin(t)+1,t=-Pi/4..5/4*Pi],color=black,thickness=2):

> p94:=plot([-4*arcsin(t)+89,2*sin(t)+10,t=0..2*Pi],color=blue,thickness=2):

> p95:=plot([-2*arcsin(t)+89,-4*sin(t)+10,t=0..2*Pi],color=blue,thickness=2):

> p96:=plot([2*sin(t)+76,.5*cos(t)-6,t=0..2*Pi],color=brown):

> p97:=plot([3*sin(t)+70,1.5*cos(t)-6,t=0..2*Pi],color=black):

> p98:=plot([cos(t)+60,sin(t)-3,t=0..2*Pi],color=sienna):

> p99:=plot([.5*cos(t)+50,sin(t)-4,t=0..2*Pi],color=brown):

> p100:=plot([cos(t)+45,.75*sin(t)-4,t=0..2*Pi],color=khaki):

> 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,p81,p82,p83,p84,p85,p86,p87,p88,p89,p90,p91,p92,p93,p94,p95,p96,p97,p98,p99,p100);

>

>

>