> with(plots);

Warning, the name changecoords has been redefined

> p1 := plot([3*sin(t)-6,4*cos(t)+7.2, t=4..7.7],color=yellow, scaling=constrained):

> p2 := plot([t-7.8,2*sin(t)+9.6, t=4.8..9],color=yellow):

> p3 := plot([7*sin(t),8*cos(t)+5, t=0..1.3],color=green):

> p4 := plot([8*sin(t),4*cos(t)+9, t=5..6.3],color=green):

> p5 := plot([-t+7.7,7*t+.3,t=-.43..1],color=green):

> p6 := plot([-t+6.5-1.8,3*t,t=1.7..3.6],color=yellow):

> p7 := plot([2.4*sin(t)-5.3,1.4*cos(t)+7.2, t=4.7..7.7],color=yellow):

> p8 := plot([t-10.5,5*t-6.5, t=2.3..2.8],color=yellow):

> p9 := plot([t-7.8,1.1*sin(t)+8.6, t=5..8],color=yellow):

> p10 := plot([t-7.5,2.4*sin(t)+7.3, t=7.5..10.5],color=yellow):

> p11 := plot([t+1.1, 5*sin(t)+.6, t=2.38..5],color=green):

> p12 := plot([t+1.2, sin(t)-3.3, t=5..7],color=green):

> p13 := plot([2*t-12, 3*sin(t), t=3..7.3],color=tan):

> p14 := plot([sin(t)-7,t-1.5,t=2..4.8],color=tan):

> p15 := plot([-5*t+9.4, t+.9, t=3.5..4.2],color=tan):

> p16 := plot([-2*t-1, t-.2, t=3.5..5.2],color=tan):

> p17 := plot([2.4*t-6, t+.2, t=3.5..5],color=tan):

> p18 := plot([10*t-34, t+1.3, t=3.65..4],color=tan):

> p19 := plot([sin(t)+2,2*cos(t)+4.2,t=1.7..3],color=tan):

> p20 := plot([1.7*t-11,sin(t), t=4..6.4],color=pink):

> p21 := plot([3*t-5,sin(t)-1, t=0.2..1.6],color=pink):

> p22 := plot([t-5,2*t,t=1..2],color=tan):

> p23 := plot([sin(t)-3.2,cos(t)+2.6,t=2..4],color=tan):

> p24 := plot([1.3*sin(t),1.7*cos(t)+6, t=.7..5.2],color=black):

> p25 := plot([5*t,t+7, t=-(.3)..(.2)],thickness=4):

> p26 := plot([.4*sin(t),.8*cos(t)+6, t=0..7],color=blue,thickness=3):

> p27 := plot([1.3*sin(t)-6,1.7*cos(t)+6, t=1.7..6],color=black):

> p28 := plot([-t-5.5,1.1*t+6.8, t=-1..1],thickness=4):

> p29 := plot([.4*sin(t)-5.8,.8*cos(t)+6, t=0..7],color=blue,thickness=3):

> p30 := plot([5*sin(t)-2,5*cos(t)+1, t=2..4.1],color=green):

> p31 := plot([0,t,t=-3.5..(-.75)],color=tan):

> p32 := plot([-4,t,t=-3.5..-2.3],color=tan):

> p33 := plot([15*sin(t),15*cos(t)-15.5, t=5..5.86], color=green):

> p34 := plot([5*t-14,5*t^2-31, t=-2..2],color=brown):

> p35 := plot([-4*t-4.1,-11, t=0..5],color=brown):

> p36 := plot([15*sin(t),15*cos(t)-15.8, t=6.45..6.6], color=green):

> p37 := plot([15*sin(t)-4,20*cos(t)-14.7, t=7.22..7.6], color=green):

> p38 := plot([8*sin(t),8*cos(t)-12, t=6.2..6.9], color=green):

> p39 := plot([20*sin(t)+21,20*cos(t)+6, t=4.1..4.33], color=green):

> p40 := plot([8*sin(t),8*cos(t)-11.6, t=5.5..6], color=green):

> p41 := plot([20*sin(t)+13.9,20*cos(t)-1.7, t=4.5..4.7], color=green):

> p42 := plot([15*sin(t)-8.5,20*cos(t)-16.5, t=7.39..7.55], color=green):

> p43 := plot([15*sin(t)-20,20*cos(t)-17, t=7.4..7.55], color=green):

> p44 := plot([15*sin(t)+6.5,15*cos(t)-15.5, t=5..5.25], color=green):

> p45 := plot([-5.5, t, t=-17..-22],color=green):

> p46 := plot([15*sin(t)+18,15*cos(t)-14.5, t=5..5.2], color=green):

> p47 := plot([3.5, t, t=-10.3..-22],color=green):

> p48 := plot([-6, t, t=-22..-25],color=brown):

> p49 := plot([4, t, t=-22..-25],color=brown):

> p50 := plot([t,-22, t=-6..4],color=brown):

> p51 := plot([t,-25, t=-6..4],color=brown):

> p52 := plot([33*sin(t)+17,33*cos(t)-33, t=5.5..5.79],color=brown):

> p53 := plot([33*sin(t)+17,33*cos(t)-33, t=5.851..5.905],color=brown):

> p54 := plot([33*sin(t)+17,33*cos(t)-36.5, t=5.59..6.03],color=brown):

> p55 := plot([t+10,t-5,t=-.5..4],color=tan):

> p56 := plot([t+8,t-1,t=-.1..4],color=tan):

> p57 := plot([t+10,t-5,t=-6.4..-4.5],color=tan):

> p58 := plot([2.2*sin(t)+13,2.2*cos(t)+1, t=0..2*Pi],color=tan):

> p59 := plot([t+13,t,t=-1..4],color=brown,thickness=3):

> p60 := plot([t+14,t-.2,t=-1..4],color=brown,thickness=3):

> p61 := plot([t+12,t+2,t=-1..4],color=brown,thickness=3):

> p62 := plot([t+13,t+1.5,t=-1.7..4],color=brown,thickness=3):

> p63 := plot([t+13,t,t=4..5.5],color=black,thickness=6):

> p64 := plot([t+14,t-.2,t=4..5.5],color=black,thickness=6):

> p65 := plot([t+12,t+2,t=4..5.5],color=black,thickness=6):

> p66 := plot([t+13,t+1.5,t=4..5.5],color=black,thickness=6):

> p67 := plot([5*t,t-11.5,t=.9..2.3],color=green):

> p68 := plot([5*t+.5,t-13.5,t=.9..2.3],color=green):

> p69 := plot([-t+2.2,5*t,t=-2.1..-2.55],color=green):

> p70 := plot([-t+9.5,5*t+1.5,t=-2.1..-2.55],color=green):

> p71 := plot([sin(t)+6,3*t-20,t=1..2.5],color=tan):

> p72 := plot([sin(t)+11,3*t-28,t=3.8..5.5],color=tan):

> p73 := plot([sin(t)+7.5,3*t-33,t=3..5.5],color=tan):

> p74 := plot([sin(t)+9.9,3*t-25,t=.4..2.8],color=tan):

> p75 := plot([5*sin(t)+14,5*cos(t)-26,t=3.2..4],color=brown):

> p76 := plot([5*sin(t)+15,5*cos(t)-30,t=4.8..7.2],color=brown):

> p77 := plot([2.6*sin(t)+9.8,2.5*t-37, t=3..5.5],color=tan):

> p78 := plot([2*sin(t)+10.5,2*cos(t)-25.5, t=0..1.7],color=tan):

> p79 := plot([-t+22,t-39, t=-9.4..10],color=gray):

> p80 := plot([-t+26,t-37, t=-8..10],color=gray):

> p81 := plot([5*sin(t)+14,5*cos(t)-26,t=1.7..2.2],color=brown):

> p82 := plot([-t+35.2, 4*t-50, t=0..1.3],color=gray):

> p83 := plot([-3*t+35.2, t-50, t=0..1.3],color=gray):

> p84 := plot([-t+23.8,t-38, t=-8..9],color=gray):

> p85 := plot([-t+18.5,t-35, t=11..13.5],color=brown):

> p86 := plot([sin(t)+6.4,cos(t)-21.5, t=-1.5..(.5)],color=brown):

> p87 := plot([sin(t)+4.7,4*t-41, t=1.7..4],color=green):

> p88 := plot([-sin(t)-6.8,4*t-41, t=1.7..4],color=green):

> p89 := plot([3*t-15,sin(t)-35,t=2.4..7],color=green):

> p90 := plot([sin(t)+5, 2.2*t-41.4,t=0..3],color=tan):
p91 := plot([-sin(t)+2, 2.2*t-41.4,t=0..2.7],color=tan):
p92 := plot([-sin(t)-7, 2.2*t-41.4,t=0..3],color=tan):
p93 := plot([sin(t)-4, 2.2*t-41.4,t=0..2.7],color=tan):

> p94 := plot([2.8*sin(t)+3.5,1.3*cos(t)-40.5,t=1..5.4],color=brown):

> p95 := plot([2.8*sin(t)-5.6,1.3*cos(t)-40.5,t=1..5.4],color=brown):

> p96 := plot([sin(t)+6, 2*t-47, t=0..3],color=brown):

> p97 := plot([-sin(t)+1, 2*t-47, t=0..3],color=brown):

> p98 := plot([4*sin(t)+7,2.5*cos(t)-49.4,t=-.5..2],color=brown):

> p99 := plot([t,-50.5, t=1..11],color=brown):

> p100 := plot([-sin(t)+1, 2*t-51, t=0.2..2.5],color=brown):

> p101 := plot([-2.8*sin(t)+3.5,1.3*cos(t)-40.5,t=1..5.4],color=brown):

> p102 := plot([-2.8*sin(t)-5.6,1.3*cos(t)-40.5,t=1..5.4],color=brown):

> p103 := plot([-sin(t)-8, 2*t-47, t=0..3],color=brown):

> p104 := plot([sin(t)-3, 2*t-47, t=0..3],color=brown):

> p105 := plot([-4*sin(t)-7.4,2.5*cos(t)-49.4,t=-.5..2],color=brown):

> p106:= plot([t,-50.5, t=-3..-11],color=brown):

> p107 := plot([sin(t)-3, 2*t-51, t=0.2..2.5],color=brown):

>

>

>

>

>

>

> 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);

>

>

>

>