>	with(plots):

Warning, the name changecoords has been redefined

>	p1:=plot([x,2,x=-9..-4.75], color=blue, scaling=constrained):

>	p2:=plot([x,2,x=4.75..9], color=blue):

>	p3:=plot([-cos((.75)*y)+4,y-1.25,y=4.2..8.6], color=green):

>	p4:=plot([cos((.75)*y)-4,y-1.25,y=4.2..8.6], color=green):

>	p15:=plot([-cos((.75)*y)+4,y-1.25,y=3.25..4.2], color=blue):

>	p16:=plot([cos((.75)*y)-4,y-1.25,y=3.25..4.2], color=blue):

>	p5:=plot([x,-x+11,x=8..9], color=blue):

>	p6:=plot([x,x+11,x=-9..-8], color=blue):

>	p7:=plot([x,3,x=6..8], color=blue):

>	p8:=plot([x,3,x=-8..-6], color=blue):

>	p9:=plot([x,-4.5*x+30,x=4.875..6], color=green):

>	p10:=plot([x,4.5*x+30,x=-6..-4.875], color=green):

>	p11:=plot([12*cos(t),12*sin(t)+19,t=4.233..5.2], color=red):

>	p12:=plot([4*cos(t),4*sin(t)+16,t=3..6.4], color=red):

>	p13:=plot([x,-3*x+25,x=3.75..5.58], color=red):

>	p14:=plot([x,3*x+25,x=-5.58..-3.75], color=red):

>	p17:=plot([4.4*cos(t),4.4*sin(t)+16,t=3.7..5.75], color=black, thickness=12):

>	p18:=plot([cos(t)+5.5,sin(t)+3.9,t=4.233..5.2], color=green):

>	p19:=plot([cos(t)-5.5,sin(t)+3.9,t=4.233..5.2], color=green):

>	p20:=plot([x,-x+20,x=4..7], color=red):

>	p21:=plot([x,x+20,x=-7..-4], color=red):

>	p22:=plot([x,2*x-1,x=7..8.5], color=red):

>	p23:=plot([x,-2*x-1,x=-8.5..-7], color=red):

>	p24:=plot([x,-(.75)*x+22.35,x=4..8.5], color=red):

>	p25:=plot([x,(.75)*x+22.35,x=-8.5..-4], color=red):

>	p26:=plot([x,-(.2*x)^4+19.75,x=-4..4], color=red):

>	p27:=plot([cos(t)+9.25,sin(t)+13.4,t=1.2..2], color=orange):

>	p28:=plot([cos(t)-9.25,sin(t)+13.4,t=1.2..2], color=orange):

>

>	p87:=plot([cos(t)+9.25,sin(t)+13.4,t=3.1..4.9], color=orange):

>	p88:=plot([cos(t)-9.25,sin(t)+13.4,t=4.6..6.28], color=orange):

>

>	p89:=plot([cos(t)+9.25,sin(t)+13.4,t=0.2..0.7], color=orange):

>	p90:=plot([cos(t)-9.25,sin(t)+13.4,t=2.4..2.9], color=orange):

>

>	p91:=plot([cos(t)+9.25,sin(t)+13.4,t=6.1..6.2], color=orange):

>	p92:=plot([cos(t)-9.25,sin(t)+13.4,t=3.2..3.4], color=orange):

>

>

>	p29:=plot([x,-(.75)*x+21,x=8.03..8.9], color=orange):

>	p30:=plot([x,(.75)*x+21,x=-8.9..-8.03], color=orange):

>	p31:=plot([x,-(.75)*x+19.5,x=7.45..8.29], color=orange):

>	p32:=plot([x,(.75)*x+19.5,x=-8.29..-7.45], color=orange):

thumbs:

>	p33:=plot([x,(.5)*x+9.5,x=9.6..10.75], color=orange):

>	p34:=plot([x,-(.5)*x+9.5,x=-10.75..-9.6], color=orange):

>	p35:=plot([x,(.5)*x+9,x=10..11], color=orange):

>	p36:=plot([x,-(.5)*x+9,x=-11..-10], color=orange):

>	p53:=plot([.21*cos(t)+10.875,.21*sin(t)+14.7,t=5.23..8.38], color=orange):

>	p54:=plot([.21*cos(t)-10.875,.21*sin(t)+14.7,t=1.05..4.19], color=orange):

pinkies :

>	p37:=plot([x,-.5*x+17,x=9.3..10.4], color=orange):

>	p38:=plot([x,(.5)*x+17,x=-10.4..-9.3], color=orange):

>	p39:=plot([x,-.5*x+17.33,x=9.75..10.6], color=orange):

>	p40:=plot([x,(.5)*x+17.33,x=-10.6..-9.75], color=orange):

>	p55:=plot([.13*cos(t)+10.5,.13*sin(t)+11.9,t=(4*Pi)/3..(7*Pi)/3], color=orange):

>	p56:=plot([.13*cos(t)-10.5,.13*sin(t)+11.9,t=(2*Pi)/3..(5*Pi)/3], color=orange):

middle fingers:

>	p41:=plot([x,-.25*x+15.75,x=10.21..11.8], color=orange):

>	p42:=plot([x,(.25)*x+15.75,x=-11.8..-10.21], color=orange):

>	p43:=plot([x,-.25*x+15.4,x=10.15..11.75], color=orange):

>	p44:=plot([x,(.25)*x+15.4,x=-11.75..-10.15], color=orange):

>	p57:=plot([.15*cos(t)+11.775,.15*sin(t)+12.6,t=(3/2)*Pi..(5*Pi)/2], color=orange):

>	p58:=plot([.15*cos(t)-11.775,.15*sin(t)+12.6,t=Pi/2..(3/2)*Pi], color=orange):

index fingers:

>	p45:=plot([x,13.3,x=10.25..11.75], color=orange):

>	p46:=plot([x,13.3,x=-11.75..-10.25], color=orange):

>	p47:=plot([x,13.7,x=10.2..11.75], color=orange):

>	p48:=plot([x,13.7,x=-11.75..-10.2], color=orange):

>	p59:=plot([.18*cos(t)+11.75,.18*sin(t)+13.5,t=(3/2)*Pi..(5*Pi)/2], color=orange):

>	p60:=plot([.18*cos(t)-11.75,.18*sin(t)+13.5,t=Pi/2..(3/2)*Pi], color=orange):

ring fingers:

>	p49:=plot([x,-.375*x+16.55,x=10..11.35], color=orange):

>	p50:=plot([x,.375*x+16.55,x=-11.35..-10], color=orange):

>	p51:=plot([x,-.375*x+16.2,x=9.8..11.15], color=orange):

>	p52:=plot([x,.375*x+16.2,x=-11.15..-9.8], color=orange):

>	p61:=plot([.15*cos(t)+11.25,.15*sin(t)+12.15,t=(4*Pi)/3..(7*Pi)/3], color=orange):

>	p62:=plot([.15*cos(t)-11.25,.15*sin(t)+12.15,t=(2*Pi)/3..(5*Pi)/3], color=orange):

>	p63:=plot([x,.8*x^2+20.7,x=-2..2], color=orange):

>	p64:=plot([x,2.43*x+24,x=-1.75..-1], color=orange):

>	p65:=plot([x,-2.43*x+24,x=1..1.75], color=orange):

>	p66:=plot([x+.9,.8*x^2+22.7,x=-.5..0.5], color=black):

>	p67:=plot([x+.9,-.8*x^2+23,x=-.5..0.5], color=black):

>	p68:=plot([x-.9,.8*x^2+22.7,x=-.5..0.5], color=black):

>	p69:=plot([x-.9,-.8*x^2+23,x=-0.5..0.5], color=black):

>	p70:=plot([.13*cos(t)+.9,.13*sin(t)+22.85,t=0..2*Pi], color=blue):

>	p71:=plot([.13*cos(t)-.9,.13*sin(t)+22.85,t=0..2*Pi], color=blue):

>	p72:=plot([x,-.1*cos(10*x)+21.5,x=-0.5..0.5], color=red):

>	p73:=plot([x,-2*x+22.65,x=-.2..0.3], color=orange):

>	p74:=plot([x,22,x=-.2..0.3], color=orange):

the fingernails:

>	p75:=plot([x+8,cos(1*x)+x+12.81,x=3..10], color=black):

>	p76:=plot([x-11.06,-sin(x)-x+14.77,x=-10..0], color=black):

>	p77:=plot([x+11.93,-sin(x)+x+13.5,x=0..10], color=black):

>	p78:=plot([x-21.92,.3*sin(2*x)-.5*x+18.35,x=1..10], color=black):

>	p79:=plot([x-20.4,.5*cos(x)+.5*x+8.1,x=-1.5..9], color=black):

>	p80:=plot([x+10.4,-sin(x)-x+11.9,x=0..8], color=black):

>	p81:=plot([x,-.4*cos(x)+12.8,x=-24..-12], color=black):

>	p82:=plot([x-18.6,x+sin(x)+3,x=0..8], color=black):

>	p83:=plot([x+10.5,.3*sin(2*x)-.5*x+12.3,x=.9..10], color=black):

>	p84:=plot([x+10.9,cos(.75*x)+.35*x+11.5,x=1..13], color=black):

>	p85:=plot([8*sin(x),8*cos(x)+24,x=3.9..8.65], color=yellow):

>	p86:=plot([x,.3*cos(3*x)+23.6,x=-2..2], color=yellow):

>

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

>