>	with(plots):

Warning, the name changecoords has been redefined

>	with(student):

>	p1:=plot([10*sin(t)+0.8, 10*cos(t)+0.39,t=4.3..5.2], thickness=2, scaling=constrained):

>	p2:=plot([3*sin(t)-4.9, 3*cos(t)-4.3,t=4.2..4.9], color=blue,thickness=3,scaling=constrained):

>	p3:=plot([t-4, -3.7,t=0..-4.3], thickness=2, scaling=constrained):

>	p4:=plot([t-4, -12*t-3.7, t=0..(-63/100)], thickness=2, scaling=constrained):

>	p5:=plot([t-7.5, -18*t-5.8, t=0..(25/100)], scaling=constrained, thickness=3,color=blue):

>	p6:=plot([2.4*sin(t)-6, 2.4*cos(t)-3.9,t=1.5..2.5], thickness=3,scaling=constrained, color=blue):

>	p7:=plot([t-4.4, 10*t-5.8, t=0..(-50/100)], scaling=constrained,thickness=3, color=blue):

>	p8:=plot([3*sin(t)-5.7, 3*cos(t)+7,t=3..4], thickness=2, scaling=constrained):

>	p9:=plot([3*sin(t)-6.1, 3*cos(t)+6.2,t=2.95..4], thickness=2, scaling=constrained):

>	p10:=plot([t-5.23, 3*t+4.05, t=0..(-27/100)], thickness=2, scaling=constrained):

>	p11:=plot([t-4.7, -0.5*t+3.8, t=0..-0.6], thickness=2, scaling=constrained):

>	p12:=plot([10*sin(t)-17, 10*cos(t)+1,t=1.4..1.75], thickness=2, scaling=constrained):

>	p13:=plot([t-7.23, -1.5*t-0.8, t=0..0.9], thickness=2, scaling=constrained):

>	p14:=plot([t-9.23, -0.8*t-0.8, t=0..2.3], thickness=2, scaling=constrained):

>	p15:=plot([t-5.63, 0.8*t-1.7, t=0..-1.7], thickness=2, scaling=constrained):

>	p16:=plot([t-4, 0.2*t-3.7, t=0..0.8], thickness=2, scaling=constrained):

>	p17:=plot([t-3.2, -20*t-3.6, t=0..(-37/100)], thickness=2, scaling=constrained):

>	p18:=plot([t-4, -18*t-5.2, t=0..(9/100)], scaling=constrained, thickness=3,color=blue):

>	p19:=plot([t-3.95, 21*t-6.7, t=0..(-20/100)], scaling=constrained ,thickness=3, color=blue):

>	p20:=plot([t-4.1,abs(t)+3.37, t=-0.5..0.5], scaling=constrained, color=gray,thickness=2):

>	p21:=plot([0.5*sin(t)-3.4, 0.5*cos(t)+3.8,t=1..3],thickness=2):

>	p22:=plot([t-3.6, -2*t+3.9, t=0..(31/100)],thickness=2):

>	p23:=plot([t-3.0,55*t-3.5, t=0..(13.5/100)],thickness=2):

>	p24:=plot([t-3.85,-18*t+3.5, t=0..(38/100)],color=gray, thickness=9):

>	p25:=plot([t-4.3,-12*t+3.5, t=0..(57.5/100)],color=gray, thickness=9):

>	p26:=plot([t-3.21, 0.2*t-3.58, t=0..0.25],thickness=2):

>	p27:=plot([2.7*sin(t)-5.0, 2.7*cos(t)-0.8,t=1.3..2.3], thickness=2, scaling=constrained):

>	p28:=plot([t-2.9, -4*t+1.8,t=0..0.5],thickness=2):

>	p29:=plot([0.4*cos(t)-4.0, 0.4*sin(t)+4.0,t=-0.3..1.3], thickness=2, scaling=constrained):

>	p30:=plot([0.7*cos(t)-3.6, 0.7*sin(t)+4.0,t=-0.3..1.9], thickness=2, scaling=constrained):

>	p31:=plot([3*cos(t)-6.8, 3*sin(t)+4.2, t=-0.15..0.27],color=tan, thickness=3):

>	p32:=plot([3.3*cos(t)-10, 3.3*sin(t)+5.6, t=-0.4..0.45],color=tan, thickness=3):

>	p33:=plot([0.4*cos(t)-4.0, 0.4*sin(t)+5.4,t=0.1..-1.3],color=tan, thickness=3):

>	p34:=plot([4*cos(t)-3.4,2*sin(t)+7.4,t=-1.6..-1.9],color=tan, thickness=3):

>	p35:=plot([t-4.7, 5*t+5.2,t=0..0.1],color=tan, thickness=3):

>	p36:=plot([0.5*cos(t)-3.3,0.5*sin(t)+5.9,t=-0.6..-1.9],color=tan, thickness=3):

>	p37:=plot([t-2.8,-1*t+5.6,t=0..-0.5],color=tan, thickness=3):

>	p38:=plot([-30*t^2-3.0,t+6.4,t=-0.15..0.15],color=tan, thickness=3):

>	p39:=plot([t-3.7,-1*t+6.6,t=0..-0.5],color=tan, thickness=3):

>	p59:=plot([cos(t)-3,sin(t)+8.3,t=2.8..3.4],color=tan, thickness=3):

>	p40:=plot([0.3*cos(t)-4.0,0.4*sin(t)+7.5,t=0..2*Pi],color=black):

>	p41:=plot([0.3*cos(t)-4.65,0.4*sin(t)+7.5,t=0..2*Pi],color=black):

>	p42:=plot([t-4.45,t+7.5,t=0..0.05],color=black, thickness=3):

>	p43:=plot([t-3.84,t+7.5,t=0..0.05],color=black, thickness=3, scaling=constrained):

>	p44:=plot([t-6.5,-t^2+7.5,t=-0.7..0.6],color=red,thickness=2):

>	p45:=plot([-cos(2*t)-t-4.1,t+4.4,t=2.6..4.4],color=red,thickness=2):

>	p46:=plot([t-7.6,-t+8.8,t=0..-.5],color=red,thickness=2):

>	p47:=plot([t-7.0,-t+9.2,t=0..-.5],color=red,thickness=2):

>	p48:=plot([t-7.4,2.8*t+abs(3*t)+9.06,t=-0.5..0.11],color=red,thickness=2):

>	p49:=plot([2*cos(t)-5.4,2*sin(t)+8.2,t=1.4..2.6],color=red,thickness=2):

>	p50:=plot([t-5.1,-0.2*t+10.2,t=0..1.65],color=red,thickness=2):

>	p51:=plot([1*cos(t)-4.0,1*sin(t)+10.8,t=-1..0.6],color=red,thickness=2):

>	p52:=plot([2*cos(t)-3.8,2*sin(t)+9.4,t=0.4..1.3],color=red,thickness=2):

>	p53:=plot([1*cos(t)-2.8,1*sin(t)+10.6,t=-0.5..0.4],color=red,thickness=2):

>	p54:=plot([-(0.7*t)^4-1.7,t+9.95,t=-1.35..1],color=red,thickness=2):

>	p55:=plot([t-2.5,-0.1*t+8.6,t=0..-2.6],color=red,thickness=2):

>	p56:=plot([cos(t)-6.1,sin(t)+8.89,t=0..-0.8],color=red,thickness=2):

>	p57:=plot([t-5.4,8.15,t=0..-0.7],color=red,thickness=2):

>	p58:=plot([cos(t)-6.9,sin(t)+7.8,t=-0.5..0.5],color=red,thickness=2):

>	p60:=plot([0.4*cos(t)-6.3,0.4*sin(t)+6.9,t=1.4..1.85*Pi],color=tan,thickness=2):

>	p61:=plot([0.2*cos(t)-6.3,0.2*sin(t)+6.9,t=2.3..2*Pi],color=tan,thickness=2):

>	p62:=plot([t-8,5,t=0..1],thickness=2):

>	p63:=plot([t+2,1,t=-1.5..3.5],color=green,thickness=2):

>	p64:=plot([cos(t)+3,10*sin(t)+1,t=1*Pi..2.5*Pi/4],color=green,thickness=2):

>	p65:=plot([cos(t)+3,10*sin(t)+1,t=2.5*Pi/4..0],color=green,thickness=2):

>	p82:=plot([t+0.5,t+1,t=0..1.5],color=green,thickness=2):

>	p83:=plot([t+5.5,-t+1,t=0..-1.5],color=green,thickness=2):

>	p66:=plot([sin(3*t)+2.5,t+1,t=0..-2/3*Pi]):

>	p67:=plot([sin(3*t)+2.7,t+1,t=0..-2/3*Pi]):

>	p68:=plot([sin(3*t)+2.9,t+1,t=0..-2/3*Pi]):

>	p69:=plot([sin(3*t)+3.1,t+1,t=0..-2/3*Pi]):

>	p70:=plot([sin(3*t)+3.3,t+1,t=0..-2/3*Pi]):

>	p71:=plot([sin(3*t)+3.5,t+1,t=0..-2/3*Pi]):

>	p72:=plot([sin(3*t)+3.7,t+1,t=0..-2/3*Pi]):

>	p73:=plot([sin(3*t)+3.9,t+1,t=0..-2/3*Pi]):

>	p74:=plot([cos(3*t)+1.7,t+1,t=0..-2/3*Pi]):

>	p75:=plot([cos(3*t)+1.9,t+1,t=0..-2/3*Pi]):

>	p76:=plot([cos(3*t)+2.1,t+1,t=0..-2/3*Pi]):

>	p77:=plot([cos(3*t)+2.3,t+1,t=0..-2/3*Pi]):

>	p78:=plot([cos(3*t)+2.5,t+1,t=0..-2/3*Pi]):

>	p79:=plot([cos(3*t)+2.7,t+1,t=0..-2/3*Pi]):

>	p80:=plot([cos(3*t)+2.9,t+1,t=0..-2/3*Pi]):

>	p81:=plot([cos(3*t)+3.1,t+1,t=0..-2/3*Pi]):

>

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

>

>