{VERSION 3 0 "IBM INTEL NT" "3.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Outpu t" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Title" 0 18 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 1 0 0 0 0 0 0 }3 0 0 -1 12 12 0 0 0 0 0 0 19 0 }} {SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT -1 10 "ENGRENAGES" }}{PARA 11 " " 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 79 "Repr\351se ntation param\351trique des d\351veloppantes de cercles, tourn\351es d 'un angle t" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "X:=(u,t)->co s(u-t)+u*sin(u-t):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "Y:=(u ,t)->u*cos(u-t)-sin(u-t):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 47 "On dessine un cercle de rayon 1 centr\351 en (0,0)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "Cercle:=plot([cos(u),sin(u),u=0..2*Pi],color=blue):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 30 "On anime un diam\350tre du cerc le" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 68 "Diametre:=animate([co s(t)*u,sin(t)*u,u=-1..1],t=0..2*Pi,color=blue):" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 " " {TEXT -1 90 "Develop(i) anime une came en forme de d\351veloppantes \+ de cercle, tourn\351e de i quarts de tour" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 82 "Develop:=i->animate([X(u,t+i*Pi/2),Y(u,t+i*Pi/2),u= 0..Pi/2],t=0..2*Pi,color=blue):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 43 "On dessine une verticale tangente au cercle" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 43 "Verticale:=plot([1,u,u=-3..3],color=black):" } }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 58 "Segment(i) anime un segment hori zontal soulev\351 par la came" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 86 "Segment:=i->animate([u,-Pi+2*Pi*frac(t/(2*Pi)+i/4),u=1/2..3/2],t =0..2*Pi,color=black):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 113 " display(\{Cercle,Diametre,Verticale,seq(Develop(i),i=1..4),seq(Segment (i),i=1..4)\},axes=none,scaling=CONSTRAINED);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 80 "On dessine un autre cercle de rayon 1 centr\351 en (2, Pi/2) avec son diam\350tre anim\351" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "Cercle2:=plot([cos(u)+2,sin(u)+Pi/2,u=0..2*Pi],color= red):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 89 "Diametre2:=animate ([2+cos(3*Pi/2-t)*u,Pi/2+sin(3*Pi/2-t)*u,u=-1..1],t=0..2*Pi,color=red) :" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 49 "On animent quatre cames li \351es \340 ce nouveau cercle" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 91 "Develop2:=i->animate([2+X(u,-t-i*Pi/2),Y(u,-t-i*Pi/2)+Pi/2,u=0.. Pi/2],t=0..2*Pi,color=red):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 155 "display(\{Cercle,Di ametre,Verticale,seq(Develop(i),i=1..4),seq(Segment(i),i=1..4),Cercle2 ,Diametre2,seq(Develop2(i),i=1..4)\},axes=none,scaling=CONSTRAINED);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 122 "display(\{Cercle,Diametre,seq(Develop(i),i=1..4 ),Cercle2,Diametre2,seq(Develop2(i),i=1..4)\},axes=none,scaling=CONSTR AINED);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "17 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }