<?xml version="1.0" encoding="UTF-8"?>
<Worksheet><Version major="6" minor="1"/><View-Properties><Zoom percentage="200"/></View-Properties><Styles><Layout alignment="left" bullet="none" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Normal" rightmargin="0.0" spaceabove="0.0" spacebelow="0.0"/><Layout alignment="centred" bullet="none" name="Maple Plot"/><Font background="[0,0,0]" bold="true" executable="true" family="Monospaced" foreground="[255,0,0]" name="Maple Input" opaque="false" size="12"/><Font background="[0,0,0]" bold="false" executable="false" family="Lucida Bright" foreground="[0,0,0]" italic="false" name="Text" opaque="false" size="12" underline="false"/></Styles><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">read("turtle.txt"):</Text-field></Input><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">ResetTurtle();</Text-field></Input><Input><Text-field prompt="&gt; " style="Maple Input"/></Input><Input><Text-field prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Text">EXERCISE: Create an arbitrary sequence of F, B, R, and L,  with 8 letters and use it as Turtle Command.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">myseq:='FFFFFFFFFRF';</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">TurtleCmd(myseq);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">In order to "glue" sequences of letters together we use the maple comand "cat". EXAMPLE</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">cat('F','RR');</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Maple has a comand to produce sequences</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">qq:=seq(x^i,i=2..4);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">cat(qq);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">aa:=seq('FLFR',i=1..6);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Then we can "glue" the elements of our sequence with the cat command.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">fig:=cat(aa);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">TurtleCmd(fig);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">triang:=proc()
SetTurtleAngle(60):
TurtleCmd(BRFRB):
end proc;</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">SetInitialTurtleHeading(90):
triang();</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">EXERCISE: Draw</Text-field><Text-field layout="Normal" style="Text"/><Text-field layout="Normal" style="Text">1. A decagon</Text-field><Text-field layout="Normal" style="Text">2. A polygon of n sides</Text-field><Text-field layout="Normal" style="Text">3. A circle</Text-field><Text-field layout="Normal" style="Text">4. Two polygons of n sides with a common edge.</Text-field><Text-field layout="Normal" style="Text"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">polyg:=proc(n)
SetTurtleAngle(360/n):
TurtleCmd(cat(seq(FL,i=1..n)));
end proc;</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">polyg(20);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Text">An interesting picture from the book.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">SetTurtleAngle(30);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">TurtleCmd(cat(seq(cat(R,seq(FR,i=1..12)),j=1..12)));</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">With the above intructions, change some of the parameters (angle, number of iterations for i, or j) and try to understand the results.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Text">EXERCISE </Text-field><Text-field layout="Normal" style="Text">1. Draw the figures corresponding to the sequences FRSFR and FFRF and compare them. </Text-field><Text-field layout="Normal" style="Text">Can you deduce what S does?
</Text-field><Text-field layout="Normal" style="Text">2. Draw the figures corresponding to the sequences FRGFR and FRFF and compare them. </Text-field><Text-field layout="Normal" style="Text">Can you deduce what G does?</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Scaling</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Draw the picture corresponding to the next sequence of letters, execute the command SetTurtleScale(0.8) and draw the picture again. What can you deduce from the results?</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Output><Text-field layout="Maple Plot"><Plot height="400" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="400">LSUlUExPVEc2JS0lJ0NVUlZFU0c2JDctNyQiIiFGKjckJCIrSy0lKnBaISM3JEYqRio3JCQiK0pMXi0nKUYuJCEraEZbblhGLjckJCIrbHpJM3RGLiQhKzInRzI+IiEjNjckJCEqO2EkKWYoRi4kISslM1ZsbCJGOjckJCErMScqR3E2RjokISteI1sjZTdGOjckJCErWyJlIm87RjokIipHVmo0IkY6NyQkISssRGskZShGLiQiKyRlVmFvIkY6NyQkIitnZmMiWyJGOiQiKzlQUyEzI0Y6NyQkIitpOV5mT0Y6JCIqYC8qR0RGOjckJCIrazleZk9GOiQhK2Y+KjRJJEY6LSUmQ09MT1JHNiYlJFJHQkckRiohIiJGXG9GXG8tJSpBWEVTU1RZTEVHNiMlJU5PTkVHLSUoU0NBTElOR0c2IyUsQ09OU1RSQUlORURH</Plot></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Text-field/><Text-field/><Text-field/><Text-field/><Text-field/><Text-field/><Text-field/></Worksheet>