(*********************************************************************** Mathematica-Compatible Notebook This notebook can be used on any computer system with Mathematica 3.0, MathReader 3.0, or any compatible application. The data for the notebook starts with the line of stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. ***********************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 129603, 3642]*) (*NotebookOutlinePosition[ 130658, 3678]*) (* CellTagsIndexPosition[ 130614, 3674]*) (*WindowFrame->Normal*) Notebook[{ Cell[TextData["Name: Kathleen Smith\n"], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[{ StyleBox[ "Title: SURF'S UP!\n ", Evaluatable->False, AspectRatioFixed->False], StyleBox["A Look at the Sine and Cosine Waves", Evaluatable->False, AspectRatioFixed->False, FontSlant->"Italic"] }], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "Description:\n This notebook is a look at the Sine and Cosine \ waves and the parameters that determine the shape of the graphs.\n\n\n\n"], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[" "], "Input", AspectRatioFixed->False], Cell[TextData[StyleBox["SURF'S UP!", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Palatino", FontSize->48]], "Title", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[StyleBox["A LOOK AT THE SINE AND COSINE WAVES\n", Evaluatable->False, AspectRatioFixed->False, FontSize->14, FontSlant->"Italic"]], "Subtitle", Evaluatable->False, AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData["Introduction"], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[StyleBox[ " Most of you by now will know that the Sine and Cosine functions will \ graph as waves when shown on an xy plane. The waves look very much alike. \ How can we tell if the graph is a Sine or Cosine wave? How could we make two \ different waves overlap? By going through this lesson you will learn some \ techniques to help you match a wave with it's graph. ", AspectRatioFixed->False, FontWeight->"Plain"]], "Input", AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData["Let's Get Started"], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[{ StyleBox[" Let's look first at the basic Sine wave. \n (", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["The x axis will be measured in radians.", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontSlant->"Italic"], StyleBox[")\n ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData["Plot[Sin [x], {x,-3,3}]"], "Input", AspectRatioFixed->False], Cell[TextData[ " Notice that the wave is negative from -3 to the origin, zero at the \ origin and positve from the origin to 3. This agrees with the values that we \ saw in the unit circle, since from -3 to zero would be most of the third and \ all of the fourth quardrant and from zero to three would be all of the first \ and most of the second quadrant.\n Now let's look at the Cosine wave. \ "], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData["coswave=Plot[Cos [x], {x, -3,3}]"], "Input", AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData[ " This wave starts out negative, goes positive and back negative again, but \ this, too, agrees with our unit circle. See if you can determine where the \ four quardants begin and end."], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "labels1 = Graphics[Text[\"4th\",{-1,.25}]]\nlabels2 = \ Graphics[Text[\"3rd\",{-2.5,-.5}]]\nlabels3 = Graphics[Text[\"1st\",{.5,.5}]]\ \nlabels4 = Graphics[Text[\"2nd\",{2.5,-.25}]]\n\ Show[coswave,labels1,labels2,labels3,labels4]"], "Input", AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData[{ StyleBox[" Now let's plot the two waves together,(", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["the Sine will look darker than the Cosine.", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontSlant->"Italic"], StyleBox[")\n ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "Plot [{Sin[x], Cos[x]}, \ {x,-3,3},PlotStyle->{Thickness[.01],Thickness[.004]}]"], "Input", AspectRatioFixed->False]}, Open]], Cell[TextData[ " So, how would I know which was Sine and which Cosine if one were not \ thicker than the other? \n Also,these are just the basic waves. What \ if I wanted to make changes to one of them so that it would be higher than \ the other, more rapid than the other,or lie exactly on top of the other? Do \ you remember how to do that? Maybe we should start with a brief review. \ There is one in the next section......."], "Text", Evaluatable->False, AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData["Review"], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[{ StyleBox["\n ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[ " If you recall, the standard forms for the Sine and Cosine waves are:", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["\n ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["\[Florin]", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Times", FontSize->14], StyleBox["(x) = ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox["Sin(", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["b", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox["x\[Dash]+", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["c", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[")+", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["d", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[" ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["and ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["\[Florin]", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Times", FontSize->14], StyleBox["(x)=", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox["Cos(", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["b", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox["x\[Dash]+", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["c", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[")+", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["d", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox["\n But what do each of the parameters,", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[" a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[",", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["b", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[",", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["c", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[" and ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["d", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[" do to the wave?", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData["a"], "Subsection", Evaluatable->False, AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData[{ StyleBox[" ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[" a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[" affects the amplitude, (", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[ "or how high above and below the horizontal axis the wave will rise and \ fall.", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontSlant->"Italic"], StyleBox["). The effect of ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[" is direct, that is, if ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ "=1 then you get the standard height (which is one unit above and one unit \ below the horizontal.), if |", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ "|>1 you get a wave that is higher and lower than the standard by a factor \ of", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[" a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[". If |", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ "|<1 then you get a wave that is only a fraction of the standard height by \ a factor of ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[".\n And there is a very good reason for why I put", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[" a ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox["in the absolute value symbol, do you remember why?", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "\n\t\tThat's right, because if a>0 you get a wave that moves in the standard \ direction (counterclockwise with the origin at due East or 0\:201a on the \ unit circle). If a<0 you still get a counterclockwise wave, but it starts at \ due West or 180\:201a. Got that? \n\t\tWell, let's look at some \ examples."], "Text", Evaluatable->False, AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData["Examples\n"], "Subsection", Evaluatable->True, AspectRatioFixed->False], Cell[TextData[ "Clear[x,a]\nswave = Plot[{Sin[x],2Sin[x],-3Sin[x]},\n {x,-3,3},\n\ PlotStyle->{{Thickness[.004],GrayLevel[0]},\n \ {Thickness[.006],GrayLevel[.9]},\n \ {Thickness[.008],GrayLevel[0]}}];\n\n"], "Input", AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData[ " Which wave do you think is Sin(x)?\n Which -3Sin(x)?\n Which \ 2Sin(x)?"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "labels1 = Graphics[Text[\"Sin(x)\",{1.5,.5}]]\nlabels2 = \ Graphics[Text[\"2Sin(x)\",{2.5,1.75}]]\nlabels3 = \ Graphics[Text[\"-3Sin(x)\",{1,-1}]]\nShow[swave,labels1,labels2,labels3]"], "Input", AspectRatioFixed->False]}, Open]]}, Open]]}, Open]], Cell[CellGroupData[{Cell[TextData["b"], "Subsection", Evaluatable->True, AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData[{ StyleBox["\n", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[" b", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ " affects the period, (or speed) of the function. After you plug in a \ value for x, it will multiplied by the value ", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["b", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[" before the Sine or Cosine is computed. ", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["b", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ " has an inverse effect on the period, that is, if b>1 then the period is \ shortened and if b<1 the period is lengthened. (", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["We will not deal with negative values of ", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago", FontSlant->"Italic"], StyleBox["b ", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold", FontSlant->"Italic"], StyleBox["in this lesson.", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago", FontSlant->"Italic"], StyleBox[")\n Let's look at some examples. ", Evaluatable->True, AspectRatioFixed->False, FontFamily->"Chicago"] }], "Text", Evaluatable->True, AspectRatioFixed->False], Cell[TextData[ "Clear[f,g,x]\nbwave=Plot[{Cos[x],Cos[2x],Cos[.25x]},{x,-7,7}, \ PlotStyle->{{Thickness[.004],GrayLevel[0]},\n \ {Thickness[.006],GrayLevel[.9]},\n \ {Thickness[.008],GrayLevel[0]}}]\n"], "Input", AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData[ "\n Which graph do you think is Cos(x)?\n Which Cos(2x)?\n Which \ Cos (.25X)?\n \n "], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "labels1 = Graphics[Text[\"Cos(x)\",{3.,-1.1}]]\nlabels2 = \ Graphics[Text[\"Cos(2x)\",{5.75,-.5}]]\nlabels3 = \ Graphics[Text[\"Cos(.25x)\",{1,1.1}]]\nShow[bwave,labels1,labels2,labels3]"], "Input", AspectRatioFixed->False]}, Open]]}, Open]], Cell[CellGroupData[{Cell[TextData["c"], "Subsection", Evaluatable->False, AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData[{ StyleBox["\n ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["c", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ " causes the wave to shift either to the left or right. The effect is \ inverse, that is, if ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["c", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontVariations->{"CompatibilityType"->"Superscript"}], StyleBox[ " is positve the wave moves that many units to the left of the standard \ position on the x-axis, and if ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["c", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontVariations->{"CompatibilityType"->"Superscript"}], StyleBox[ " is negative it moves that many units to the right.\n Look at the \ folowing examples.", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "cwave=Plot[{Sin[x],Sin[x+(Pi/2)],Sin[x-(Pi/4)]},{x,-3,3},PlotStyle->{{\ Thickness[.004],GrayLevel[0]},{Thickness[.006],GrayLevel[.9]},\n\ {Thickness[.008],GrayLevel[0]}}]\n"], "Input", AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData[ "\n Which do you think is Sin(x)?\n Which Sin(x+(`/2))?\n Which \ Sin(x-(`/4))?"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[{ StyleBox["labels1 = Graphics[Text[\"", AspectRatioFixed->False], StyleBox["Sin(x)", AspectRatioFixed->False, FontWeight->"Plain"], StyleBox["\",{-.75,-.25}]]\nlabels2 = Graphics[Text[\"", AspectRatioFixed->False], StyleBox["Sin(x-(Pi/4)", AspectRatioFixed->False, FontWeight->"Plain"], StyleBox["\",{1,-.75}]]\nlabels3 = Graphics[Text[\"", AspectRatioFixed->False], StyleBox["Sin(x+(Pi/2)", AspectRatioFixed->False, FontWeight->"Plain"], StyleBox["\",{1,1.1}]]\nShow[cwave,labels1,labels2,labels3]", AspectRatioFixed->False] }], "Input", AspectRatioFixed->False]}, Open]]}, Open]], Cell[CellGroupData[{Cell[TextData["d"], "Subsection", Evaluatable->False, AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData[{ StyleBox["\n ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["d", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ " moves the horizontal axis of the wave up or down. The horizontal for the \ standard wave is the x-axis and adding a ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["d", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[" to the function shifts it. The effect is direct. If ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["d", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ " is positive the horizontal moves up that many units, and if it is \ negative it moves down. Look at the following examples.", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "dwave=Plot[{Cos[x],Cos[x]+2,Cos[x]-1},{x,-3,3},PlotStyle->{{Thickness[.004],\ GrayLevel[0]},{Thickness[.006],GrayLevel[.9]},\n\ {Thickness[.008],GrayLevel[0]}}]"], "Input", AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData[ "\n Which do you think is Cos(x)?\n Which Cos(x)+2?\n Which Cos(x)-1?"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "labels1 = Graphics[Text[\"Cos(x)\",{1,1}]]\nlabels2 = \ Graphics[Text[\"Cos(x)+2\",{1,2.75}]]\nlabels3 = \ Graphics[Text[\"Cos(x)-1\",{.5,-.75}]]\nShow[dwave,labels1,labels2,labels3]"], "Input", AspectRatioFixed->False]}, Open]]}, Open]]}, Open]], Cell[CellGroupData[{Cell[TextData["Practice"], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData[{ StyleBox[ "\n Well, now you should have at least an idea of how to make a wave do \ what you want. Let's look at a few examples and see if you can find a match. \ When you have decided which function you think matches the given graph, \ enter your choice on the line that says ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["Choice=", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "ex1:=Plot[3Sin[2x]-1,{x,-4,4}, DisplayFunction->Identity]\n\ ex2:=Plot[Cos[x+Pi],{x,-4,4}, DisplayFunction->Identity]\n\ ex3:=Plot[Sin[x]-1,{x,-4,4}, DisplayFunction->Identity]\n\ ex4:=Plot[2Cos[2x],{x,-4,4}, DisplayFunction->Identity]\n\ ex5:=Plot[-Sin[x]+2,{x,-4,4}, DisplayFunction->Identity]\n\ ex6:=Plot[Sin[.5x]-1,{x,-4,4}, DisplayFunction->Identity]"], "Input", InitializationCell->True, AspectRatioFixed->False]}, Open]], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 0.61803 MathPictureStart % Scaling calculations 0.5 0.11905 0.40712 0.0981 [ [(-4)] 0.02381 0.39462 0 1 Msboxa [(-2)] 0.2619 0.39462 0 1 Msboxa [(2)] 0.7381 0.39462 0 1 Msboxa [(4)] 0.97619 0.39462 0 1 Msboxa [(-4)] 0.4875 0.01472 1 0 Msboxa [(-3)] 0.4875 0.11282 1 0 Msboxa [(-2)] 0.4875 0.21092 1 0 Msboxa [(-1)] 0.4875 0.30902 1 0 Msboxa [(1)] 0.4875 0.50522 1 0 Msboxa [(2)] 0.4875 0.60332 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 0.61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath %%Object: Graphics [ ] 0 setdash 0 setgray gsave gsave 0.002 setlinewidth 0 0.40712 moveto 1 0.40712 lineto stroke 0.02381 0.40087 moveto 0.02381 0.41337 lineto stroke 0 setgray [(-4)] 0.02381 0.39462 0 1 Mshowa 0.2619 0.40087 moveto 0.2619 0.41337 lineto stroke 0 setgray [(-2)] 0.2619 0.39462 0 1 Mshowa 0.7381 0.40087 moveto 0.7381 0.41337 lineto stroke 0 setgray [(2)] 0.7381 0.39462 0 1 Mshowa 0.97619 0.40087 moveto 0.97619 0.41337 lineto stroke 0 setgray [(4)] 0.97619 0.39462 0 1 Mshowa 0.5 0 moveto 0.5 0.61803 lineto stroke 0.49375 0.01472 moveto 0.50625 0.01472 lineto stroke 0 setgray [(-4)] 0.4875 0.01472 1 0 Mshowa 0.49375 0.11282 moveto 0.50625 0.11282 lineto stroke 0 setgray [(-3)] 0.4875 0.11282 1 0 Mshowa 0.49375 0.21092 moveto 0.50625 0.21092 lineto stroke 0 setgray [(-2)] 0.4875 0.21092 1 0 Mshowa 0.49375 0.30902 moveto 0.50625 0.30902 lineto stroke 0 setgray [(-1)] 0.4875 0.30902 1 0 Mshowa 0.49375 0.50522 moveto 0.50625 0.50522 lineto stroke 0 setgray [(1)] 0.4875 0.50522 1 0 Mshowa 0.49375 0.60332 moveto 0.50625 0.60332 lineto stroke 0 setgray [(2)] 0.4875 0.60332 1 0 Mshowa grestore grestore 0 0 moveto 1 0 lineto 1 0.618034 lineto 0 0.618034 lineto closepath clip newpath 0 setgray gsave gsave 0.004 setlinewidth 0.02381 0.01785 moveto 0.02505 0.01702 lineto 0.02629 0.01632 lineto 0.02753 0.01574 lineto 0.02877 0.01529 lineto 0.03001 0.01497 lineto 0.03125 0.01478 lineto 0.03249 0.01472 lineto 0.03373 0.01478 lineto 0.03497 0.01497 lineto 0.03621 0.01529 lineto 0.03745 0.01573 lineto 0.03869 0.0163 lineto 0.04117 0.01783 lineto 0.04365 0.01986 lineto 0.04613 0.0224 lineto 0.04861 0.02543 lineto 0.05357 0.03296 lineto 0.06349 0.05371 lineto 0.07341 0.08154 lineto 0.08333 0.11566 lineto 0.10317 0.1989 lineto 0.14286 0.39125 lineto 0.1627 0.47918 lineto 0.17262 0.51666 lineto 0.18254 0.54838 lineto 0.19246 0.57347 lineto 0.19742 0.5833 lineto 0.20238 0.59123 lineto 0.20486 0.59446 lineto 0.20734 0.5972 lineto 0.20982 0.59944 lineto 0.2123 0.60117 lineto 0.21354 0.60185 lineto 0.21478 0.60239 lineto 0.21602 0.60282 lineto 0.21726 0.60311 lineto 0.2185 0.60328 lineto 0.21974 0.60332 lineto 0.22098 0.60323 lineto 0.22222 0.60301 lineto 0.22346 0.60267 lineto 0.2247 0.6022 lineto 0.22594 0.6016 lineto 0.22718 0.60087 lineto 0.23214 0.59671 lineto 0.23462 0.59387 lineto 0.2371 0.59054 lineto 0.24206 0.58243 lineto 0.25198 0.56057 lineto Mistroke 0.2619 0.53175 lineto 0.28175 0.45654 lineto 0.30159 0.3651 lineto 0.32143 0.26749 lineto 0.34127 0.17444 lineto 0.35119 0.13289 lineto 0.36111 0.09621 lineto 0.37103 0.06543 lineto 0.37599 0.05253 lineto 0.38095 0.04141 lineto 0.38591 0.03214 lineto 0.39087 0.0248 lineto 0.39583 0.01943 lineto 0.39831 0.01749 lineto 0.39955 0.01672 lineto 0.40079 0.01607 lineto 0.40203 0.01554 lineto 0.40327 0.01515 lineto 0.40451 0.01488 lineto 0.40575 0.01474 lineto 0.40699 0.01473 lineto 0.40823 0.01484 lineto 0.40947 0.01508 lineto 0.41071 0.01545 lineto 0.41195 0.01595 lineto 0.41319 0.01657 lineto 0.41567 0.0182 lineto 0.41815 0.02034 lineto 0.42063 0.02297 lineto 0.4256 0.02973 lineto 0.43056 0.03842 lineto 0.44048 0.06137 lineto 0.4504 0.09118 lineto 0.46032 0.12703 lineto 0.5 0.30902 lineto 0.51984 0.40531 lineto 0.53968 0.491 lineto 0.5496 0.52685 lineto 0.55952 0.55666 lineto 0.56944 0.57961 lineto 0.5744 0.5883 lineto 0.57937 0.59506 lineto 0.58185 0.5977 lineto 0.58433 0.59983 lineto 0.58681 0.60146 lineto 0.58805 0.60208 lineto 0.58929 0.60258 lineto 0.59053 0.60295 lineto 0.59177 0.60319 lineto 0.59301 0.60331 lineto Mistroke 0.59425 0.6033 lineto 0.59549 0.60316 lineto 0.59673 0.60289 lineto 0.59797 0.60249 lineto 0.59921 0.60197 lineto 0.60169 0.60054 lineto 0.60417 0.59861 lineto 0.60913 0.59323 lineto 0.61409 0.58589 lineto 0.61905 0.57662 lineto 0.62897 0.5526 lineto 0.63889 0.52182 lineto 0.65873 0.44359 lineto 0.69841 0.25293 lineto 0.71825 0.16149 lineto 0.72817 0.12129 lineto 0.7381 0.08629 lineto 0.74802 0.05746 lineto 0.75794 0.03561 lineto 0.7629 0.02749 lineto 0.76538 0.02416 lineto 0.76786 0.02133 lineto 0.77034 0.01899 lineto 0.77282 0.01716 lineto 0.77406 0.01644 lineto 0.7753 0.01584 lineto 0.77654 0.01537 lineto 0.77778 0.01502 lineto 0.77902 0.01481 lineto 0.78026 0.01472 lineto 0.7815 0.01476 lineto 0.78274 0.01492 lineto 0.78398 0.01522 lineto 0.78522 0.01564 lineto 0.7877 0.01686 lineto 0.79018 0.0186 lineto 0.79266 0.02083 lineto 0.79762 0.0268 lineto 0.80258 0.03473 lineto 0.80754 0.04456 lineto 0.81746 0.06965 lineto 0.8373 0.13885 lineto 0.85714 0.22678 lineto 0.89683 0.41913 lineto 0.91667 0.50237 lineto 0.92659 0.5365 lineto 0.93651 0.56432 lineto 0.94643 0.58507 lineto 0.95139 0.59261 lineto 0.95387 0.59564 lineto Mistroke 0.95635 0.59817 lineto 0.95883 0.6002 lineto 0.96131 0.60173 lineto 0.96255 0.6023 lineto 0.96379 0.60275 lineto 0.96503 0.60307 lineto 0.96627 0.60326 lineto 0.96751 0.60332 lineto 0.96875 0.60325 lineto 0.96999 0.60306 lineto 0.97123 0.60274 lineto 0.97619 0.60019 lineto Mfstroke grestore grestore % End of Graphics MathPictureEnd\ \>"], "Graphics", Editable->False, Evaluatable->False, AspectRatioFixed->True, ImageSize->{371, 229}, ImageMargins->{{0, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHggYjN[Vi^OShn03ooeGooj[ooonICXf=SLcII03=Voc=Vc3=V VC=VIS=V0003o`0001L000?o0000F`000ol0000>0003o`0004P0000F0003o`0007@000?o0000 3`000ol0000G0003o`0005X000?o00003`000ol0001800005`000ol0001c0003o`00010000?o0000 5P000ol0001J0003o`00010000?o0000A`0001P000?o0000L@000ol0000A0003o`0001H000?o0000 F@000ol0000A0003o`0004L0000H0003o`00074000?o00004P000ol0000E0003o`0005T000?o0000 4P000ol0001600006@000ol0001_0003o`0001<000?o00005@000ol0001H0003o`0001<000?o0000 AP0001T000?o0000K`000ol0000D0003o`0001@000?o0000F0000ol0000C0003o`0004H0000J0003 o`0006d000?o00005@000ol0000D0003o`0005L000?o00005@000ol0001500006P000ol0001]0003 o`0001H000?o00004`000ol0001G0003o`0001D000?o0000A@0001X000?o0000K@000ol0000F0003 o`0001<000?o0000EP000ol0000F0003o`0004D0000K0003o`0006/000?o00005`000ol0000C0003 o`0005H000?o00005`000ol0001400006`000ol0001[0003o`0001P000?o00004P000ol0001F0003 o`0001L000?o0000A00001`000?o0000JP000ol0000H0003o`00018000?o0000E@000ol0000H0003 o`0004@0000L0003o`0006T000?o00006@000ol0000B0003o`0005D000?o000060000ol000140000 70000ol0001Y0003o`0001X000?o00004@000ol0001D0003o`0001X000?o0000@`0001d000?o0000 J0000ol0000J0003o`00014000?o0000E0000ol0000J0003o`0004<0000M0003o`0006L000?o0000 6`000ol0000A0003o`0005@000?o00006P000ol0001300007@000ol0001W0003o`0001/000?o0000 4@000ol0001C0003o`0001`000?o0000@P0001h000?o0000IP000ol0000L0003o`00010000?o0000 D`000ol0000L0003o`000480000N0003o`0006H000?o000070000ol0000@0003o`0005<000?o0000 70000ol0001200007P000ol0001U0003o`0001d000?o000040000ol0001B0003o`0001h000?o0000 @@0001h000?o0000I@000ol0000M0003o`00010000?o0000DP000ol0000N0003o`000440000O0003 o`0006@000?o00007P000ol0000?0003o`00058000?o00007P000ol0001100007`000ol0001T0003 o`0001h000?o00003`000ol0001B0003o`0001l000?o0000@00001l000?o0000H`000ol0000O0003 o`0000D00ol70003o`00054000?o000080000ol0001000007`000ol0001S0003o`00020000?o0000 0`001Ol0003o00H000?o0000D@000ol0000P0003o`000400000O0003o`0006<000?o000080000ol0 00070003o`0000@000?o0000D@000ol0000Q0003o`0003l0000P0003o`00064000?o00008005o`H0 00Co00001_mA0003o`00024000?o0000?`00020000?o0000H@000ol0000R0003o`0000@00_l70003 o`00054000?o00008@000ol0000o000080000ol0001Q0003o`00028000?o00001P000ol000040003 o`00050000?o00008`000ol0000n000080000ol0001P0003o`0002<000?o00000P001Ol0003o00H0 00?o0000D0000ol0000S0003o`0003h0000Q0003o`0005l000?o000090000ol0000200?o1`000ol0 001@0003o`0002<000?o0000?P00024000?o0000G`000ol0000T0003o`0000`000?o0000D0000ol0 000T0003o`0003d0000Q0003o`0005h000?o00009@000ol0000<0003o`0004l000?o00009@000ol0 000m00008@000ol0001N0003o`0002D000?o000030000ol0001?0003o`0002D000?o0000?@000280 00?o0000G@000ol0000V0003o`0000/000?o0000C`000ol0000V0003o`0003`0000R0003o`0005d0 00?o00009P000ol0000;0003o`0004l000?o00009P000ol0000l00008P000ol0001L0003o`0002L0 00?o00002`000ol0001>0003o`0002L000?o0000?00002<000?o0000F`000ol0000W0003o`0000/0 00?o0000CP000ol0000W0003o`0003`0000S0003o`0005/000?o00009`000ol0000;0003o`0004h0 00?o0000:0000ol0000k00008`000ol0001K0003o`0002P000?o00002P000ol0001=0003o`0002T0 00?o0000>`0002<000?o0000F`000ol0000X0003o`0000X000?o0000C@000ol0000Y0003o`0003/0 000T0003o`0005T000?o0000:@000ol0000:0003o`0004d000?o0000:@000ol0000k000090000ol0 001I0003o`0002T000?o00002P000ol0001=0003o`0002T000?o0000>`0002@000?o0000F@000ol0 000Z0003o`0000T000?o0000C0000ol0000[0003o`0003X0000T0003o`0005T000?o0000:P000ol0 00090003o`0004`000?o0000:`000ol0000j00009@000ol0001H0003o`0002X000?o00002@000ol0 001<0003o`0002/000?o0000>P0002D000?o0000E`000ol0000[0003o`0000T000?o0000C0000ol0 000[0003o`0003X0000U0003o`0005L000?o0000;0000ol000080003o`0004/000?o0000;@000ol0 000i00009@000ol0001G0003o`0002`000?o000020000ol0001;0003o`0002d000?o0000>@0002H0 00?o0000EP000ol0000/0003o`0000P000?o0000B`000ol0000]0003o`0003T0000V0003o`0005H0 00?o0000;0000ol000080003o`0004/000?o0000;@000ol0000i00009P000ol0001E0003o`0002d0 00?o000020000ol0001;0003o`0002d000?o0000>@0002L000?o0000E0000ol0000^0003o`0000L0 00?o0000BP000ol0000_0003o`0003P0000W0003o`0005@000?o0000;P000ol000070003o`0004X0 00?o0000;`000ol0000h00009`000ol0001D0003o`0002h000?o00001`000ol0001:0003o`0002l0 00?o0000>00002L000?o0000D`000ol0000_0003o`0000L000?o0000BP000ol0000_0003o`0003P0 000X0003o`00058000?o0000<0000ol000060003o`0004X000?o0000;`000ol0000h0000:0000ol0 001B0003o`00030000?o00001P000ol000190003o`00034000?o0000=`0002P000?o0000DP000ol0 000`0003o`0000H000?o0000B@000ol0000a0003o`0003L0000X0003o`00058000?o0000;P05o`H0 00?o0000B@000ol0000a0003o`0003L0000X0003o`00054000?o0000;`001Ol0o`3o00H000?o0000 B@000ol0000a0003o`0003L0000Y0003o`00050000?o0000<0000ol0o`070003o`0004P000?o0000 <`000ol0000f0000:@000ol0001@0003o`0002P01Ol400;o1006odP000?o0000<`000ol0000f0000 :@000ol0001@0003o`00038000?o00001@000ol000180003o`0003<000?o0000=P0002T000?o0000 C`000ol0000`0003o`0000;o1P000ol000180003o`0003<000?o0000=P0002T000?o0000C`000ol0 000`0005o`000?l01P000ol000180003o`0003<000?o0000=P0002X000?o0000CP000ol0000a00Co 1P000ol000170003o`0003D000?o0000=@0002X000?o0000CP000ol0000d0003o`0000@000?o0000 A`000ol0000e0003o`0003D0000Z0003o`0004d000?o0000=@000ol000040003o`0004L000?o0000 =@000ol0000e0000:P000ol0001=0003o`0003H000?o00000`000ol000170003o`0003D000?o0000 =@0002X000?o0000C@000ol0000f0003o`0000<000?o0000A`000ol0000e0003o`0003D0000[0003 o`0004`000?o0000=P000ol000030003o`0004H000?o0000=`000ol0000d0000:`000ol0001;0003 o`0003L000?o00000`000ol000160003o`0003L000?o0000=00002/000?o0000B`000ol0000g0003 o`0000<000?o0000AP000ol0000g0003o`0003@0000[0003o`0004/000?o0000>0000ol000020003 o`0004H000?o0000=`000ol0000d0000:`000ol0001;0003o`0003P000?o00000P000ol000160003 o`0003L000?o0000=00002`000?o0000BP000ol0000h0003o`00008000?o0000A@000ol0000i0003 o`0003<0000/0003o`0004T000?o0000>@000ol000020003o`0004D000?o0000>@000ol0000c0000 ;0000ol000190003o`0003X000Go0000o`170003o`0003T000?o0000<`0002`000?o0000B@000ol0 000j0005o`000?l0A`000ol0000i0003o`0003<0000/0003o`0004T000?o0000>P001Ol0003o04H0 00?o0000>P000ol0000c0000;@000ol000170003o`0003/000Go0000o`160003o`0003/000?o0000 `000ol0000b0000;@000ol000170003o`0003`000Co003oA@000ol0000l0003o`000380 000^0003o`0004D000?o0000?@001?l00?m50003o`0003d000?o0000<@0002h000?o0000A@000ol0 000n0003o`3o04D000?o0000?@000ol0000a0000;P000ol000150003o`0003h000?o0?l0A@000ol0 000m0003o`000340000^0003o`0004D000?o0000?P000ol0o`150003o`0003d000?o0000<@0002h0 00?o0000A@000ol0000n0003o`3o04@000?o0000?P000ol0000a0000;`000ol000130003o`000400 0_m40003o`0003l000?o0000<00002l000?o0000@`000ol0001000;oA0000ol0000o0003o`000300 000_0003o`0004<000?o0000@002od@000?o0000?`000ol0000`0000;`000ol000130003o`000400 0_m30003o`00040000?o0000<00002l000?o0000@`000ol0000f00Go1@02od<000?o0000@0000ol0 000`0000<0000ol000110003o`0003T000?o00001P000ol000110003o`00044000?o0000;`000300 00?o0000@@000ol0000i0003o`0000<01_m10003o`00044000?o0000;`00030000?o0000@@000ol0 000`00Go10000ol000060003o`00044000?o0000@@000ol0000_0000<0000ol000110003o`0003T0 00?o00001P000ol000100003o`00048000?o0000;`00030000?o0000@@000ol0000i0003o`0000H0 00?o0000@0000ol000120003o`0002l0000a0003o`0003l000?o0000>003o`P00_m10003o`0004<0 00?o0000;P00034000?o0000?`000ol0000j0003o`0000H00_m10003o`0004<000?o0000;P000340 00?o0000?`000ol0001300;o@@000ol000130003o`0002h0000a0003o`0003l000?o0000@`02od00 00?o0000A0000ol0000^0000<@000ol0000o0003o`0004<00_m00003o`0004@000?o0000;P000380 00?o0000?@000ol000140003o`3o03l000?o0000A@000ol0000]0000`000ol000150004o`00ocd000?o0000A`000ol0 000/0000<`000ol0000k0003o`0004D000Co003o?0000ol000180003o`0002`0000c0003o`0003/0 00?o0000A@001?l00?ll0003o`0004P000?o0000;00003<000?o0000>`000ol000150004o`00oc`0 00?o0000B0000ol0000/0000=0000ol0000i0003o`0004H000Go0000o`0k0003o`0004T000?o0000 :`0003@000?o0000>@000ol000160005o`000?l0>`000ol000190003o`0002/0000d0003o`0003T0 00?o0000AP001Ol0003o03X000?o0000BP000ol0000[0000=0000ol0000i0003o`0004H000Go0000 o`0j0003o`0004X000?o0000:`0000d00olT0003o`0002/01Ol90003o`0004H000Go0000o`0j0003 o`0001801Olc0003o`0001h00ol:00003P000ol0000T0003o`0002X000Go0000o`080003o`0004L0 00?o00000P000ol0000g0003o`00018000Go0000o`0d0003o`0001h000?o00002@0000X01_lU0003 o`0002/000?o00002@000ol000170003o`00008000?o0000=P000ol0000D0003o`0003D000?o0000 6P06o`X0000400Go00<0o`000P000ol0000T0003o`0002<01Ol40003o`0000P000?o0000A`000ol0 00020003o`0003H000?o00005@000ol0000d0003o`0001X000Go0000o`0;00002`001?l00?lV0003 o`0002d000?o00001`000ol000170003o`00008000?o0000=P000ol0000F0003o`0003<000?o0000 6`001?l00?l;000030000ol0o`0V0003o`0002X000Go0000o`080003o`0004L000?o00000P000ol0 000f0003o`0001<000Go0000o`0d0003o`0001`000?o0?l02`0000d00_lW0003o`0002T000Go0000 o`070003o`0004P000?o00000`000ol0000e0003o`0001<000Go0000o`0e0003o`0001`00_l;0000 3P000ol0000U0003o`0002X00ol80003o`0004P000?o00000`000ol0000d0003o`0001D00olf0003 o`0001d000?o00002@0003H000?o0000=@000ol000180003o`0000<000?o0000=0000ol0001>0003 o`0002T0000f0003o`0003D000?o0000B0000ol000030003o`0003@000?o0000CP000ol0000Y0000 =P000ol0000e0003o`0004P000?o00000`000ol0000d0003o`0004h000?o0000:@0000/000?o0000 :@000ol0000X0003o`0000P000?o0000B@000ol000040003o`0003<000?o00005P000ol0000f0003 o`0001/000?o00002P0000/000?o0000:@000ol0000X0003o`0000P000?o0000B@000ol000040003 o`00038000?o00005`000ol0000f0003o`0001/000?o00002P000080oom_o`<0000;0003o`0002T0 00?o0000:0000ol000080003o`0004T000?o000010000ol0000b0003o`0001L000?o0000=P000ol0 000K0003o`0000X0000;0003o`0002T000?o0000:0000ol000070003o`0004X000?o000010000ol0 000b0003o`0001L000?o0000=P000ol0000K0003o`0000X0000;0003o`0002X000?o00009`000ol0 00070003o`0004X000?o00001@000ol0000`0003o`0001P000?o0000=`000ol0000J0003o`0000X0 000h0003o`00034000?o0000BP000ol000050003o`00030000?o0000DP000ol0000W0000>0000ol0 000a0003o`0004X000?o00001@000ol0000`0003o`00058000?o00009`0003P000?o0000<@000ol0 001:0003o`0000D000?o0000<0000ol0001B0003o`0002L0000i0003o`0002l000?o0000B`000ol0 00050003o`00030000?o0000DP000ol0000W0000>@000ol0000_0003o`0004/000?o00001P000ol0 000^0003o`0005@000?o00009P0003T000?o0000;`000ol0001;0003o`0000H000?o0000;P000ol0 001D0003o`0002H0000i0003o`0002l000?o0000B`000ol000060003o`0002h000?o0000E0000ol0 000V0000>@000ol0000_0003o`0004/000?o00001P000ol0000^0003o`0005@000?o00009P0003X0 00?o0000;@000ol0001<0003o`0000L000?o0000;@000ol0001E0003o`0002D0000j0003o`0002d0 00?o0000C0000ol000070003o`0002`000?o0000EP000ol0000U0000>P000ol0000]0003o`0004`0 00?o00001`000ol0000/0003o`0005H000?o00009@0003X000?o0000;@000ol0001<0003o`0000L0 00?o0000;0000ol0001G0003o`0002@0000j0003o`0002d000?o0000C0000ol000080003o`0002/0 00?o0000E`000ol0000T0000>`000ol0000[0003o`0004d000?o000020000ol0000Z0003o`0005P0 00?o0000900003/000?o0000:`000ol0001=0003o`0000P000?o0000:P000ol0001H0003o`0002@0 000k0003o`0002/000?o0000C@000ol000080003o`0002X000?o0000F@000ol0000S0000>`000ol0 000[0003o`0004d000?o000020000ol0000Z0003o`0005T000?o00008`0003`000?o0000:@000ol0 001>0003o`0000T000?o0000:0000ol0001J0003o`0002<0000l0003o`0002T000?o0000CP000ol0 00090003o`0002P000?o0000FP000ol0000S0000?0000ol0000Y0003o`0004h000?o00002@000ol0 000X0003o`0005/000?o00008P0003`000?o0000:@000ol0001>0003o`0000T000?o0000:0000ol0 001K0003o`000280000l0003o`0002P000?o0000C`000ol0000:0003o`0002H000?o0000G0000ol0 000R0000?@000ol0000W0003o`0004l000?o00002P000ol0000V0003o`0005`000?o00008P0003d0 00?o00009`000ol0001?0003o`0000X000?o00009P000ol0001M0003o`000240000m0003o`0002L0 00?o0000C`000ol0000:0003o`0002H000?o0000G@000ol0000Q0000?@000ol0000V0003o`000500 00?o00002P000ol0000U0003o`0005h000?o00008@0003h000?o00009@000ol0001@0003o`0000/0 00?o000090000ol0001O0003o`000200000n0003o`0002D000?o0000D0000ol0000;0003o`0002@0 00?o0000G`000ol0000P0000?P000ol0000U0003o`00050000?o00002`000ol0000T0003o`0005l0 00?o0000800003l000?o00008`000ol0001A0003o`0000/000?o00008`000ol0001P0003o`000200 000o0003o`0002<000?o0000AP05o`H000?o000030000ol0000R0003o`00064000?o00007`0003l0 00?o00008`000ol000180003o`0000H000?o000030000ol0000R0003o`00064000?o00007`000400 00?o00008P000ol000180003o`0000<01_l<0003o`00028000?o0000H@000ol0000O0000@0000ol0 000Q0003o`0004T000?o00001P000ol0000=0003o`00020000?o0000HP000ol0000O0000@0000ol0 000Q0003o`0004T000?o00001P000ol0000=0003o`00020000?o0000H`000ol0000N0000@@000ol0 000P0003o`0004T000?o00001P000ol0000=0003o`00020000?o0000H`000ol0000N0000@@000ol0 000P0003o`0004L00ol80003o`0000h000?o00007`000ol0001S0003o`0001h000110003o`0001l0 00?o0000BP000ol000060003o`0000h000?o00007P000ol0001T0003o`0001h000120003o`0001h0 00?o0000D`000ol0000>0003o`0001h000?o0000I@000ol0000M0000@P000ol0000N0003o`0005<0 00?o00003`000ol0000M0003o`0006D000?o00007@00048000?o00007P000ol0001C0003o`0000l0 00?o00007@000ol0001U0003o`0001d000130003o`0001`000?o0000E0000ol0000?0003o`0001`0 00?o0000IP000ol0000M0000@`000ol0000L0003o`0005@000?o00003`000ol0000L0003o`0006H0 00?o00007@0004<000?o000070000ol0001D0003o`00010000?o00006`000ol0001W0003o`0001`0 00140003o`0001X000?o0000E@000ol0000@0003o`0001X000?o0000J0000ol0000L0000A0000ol0 000J0003o`0005D000?o000040000ol0000J0003o`0006P000?o0000700004@000?o00006P000ol0 001E0003o`00014000?o00006@000ol0001Y0003o`0001/000150003o`0001P000?o0000EP000ol0 000A0003o`0001T000?o0000J@000ol0000K0000A@000ol0000H0003o`0005H000?o00004@000ol0 000H0003o`0006X000?o00006`0004D000?o00005`000ol0001G0003o`00014000?o000060000ol0 001[0003o`0001X000160003o`0001H000?o0000E`000ol0000B0003o`0001L000?o0000J`000ol0 000J0000AP000ol0000F0003o`0005L000?o00004P000ol0000F0003o`0006d000?o00006@0004H0 00?o00005@000ol0001H0003o`00018000?o00005P000ol0001]0003o`0001T000170003o`0001@0 00?o0000F0000ol0000C0003o`0001@000?o0000KP000ol0000I0000A`000ol0000C0003o`0005T0 00?o00004`000ol0000D0003o`0006l000?o0000600004L000?o00004`000ol0001I0003o`0001@0 00?o00004`000ol0001_0003o`0001P000180003o`00014000?o0000FP000ol0000D0003o`000180 00?o0000L@000ol0000G0000B0000ol0000A0003o`0005X000?o00005@000ol0000A0003o`000740 00?o00005`0004P000?o000040000ol0001K0003o`0001D000?o000040000ol0001c0003o`0001H0 00190003o`0000l000?o0000F`000ol0000F0003o`0000l000?o0000M0000ol0000E0000B@000ol0 000>0003o`0005`000?o00005P000ol0000>0003o`0007D000?o00005@0004X000?o00003@000ol0 001L0003o`0001L000?o00003@000ol0001f0003o`0001@0001:0003o`0000`000?o0000G@000ol0 000G0003o`0000`000?o0000M`000ol0000D0000B`000ol0000:0003o`0005h000?o000060000ol0 000:0003o`0007T000?o00004`0004`000?o00002@000ol0001N0003o`0001P000?o00002@000ol0 001j0003o`0001<0001=0003o`0000P000?o0000D`05o`H000?o00006@000ol000080003o`0007/0 00?o00004P0004h000?o00001@02oeH000Go0000o`060003o`0001X000?o00001P000ol0001m0003 o`000140001?00;o0`02oeT000?o00001`000ol0000K00;o1@000ol0001o00;o10000ol0000:0000 D005oe/000?o00000`06oad01On300Go3@000;4000?o00001@000ol0002g0000[P001Ol0003o00H0 00?o0000]`000:h000Go0000o`060003o`000;L0002_00?o1`000ol0002g0000^@000ol0002g0000 o`1d0000\ \>"], ImageRangeCache->{{{0, 370}, {228, 0}} -> {-4.2543, -4.18143, 0.0229962, 0.0279073}}], Cell[CellGroupData[{Cell[TextData[ "\na) 2Sin(x-`)\nb) 3Cos(x-1)\nc) 3Sin(2x)-1\nd) 2Cos(3x)"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "Choice=\n\na:=Plot[2 Sin[x-Pi],{x,-4,4}, DisplayFunction->Identity]\n\ b:=Plot[3 Cos[x-1],{x,-4,4}, DisplayFunction->Identity]\nc:=Plot[3 \ Sin[2x]-1,{x,-4,4}, DisplayFunction->Identity]\nd:=Plot[2 Cos[3x],{x,-4,4}, \ DisplayFunction->Identity]\nShow[Choice,ex1, \ DisplayFunction->$DisplayFunction]"], "Input", AspectRatioFixed->False]}, Open]], Cell["", "Input", AspectRatioFixed->False], Cell[TextData[ "\n How did you do? If you need to try again just delete your choice and \ enter another try."], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData["\n Here is one more to try together."], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 0.61803 MathPictureStart % Scaling calculations 0.5 0.11905 0.30902 0.2943 [ [(-4)] 0.02381 0.29652 0 1 Msboxa [(-2)] 0.2619 0.29652 0 1 Msboxa [(2)] 0.7381 0.29652 0 1 Msboxa [(4)] 0.97619 0.29652 0 1 Msboxa [(-1)] 0.4875 0.01472 1 0 Msboxa [(-0.5)] 0.4875 0.16187 1 0 Msboxa [(0.5)] 0.4875 0.45617 1 0 Msboxa [(1)] 0.4875 0.60332 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 0.61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath %%Object: Graphics [ ] 0 setdash 0 setgray gsave gsave 0.002 setlinewidth 0 0.30902 moveto 1 0.30902 lineto stroke 0.02381 0.30277 moveto 0.02381 0.31527 lineto stroke 0 setgray [(-4)] 0.02381 0.29652 0 1 Mshowa 0.2619 0.30277 moveto 0.2619 0.31527 lineto stroke 0 setgray [(-2)] 0.2619 0.29652 0 1 Mshowa 0.7381 0.30277 moveto 0.7381 0.31527 lineto stroke 0 setgray [(2)] 0.7381 0.29652 0 1 Mshowa 0.97619 0.30277 moveto 0.97619 0.31527 lineto stroke 0 setgray [(4)] 0.97619 0.29652 0 1 Mshowa 0.5 0 moveto 0.5 0.61803 lineto stroke 0.49375 0.01472 moveto 0.50625 0.01472 lineto stroke 0 setgray [(-1)] 0.4875 0.01472 1 0 Mshowa 0.49375 0.16187 moveto 0.50625 0.16187 lineto stroke 0 setgray [(-0.5)] 0.4875 0.16187 1 0 Mshowa 0.49375 0.45617 moveto 0.50625 0.45617 lineto stroke 0 setgray [(0.5)] 0.4875 0.45617 1 0 Mshowa 0.49375 0.60332 moveto 0.50625 0.60332 lineto stroke 0 setgray [(1)] 0.4875 0.60332 1 0 Mshowa grestore grestore 0 0 moveto 1 0 lineto 1 0.618034 lineto 0 0.618034 lineto closepath clip newpath 0 setgray gsave gsave 0.004 setlinewidth 0.02381 0.50139 moveto 0.04365 0.53567 lineto 0.06349 0.56368 lineto 0.07341 0.57507 lineto 0.08333 0.58462 lineto 0.09325 0.59226 lineto 0.09821 0.59534 lineto 0.10317 0.59793 lineto 0.10813 0.60001 lineto 0.11062 0.60087 lineto 0.1131 0.60159 lineto 0.11558 0.60219 lineto 0.11806 0.60267 lineto 0.1193 0.60285 lineto 0.12054 0.60301 lineto 0.12178 0.60314 lineto 0.12302 0.60323 lineto 0.12426 0.60329 lineto 0.1255 0.60332 lineto 0.12674 0.60332 lineto 0.12798 0.60328 lineto 0.12922 0.60321 lineto 0.13046 0.60312 lineto 0.1317 0.60298 lineto 0.13294 0.60282 lineto 0.1379 0.60185 lineto 0.14038 0.60118 lineto 0.14286 0.60038 lineto 0.15278 0.59591 lineto 0.15774 0.59293 lineto 0.1627 0.58945 lineto 0.18254 0.57075 lineto 0.20238 0.5448 lineto 0.22222 0.51231 lineto 0.2619 0.43149 lineto 0.30159 0.33719 lineto 0.34127 0.23979 lineto 0.38095 0.15001 lineto 0.40079 0.11113 lineto 0.42063 0.07773 lineto 0.44048 0.05074 lineto 0.46032 0.03091 lineto 0.47024 0.02386 lineto 0.4752 0.02108 lineto 0.48016 0.01879 lineto 0.48512 0.01701 lineto 0.4876 0.01631 lineto 0.49008 0.01574 lineto 0.49256 0.01529 lineto 0.4938 0.01511 lineto Mistroke 0.49504 0.01497 lineto 0.49628 0.01486 lineto 0.49752 0.01478 lineto 0.49876 0.01473 lineto 0.5 0.01472 lineto 0.50124 0.01473 lineto 0.50248 0.01478 lineto 0.50372 0.01486 lineto 0.50496 0.01497 lineto 0.50744 0.01529 lineto 0.50992 0.01574 lineto 0.5124 0.01631 lineto 0.51488 0.01701 lineto 0.51984 0.01879 lineto 0.5248 0.02108 lineto 0.52976 0.02386 lineto 0.53968 0.03091 lineto 0.55952 0.05074 lineto 0.57937 0.07773 lineto 0.61905 0.15001 lineto 0.65873 0.23979 lineto 0.69841 0.33719 lineto 0.7381 0.43149 lineto 0.77778 0.51231 lineto 0.79762 0.5448 lineto 0.81746 0.57075 lineto 0.82738 0.58104 lineto 0.8373 0.58945 lineto 0.84226 0.59293 lineto 0.84722 0.59591 lineto 0.85218 0.59839 lineto 0.85714 0.60038 lineto 0.85962 0.60118 lineto 0.8621 0.60185 lineto 0.86458 0.6024 lineto 0.86706 0.60282 lineto 0.8683 0.60298 lineto 0.86954 0.60312 lineto 0.87078 0.60321 lineto 0.87202 0.60328 lineto 0.87326 0.60332 lineto 0.8745 0.60332 lineto 0.87574 0.60329 lineto 0.87698 0.60323 lineto 0.87822 0.60314 lineto 0.87946 0.60301 lineto 0.88194 0.60267 lineto 0.88442 0.60219 lineto 0.8869 0.60159 lineto 0.89187 0.60001 lineto Mistroke 0.89683 0.59793 lineto 0.90675 0.59226 lineto 0.91667 0.58462 lineto 0.93651 0.56368 lineto 0.95635 0.53567 lineto 0.97619 0.50139 lineto Mfstroke grestore grestore % End of Graphics MathPictureEnd\ \>"], "Graphics", Evaluatable->False, AspectRatioFixed->True, ImageSize->{371, 229}, ImageMargins->{{0, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHggYjN[Vi^OShn03ooeGooj[ooonICXf=SLcII03=Voc=Vc3=V VC=VIS=V0003o`0002P000?o00009`000ol0002=0000S@000ol0000Y0003o`0002P000?o0000S00008d0 00?o0000:@000ol0000X0003o`0008`0002<0003o`0001400ol40003o`0000@01?l70003o`0002T0 00?o0000R`0008`000?o000040001Ol0003o00T000?o00000P000ol000040003o`0002T000?o0000 R`0008`000?o000040001Ol0003o00h000?o000010000ol0000Y0003o`0008/0002;0003o`0000X0 1Ol20005o`000?l03P001?l00006obX000?o0000RP0008/000?o00004@001Ol0003o00X01?l70003 o`0002X000?o0000RP0008X000?o00004P001Ol0003o00X000?o000020000ol0000[0003o`0008T0 002:0003o`00018000Go0000o`0:0003o`0000P000?o0000:`000ol000290000R@000ol0000D00?o 2`05o`H000?o0000;0000ol000280000R@000ol0000]0003o`0002`000?o0000R00008T000?o0000 ;@000ol0000/0003o`0008P000280003o`0002h000?o0000;@000ol000270000R0000ol0000^0003 o`0002d000?o0000Q`0008L000?o0000;`000ol0000^0003o`0008H000270003o`0002l000?o0000 ;P000ol000260000QP000ol0000`0003o`0002l000?o0000Q@0008H000?o0000<0000ol0000_0003 o`0008D000260003o`00030000?o0000;`000ol000250000Q@000ol0000a0003o`00030000?o0000 Q00008D000?o0000<@000ol0000`0003o`0008@000240003o`00038000?o0000<@000ol000230000 Q0000ol0000b0003o`00034000?o0000P`0008<000?o0000<`000ol0000b0003o`00088000230003 o`0003<000?o00000000ol0000g0003o`0007d0001n0003o`0003P000?o0000=`000ol0001m0000 OP000ol0000h0003o`0003L000?o0000O@0007d000?o0000>@000ol0000h0003o`0007`0001m0003 o`0003T000?o0000>0000ol0001l0000O0000ol0000j0003o`0003T000?o0000N`0007`000?o0000 >P000ol0000i0003o`0007/0001k0003o`0003/000?o0000>P000ol0001j0000N`000ol0000k0003 o`0003X000?o0000NP0007/000?o0000>`000ol0000j0003o`0007X0000=00?oDP05oa<000?o0000 ?0000ol0000k0003o`0001<01OmD00?o2P0000h000?o0000D@001Ol0003o01<000?o0000?0000ol0 000k0003o`0001<000Go0000o`1E0003o`0000T0000:00KoD`000ol0000C0003o`0003d000?o0000 ?0000ol0000C0003o`0005801_l:00001005o`030?l0008000?o0000BP05o`@000?o00004P000ol0 000m0003o`0003`000?o000050000ol0001A0005o`000?l02`0000/000Co003oEP000ol0000A0003 o`0003d000?o0000?0000ol0000E0003o`00054000Co003o2`0000`000?o0?l0D`001Ol0003o0140 00?o0000?P000ol0000m0003o`00014000Go0000o`1C0003o`3o00/0000=00;oD`001Ol0003o0140 00?o0000?P000ol0000m0003o`00014000Go0000o`1D00;o2`0000h000?o0000DP03oa4000?o0000 ?`000ol0000n0003o`0001400omF0003o`0000T0001g0003o`0003l000?o0000?P000ol0001f0000 MP000ol000100003o`0003l000?o0000M@0007H000?o0000@0000ol0000o0003o`0007D0000;0003 o`0005@000?o00004@000ol000100003o`0003l000?o00004@000ol0001D0003o`0000X0000;0003 o`0005@000?o000040000ol000110003o`00040000?o000040000ol0001D0003o`0000X000020?oo Kol300002`000ol0001D0003o`0000l000?o0000@P000ol000110003o`0000l000?o0000E0000ol0 000:00002`000ol0001D0003o`0000l000?o0000@P000ol000110003o`0000l000?o0000E0000ol0 000:00002`000ol0001D0003o`0000l000?o0000@P000ol000110003o`0000l000?o0000E0000ol0 000:0000L`000ol000130003o`00048000?o0000LP0007<000?o0000@`000ol000120003o`000780 001b0003o`0004@000?o0000@`000ol0001a0000LP000ol000140003o`0004<000?o0000L@000740 00?o0000A@000ol000140003o`000700001a0003o`0004D000?o0000A0000ol0001`0000L@000ol0 00150003o`0004@000?o0000L000070000?o0000AP000ol000150003o`0006l0001`0003o`0004H0 00?o0000A@000ol0001_0000K`000ol000170003o`0004H000?o0000KP0006l000?o0000A`000ol0 00160003o`0006h0001_0003o`0004L000?o0000AP000ol0001^0000KP000ol000180003o`0004L0 00?o0000K@0006h000?o0000B0000ol000170003o`0006d0001]0003o`0004T000?o0000B0000ol0 001/0000K@000ol000190003o`0004P000?o0000K00006`000?o0000BP000ol000190003o`0006/0 001/0003o`0004X000?o0000B@000ol0001[0000K0000ol0001:0003o`0004T000?o0000J`0006/0 00?o0000B`000ol0001:0003o`0006X0001[0003o`0004/000?o0000BP000ol0001Z0000JP000ol0 001<0003o`0004/000?o0000J@0006X000?o0000C0000ol0001;0003o`0006T0001Z0003o`0004`0 00?o0000B`000ol0001Y0000J@000ol0001=0003o`0004`000?o0000J00006T000?o0000C@000ol0 001<0003o`0006P0001X0003o`0004h000?o0000C@000ol0001W0000J0000ol0001>0003o`0004d0 00?o0000I`0006P000?o0000CP000ol0001=0003o`0006L0001W0003o`0004l000?o0000CP000ol0 001V0000I`000ol0001?0003o`0004h000?o0000IP0006H000?o0000D0000ol0001?0003o`0006D0 001V0003o`00050000?o0000C`000ol0001U0000I@000ol0001A0003o`00050000?o0000I00006D0 00?o0000D@000ol0001@0003o`0006@0001U0003o`00054000?o0000D0000ol0001T0000I0000ol0 001B0003o`00054000?o0000H`0006@000?o0000DP000ol0001A0003o`0006<0001S0003o`0005<0 00?o0000DP000ol0001R0000H`000ol0001C0003o`00058000?o0000HP0006<000?o0000D`000ol0 001B0003o`000680001R0003o`0005@000?o0000D`000ol0001Q0000HP000ol0001D0003o`0005<0 00?o0000H@00064000?o0000E@000ol0001D0003o`000600001Q0003o`0005D000?o0000E0000ol0 001P0000H0000ol0001F0003o`0005D000?o0000G`00060000?o0000EP000ol0001E0003o`0005l0 001O0003o`0005L000?o0000EP000ol0001N0000G`000ol0000n00?o10000ol0000300Co20000ol0 001F0003o`0005h0001N0003o`0003h000Go0000o`080003o`00008000?o00001@000ol0001G0003 o`0005d0001N0003o`0003h000Go0000o`0=0003o`0000801_mG0003o`0005d0001M0003o`0003l0 00Go0000o`0=0003o`0000D000?o0000F0000ol0001L0000G@000ol0000o0005o`000?l02@04o`P0 00?o0000F0000ol0001L0000G0000ol000100005o`000?l02@000ol000090003o`0005T000?o0000 F`0005`000?o0000@0001Ol0003o00T000?o00002@000ol0001I0003o`0005/0001K0003o`000480 0ol:00Go1`000ol0001J0003o`0005X0001K0003o`0005/000?o0000FP000ol0001J0000FP000ol0 001L0003o`0005/000?o0000F@0005X000?o0000G0000ol0001K0003o`0005T0001I0003o`0005d0 00?o0000G0000ol0001H0000F@000ol0001M0003o`0005`000?o0000F00005P000?o0000GP000ol0 001M0003o`0005L0001H0003o`0005h000?o0000G@000ol0001G0000E`000ol0001O0003o`0005h0 00?o0000EP0005L000?o0000G`000ol0001N0003o`0005H0001F0003o`00060000?o0000G`000ol0 001E0000EP000ol0001P0003o`0005l000?o0000E@0000/000?o0000A`000ol0001Q0003o`000600 00?o0000A`000ol0000:00002`000ol000170003o`00064000?o0000H0000ol000170003o`0000X0 000<0003o`0004D000?o0000HP000ol0001Q0003o`0004D000?o00002`0000`000?o0000A@000ol0 001R0003o`00064000?o0000A@000ol0000;00003@000ol000130003o`0006<000?o0000HP000ol0 00130003o`0000`0000>0003o`00048000?o0000H`000ol0001R0003o`00048000?o00003@0000h0 00?o0000@@000ol0001T0003o`0006<000?o0000@@000ol0000=00003`000ol000100003o`0006@0 00?o0000H`000ol000100003o`0000h0000?0003o`0003l000?o0000I@000ol0001T0003o`0003l0 00?o00003P00010000?o0000?@000ol0001V0003o`0006D000?o0000?@000ol0000?00004@000ol0 000l0003o`0006H000?o0000I@000ol0000l0003o`000100000A0003o`0003/000?o0000I`000ol0 001V0003o`0003/000?o00004000018000?o0000>P000ol0001W0003o`0006H000?o0000>P000ol0 000A00004P000ol0000i0003o`0006P000?o0000I`000ol0000i0003o`000140000C0003o`0003L0 00?o0000J@000ol0001X0003o`0003L000?o00004P0001@000?o0000=P000ol0001Y0003o`0006P0 00?o0000=P000ol0000C000050000ol0000e0003o`0006X000?o0000J@000ol0000e0003o`0001<0 000E0003o`0003@000?o0000JP000ol0001Y0003o`0003@000?o0000500001H000?o00000003o`0002L0000Y00?o1`04ogT000?o00001P000ol0001o00?o2003obX0000/00OoO@000ol0 000300KoPP08obd0002`0003o`0000H000?o0000]`000;0000?o00001P000ol0002g0000[P03o`P0 00?o0000]`000;0000?o00001P000ol0002g0000^@000ol0002g0000o`1d0000\ \>"], ImageRangeCache->{{{0, 370}, {228, 0}} -> {-4.2543, -1.06048, 0.0229962, 0.00930242}}], Cell[TextData[ "\n a) Sin(x)-1\n b) -Cos(x)\n c) Sin(x+`)\n d) Cos(x+`)"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "Choice=\na:=Plot[Sin[x]-1,{x,-4,4}, DisplayFunction->Identity]\n\ b:=Plot[-Cos[x],{x,-4,4}, DisplayFunction->Identity]\n\ c:=Plot[Sin[x+Pi],{x,-4,4},DisplayFunction->Identity]\n\ d:=Plot[Cos[x+Pi],{x,-4,4},DisplayFunction->Identity]\nShow[Choice,ex2, \ DisplayFunction->$DisplayFunction]"], "Input", AspectRatioFixed->False], Cell[TextData[ "\n Well, how did you do? Actually this one should have been easy even if \ you guessed since two of the four choices work! Can you find both?"], "Text",\ Evaluatable->False, AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData["Surf's Up!"], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[{ StyleBox[ "\n Where are four waves for you to try to do on your own. Have fun!\n ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[" ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[CellGroupData[{Cell[TextData[{ StyleBox["\n", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["GRAPH 1", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 0.61803 MathPictureStart % Scaling calculations 0.5 0.125 0.30902 0.07725 [ [(-4)] 0 0.29652 0 1 Msboxa [(-3)] 0.125 0.29652 0 1 Msboxa [(-2)] 0.25 0.29652 0 1 Msboxa [(-1)] 0.375 0.29652 0 1 Msboxa [(1)] 0.625 0.29652 0 1 Msboxa [(2)] 0.75 0.29652 0 1 Msboxa [(3)] 0.875 0.29652 0 1 Msboxa [(4)] 1 0.29652 0 1 Msboxa [(-4)] 0.4875 0 1 0 Msboxa [(-3)] 0.4875 0.07725 1 0 Msboxa [(-2)] 0.4875 0.15451 1 0 Msboxa [(-1)] 0.4875 0.23176 1 0 Msboxa [(1)] 0.4875 0.38627 1 0 Msboxa [(2)] 0.4875 0.46353 1 0 Msboxa [(3)] 0.4875 0.54078 1 0 Msboxa [(4)] 0.4875 0.61803 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 0.61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath %%Object: Graphics [ ] 0 setdash 0 setgray gsave gsave 0.002 setlinewidth 0 0.30902 moveto 1 0.30902 lineto stroke 0 0.30277 moveto 0 0.31527 lineto stroke 0 setgray [(-4)] 0 0.29652 0 1 Mshowa 0.125 0.30277 moveto 0.125 0.31527 lineto stroke 0 setgray [(-3)] 0.125 0.29652 0 1 Mshowa 0.25 0.30277 moveto 0.25 0.31527 lineto stroke 0 setgray [(-2)] 0.25 0.29652 0 1 Mshowa 0.375 0.30277 moveto 0.375 0.31527 lineto stroke 0 setgray [(-1)] 0.375 0.29652 0 1 Mshowa 0.625 0.30277 moveto 0.625 0.31527 lineto stroke 0 setgray [(1)] 0.625 0.29652 0 1 Mshowa 0.75 0.30277 moveto 0.75 0.31527 lineto stroke 0 setgray [(2)] 0.75 0.29652 0 1 Mshowa 0.875 0.30277 moveto 0.875 0.31527 lineto stroke 0 setgray [(3)] 0.875 0.29652 0 1 Mshowa 1 0.30277 moveto 1 0.31527 lineto stroke 0 setgray [(4)] 1 0.29652 0 1 Mshowa 0.5 0 moveto 0.5 0.61803 lineto stroke 0.49375 0 moveto 0.50625 0 lineto stroke 0 setgray [(-4)] 0.4875 0 1 0 Mshowa 0.49375 0.07725 moveto 0.50625 0.07725 lineto stroke 0 setgray [(-3)] 0.4875 0.07725 1 0 Mshowa 0.49375 0.15451 moveto 0.50625 0.15451 lineto stroke 0 setgray [(-2)] 0.4875 0.15451 1 0 Mshowa 0.49375 0.23176 moveto 0.50625 0.23176 lineto stroke 0 setgray [(-1)] 0.4875 0.23176 1 0 Mshowa 0.49375 0.38627 moveto 0.50625 0.38627 lineto stroke 0 setgray [(1)] 0.4875 0.38627 1 0 Mshowa 0.49375 0.46353 moveto 0.50625 0.46353 lineto stroke 0 setgray [(2)] 0.4875 0.46353 1 0 Mshowa 0.49375 0.54078 moveto 0.50625 0.54078 lineto stroke 0 setgray [(3)] 0.4875 0.54078 1 0 Mshowa 0.49375 0.61803 moveto 0.50625 0.61803 lineto stroke 0 setgray [(4)] 0.4875 0.61803 1 0 Mshowa grestore grestore 0 0 moveto 1 0 lineto 1 0.618034 lineto 0 0.618034 lineto closepath clip newpath 0 setgray gsave gsave gsave gsave 0.004 setlinewidth 0 0.29023 moveto 0.04167 0.27049 lineto 0.08333 0.24648 lineto 0.125 0.22086 lineto 0.16667 0.19644 lineto 0.1875 0.18553 lineto 0.20833 0.1759 lineto 0.22917 0.16782 lineto 0.25 0.16152 lineto 0.26042 0.15908 lineto 0.27083 0.15716 lineto 0.28125 0.15575 lineto 0.28646 0.15524 lineto 0.28906 0.15503 lineto 0.29167 0.15486 lineto 0.29427 0.15473 lineto 0.29687 0.15462 lineto 0.29818 0.15458 lineto 0.29948 0.15455 lineto 0.30078 0.15453 lineto 0.30208 0.15451 lineto 0.30339 0.15451 lineto 0.30469 0.15451 lineto 0.30599 0.15452 lineto 0.30729 0.15454 lineto 0.30859 0.15457 lineto 0.3099 0.1546 lineto 0.3125 0.1547 lineto 0.3151 0.15483 lineto 0.31771 0.155 lineto 0.32292 0.15542 lineto 0.32812 0.15598 lineto 0.33333 0.15668 lineto 0.34375 0.15845 lineto 0.35417 0.16073 lineto 0.375 0.16676 lineto 0.39583 0.17458 lineto 0.41667 0.18399 lineto 0.45833 0.20649 lineto 0.5 0.23176 lineto 0.54167 0.25704 lineto 0.58333 0.27953 lineto 0.60417 0.28894 lineto 0.625 0.29677 lineto 0.63542 0.30002 lineto 0.64583 0.30279 lineto 0.65625 0.30508 lineto 0.66667 0.30685 lineto 0.67188 0.30754 lineto 0.67708 0.3081 lineto Mistroke 0.67969 0.30833 lineto 0.68229 0.30853 lineto 0.6849 0.30869 lineto 0.6875 0.30882 lineto 0.6888 0.30888 lineto 0.6901 0.30892 lineto 0.69141 0.30896 lineto 0.69271 0.30898 lineto 0.69401 0.309 lineto 0.69531 0.30901 lineto 0.69661 0.30902 lineto 0.69792 0.30901 lineto 0.69922 0.309 lineto 0.70052 0.30897 lineto 0.70313 0.3089 lineto 0.70443 0.30886 lineto 0.70573 0.3088 lineto 0.70833 0.30866 lineto 0.71354 0.30829 lineto 0.71875 0.30778 lineto 0.72917 0.30637 lineto 0.73958 0.30444 lineto 0.75 0.30201 lineto 0.77083 0.2957 lineto 0.79167 0.28762 lineto 0.83333 0.26709 lineto 0.875 0.24266 lineto 0.91667 0.21704 lineto 0.95833 0.19304 lineto 1 0.1733 lineto Mfstroke grestore grestore grestore gsave gsave gsave 0.004 setlinewidth 0 0.29023 moveto 0.04167 0.27049 lineto 0.08333 0.24648 lineto 0.125 0.22086 lineto 0.16667 0.19644 lineto 0.1875 0.18553 lineto 0.20833 0.1759 lineto 0.22917 0.16782 lineto 0.25 0.16152 lineto 0.26042 0.15908 lineto 0.27083 0.15716 lineto 0.28125 0.15575 lineto 0.28646 0.15524 lineto 0.28906 0.15503 lineto 0.29167 0.15486 lineto 0.29427 0.15473 lineto 0.29687 0.15462 lineto 0.29818 0.15458 lineto 0.29948 0.15455 lineto 0.30078 0.15453 lineto 0.30208 0.15451 lineto 0.30339 0.15451 lineto 0.30469 0.15451 lineto 0.30599 0.15452 lineto 0.30729 0.15454 lineto 0.30859 0.15457 lineto 0.3099 0.1546 lineto 0.3125 0.1547 lineto 0.3151 0.15483 lineto 0.31771 0.155 lineto 0.32292 0.15542 lineto 0.32812 0.15598 lineto 0.33333 0.15668 lineto 0.34375 0.15845 lineto 0.35417 0.16073 lineto 0.375 0.16676 lineto 0.39583 0.17458 lineto 0.41667 0.18399 lineto 0.45833 0.20649 lineto 0.5 0.23176 lineto 0.54167 0.25704 lineto 0.58333 0.27953 lineto 0.60417 0.28894 lineto 0.625 0.29677 lineto 0.63542 0.30002 lineto 0.64583 0.30279 lineto 0.65625 0.30508 lineto 0.66667 0.30685 lineto 0.67188 0.30754 lineto 0.67708 0.3081 lineto Mistroke 0.67969 0.30833 lineto 0.68229 0.30853 lineto 0.6849 0.30869 lineto 0.6875 0.30882 lineto 0.6888 0.30888 lineto 0.6901 0.30892 lineto 0.69141 0.30896 lineto 0.69271 0.30898 lineto 0.69401 0.309 lineto 0.69531 0.30901 lineto 0.69661 0.30902 lineto 0.69792 0.30901 lineto 0.69922 0.309 lineto 0.70052 0.30897 lineto 0.70313 0.3089 lineto 0.70443 0.30886 lineto 0.70573 0.3088 lineto 0.70833 0.30866 lineto 0.71354 0.30829 lineto 0.71875 0.30778 lineto 0.72917 0.30637 lineto 0.73958 0.30444 lineto 0.75 0.30201 lineto 0.77083 0.2957 lineto 0.79167 0.28762 lineto 0.83333 0.26709 lineto 0.875 0.24266 lineto 0.91667 0.21704 lineto 0.95833 0.19304 lineto 1 0.1733 lineto Mfstroke grestore grestore grestore grestore % End of Graphics MathPictureEnd\ \>"], "Graphics", Evaluatable->False, AspectRatioFixed->True, ImageSize->{371, 229}, ImageMargins->{{0, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHggYjN[Vi^OShn03ooeGooj[ooonICXf=SLcII03=Voc=Vc3=V VC=VIS=V0000 D@000ol0001700;o7@000ol0002T00;o400004l00_m<00;o6`000ol0002R00;o4P0004d00_m@00;o 6@000ol0002P00;o500004X00omD00;o5`000ol0002N00;o5P0004L00omI00;o5@000ol0002L00;o 600004D00_mN0003o`00018000?o0000VP02oaX000140003o`0005l00_lB0003o`0009T000?o0000 6P0004800_mT00;o40000ol0002G00;o7@00044000?o0000IP02o`h000?o0000U@02oal0000o00;o J`02o``000?o0000U0000ol0000O0000?@02ofl000?o00002@000ol0002B00;o8P0003`000?o0000 L002o`T000?o0000T002ob@0000j00;oM@000ol000060003o`0008l000?o0000900003T000?o0000 MP02o`H000?o0000S@02obL0000g00;oN`02o`@000?o0000R`02obT0000e00;oN@05o`030?l00080 00?o0000RP000ol0000Y0000=0000ol0001k0003o`0000800_l00`3o002900;o;00003800_mn0003 o`0000@00_n800;o;P0003000_mg00Go10000ol0000300GoQ002oc00000_0003o`00080000?o0000 1@001?l0oon20003o`000300000]00;oP`000ol000050004o`0000;oOP02oc<0000[00;oP`03o`L0 00?o00000`02ogX00_le0000:P000ol000250003o`0000D000?o00001@000ol0001e00;o=`0002P0 0_n@0003o`0000H00_md0003o`0003L0000V00;oTP000ol0000800;oL002ocX0000U0003o`000980 00?o00002P02of`00_ll00008`02oiD000?o00003002ofT000?o0000?00002400_nG0003o`0000h0 0_mU00;o?`0001l00_nI0003o`00010000?o0000H002od40000N0003o`0009T000?o00004@02oel0 00?o0000@@0001`00_nL0003o`0001<00_mK00;oA00000l00ol800;o7P03obL01OlW00Go9@000ol0 000E00;o3`05obL01OlG00;o3P03obX00ol8000040000ol0000500;o7`001Ol0003o02H000Go0000 o`0Y0003o`0002D000?o00005`000ol0000>0003o`0002L000Go0000o`0E00;o3`001Ol0003o02X0 00?o00001`0000`01_l400;o9@000ol0000U0003o`0002X000?o00009@000ol0000H00;o3P000ol0 000X0003o`0001@00_lE0003o`0002@01_l800001P05o`030?l0008000?o00000olL00Go1P000ol0 000M00Go10000ol0000P00Go10000ol0000U0003o`0001X00_l<0003o`0002T000?o00004@02oaL0 00?o000090001Ol0003o00T0000=0003o`0000?o:002obX000?o0000:0000ol0000U0003o`0001`0 0_l:0003o`0002X000?o00003P02oaL00_lX0004o`00o`T0000>00?o;0000ol0000T0005o`000?l0 :@000ol0000U0003o`0001h00_l80003o`0002L000Go0000o`0=00;o6`000ol0000V0003o`3o00T0 000=00Co:0001Ol0003o02H000Go0000o`0W00?o9`000ol0000P00;o1003obT000Go0000o`0;00;o 6@001Ol0003o02T00_l9000030001Ol0003o02T00olX00?o:P000ol0000U0003o`0002800ol30003 o`0002P00ol900?o7003ob/000?o00001`000;X000?o00009@03ocD00_mG0000^P000ol0000X00Co ;P03oeT0002j0003o`0002`00olW00CoG00000`000?o0000:@000ol0000X0003o`0002T000?o0000 :0000ol0000Y0003o`0000<01?lP00?o:P000ol0000X0003o`0000P0000<0003o`0002T000?o0000 :0000ol0000Y0003o`0002P000?o0000:@000ol0000700Co6004o`030?l002X000?o0000:0000ol0 00080000303ooeko2P0000`000?o0000:@000ol0000X0003o`0002T000?o0000:0000ol0000Y0003 o`0002P000?o0000:@000ol0000X0003o`0000P0000<0003o`0002T000?o0000:0000ol0000Y0003 o`0002P000?o0000:@000ol0000X0003o`0002T000?o0000:0000ol00008000030000ol0000Y0003 o`0002P000?o0000:@000ol0000X0003o`0002T000?o0000:0000ol0000Y0003o`0002P000?o0000 20000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000 ]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000 ]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000 ]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000 ]P000;X000?o0000]P000;001Ol50003o`000;H0002b0003o`0000D000?o0000]P000;8000?o0000 0`05okH0002b0003o`0000D000?o0000]P000;8000?o00001@000ol0002f0000/P000ol000050003 o`000;H0002`00?o1`000ol0002f0000/P000ol000050003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002`00Go1@000ol0002f0000/0001Ol0003o00D0 00?o0000]P000;4000?o00001005okH0002b0003o`0000D000?o0000]P000;<000?o000010000ol0 002f0000/0001Ol0003o00D000?o0000]P000;0000Go0000o`050003o`000;H0002a00?o1P000ol0 002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0 002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0 002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0 002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000/@03o`H0 00?o0000]P000;0000Go0000o`050003o`000;H0002d0004o`0000Go]P000;@000?o00000`000ol0 002f0000/P02o`H000?o0000]P000;@000?o00000`000ol0002f0000/0001Ol0003o00D000?o0000 ]P000;400ol60003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002b00?o 1@000ol0002f0000/`000ol000040003o`000;H0002_00Ko1@000ol0002f0000[`001Ol0003o00@0 1Onf0000/0001?l00?no0000/@000ol0o`2o0000/P02okl0002c0003o`000;d0003o07@0003o07@0 0000\ \>"], ImageRangeCache->{{{0, 370}, {228, 0}} -> {-4.29571, -4.24217, 0.0229967, 0.0372115}}], Cell[TextData["\na) Sin(x)-1\nb) Cos(x)+1\nc) -Sin(x)\nd) -Cos(-x)-1"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "Choice= \n\na:=Plot[Sin[x]-1,{x,-4,4}, DisplayFunction->Identity]\n\ b:=Plot[Cos[x]+1,{x,-4,4}, DisplayFunction->Identity]\n\ c:=Plot[-Sin[x],{x,-4,4}, DisplayFunction->Identity]\n\ d:=Plot[-Cos[-x]-1,{x,-4,4},DisplayFunction->Identity]\n\ Show[Choice,ex3,DisplayFunction->$DisplayFunction,PlotRange->{{-4,4},{-4,4}}];\ \n"], "Input", AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData[{ StyleBox["\n", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["GRAPH 2", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 0.61803 MathPictureStart % Scaling calculations 0.5 0.125 0.30902 0.07725 [ [(-4)] 0 0.29652 0 1 Msboxa [(-3)] 0.125 0.29652 0 1 Msboxa [(-2)] 0.25 0.29652 0 1 Msboxa [(-1)] 0.375 0.29652 0 1 Msboxa [(1)] 0.625 0.29652 0 1 Msboxa [(2)] 0.75 0.29652 0 1 Msboxa [(3)] 0.875 0.29652 0 1 Msboxa [(4)] 1 0.29652 0 1 Msboxa [(-4)] 0.4875 0 1 0 Msboxa [(-3)] 0.4875 0.07725 1 0 Msboxa [(-2)] 0.4875 0.15451 1 0 Msboxa [(-1)] 0.4875 0.23176 1 0 Msboxa [(1)] 0.4875 0.38627 1 0 Msboxa [(2)] 0.4875 0.46353 1 0 Msboxa [(3)] 0.4875 0.54078 1 0 Msboxa [(4)] 0.4875 0.61803 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 0.61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath %%Object: Graphics [ ] 0 setdash 0 setgray gsave gsave 0.002 setlinewidth 0 0.30902 moveto 1 0.30902 lineto stroke 0 0.30277 moveto 0 0.31527 lineto stroke 0 setgray [(-4)] 0 0.29652 0 1 Mshowa 0.125 0.30277 moveto 0.125 0.31527 lineto stroke 0 setgray [(-3)] 0.125 0.29652 0 1 Mshowa 0.25 0.30277 moveto 0.25 0.31527 lineto stroke 0 setgray [(-2)] 0.25 0.29652 0 1 Mshowa 0.375 0.30277 moveto 0.375 0.31527 lineto stroke 0 setgray [(-1)] 0.375 0.29652 0 1 Mshowa 0.625 0.30277 moveto 0.625 0.31527 lineto stroke 0 setgray [(1)] 0.625 0.29652 0 1 Mshowa 0.75 0.30277 moveto 0.75 0.31527 lineto stroke 0 setgray [(2)] 0.75 0.29652 0 1 Mshowa 0.875 0.30277 moveto 0.875 0.31527 lineto stroke 0 setgray [(3)] 0.875 0.29652 0 1 Mshowa 1 0.30277 moveto 1 0.31527 lineto stroke 0 setgray [(4)] 1 0.29652 0 1 Mshowa 0.5 0 moveto 0.5 0.61803 lineto stroke 0.49375 0 moveto 0.50625 0 lineto stroke 0 setgray [(-4)] 0.4875 0 1 0 Mshowa 0.49375 0.07725 moveto 0.50625 0.07725 lineto stroke 0 setgray [(-3)] 0.4875 0.07725 1 0 Mshowa 0.49375 0.15451 moveto 0.50625 0.15451 lineto stroke 0 setgray [(-2)] 0.4875 0.15451 1 0 Mshowa 0.49375 0.23176 moveto 0.50625 0.23176 lineto stroke 0 setgray [(-1)] 0.4875 0.23176 1 0 Mshowa 0.49375 0.38627 moveto 0.50625 0.38627 lineto stroke 0 setgray [(1)] 0.4875 0.38627 1 0 Mshowa 0.49375 0.46353 moveto 0.50625 0.46353 lineto stroke 0 setgray [(2)] 0.4875 0.46353 1 0 Mshowa 0.49375 0.54078 moveto 0.50625 0.54078 lineto stroke 0 setgray [(3)] 0.4875 0.54078 1 0 Mshowa 0.49375 0.61803 moveto 0.50625 0.61803 lineto stroke 0 setgray [(4)] 0.4875 0.61803 1 0 Mshowa grestore grestore 0 0 moveto 1 0 lineto 1 0.618034 lineto 0 0.618034 lineto closepath clip newpath 0 setgray gsave gsave gsave gsave 0.004 setlinewidth 0 0.28654 moveto 0.02083 0.33779 lineto 0.04167 0.38588 lineto 0.05208 0.40705 lineto 0.0625 0.4255 lineto 0.07292 0.44073 lineto 0.07813 0.44699 lineto 0.08333 0.4523 lineto 0.08854 0.45662 lineto 0.09115 0.45839 lineto 0.09375 0.45991 lineto 0.09635 0.46116 lineto 0.09896 0.46215 lineto 0.10026 0.46255 lineto 0.10156 0.46287 lineto 0.10286 0.46314 lineto 0.10417 0.46333 lineto 0.10547 0.46346 lineto 0.10677 0.46352 lineto 0.10807 0.46351 lineto 0.10937 0.46344 lineto 0.11068 0.4633 lineto 0.11198 0.46309 lineto 0.11328 0.46282 lineto 0.11458 0.46248 lineto 0.11979 0.46045 lineto 0.1224 0.45904 lineto 0.125 0.45737 lineto 0.13542 0.44815 lineto 0.14583 0.43508 lineto 0.16667 0.39891 lineto 0.20833 0.30195 lineto 0.22917 0.25184 lineto 0.25 0.20802 lineto 0.26042 0.19002 lineto 0.27083 0.17532 lineto 0.28125 0.16433 lineto 0.28646 0.16032 lineto 0.28906 0.1587 lineto 0.29167 0.15734 lineto 0.29427 0.15625 lineto 0.29687 0.15542 lineto 0.29818 0.1551 lineto 0.29948 0.15485 lineto 0.30078 0.15467 lineto 0.30208 0.15456 lineto 0.30339 0.15451 lineto 0.30469 0.15453 lineto 0.30599 0.15462 lineto 0.30729 0.15477 lineto Mistroke 0.30859 0.15499 lineto 0.3099 0.15528 lineto 0.3125 0.15605 lineto 0.3151 0.1571 lineto 0.31771 0.1584 lineto 0.32292 0.16179 lineto 0.32812 0.1662 lineto 0.33333 0.17161 lineto 0.35417 0.20229 lineto 0.375 0.24472 lineto 0.41667 0.34536 lineto 0.4375 0.3925 lineto 0.45833 0.43044 lineto 0.46875 0.44461 lineto 0.47917 0.45502 lineto 0.48437 0.45872 lineto 0.48698 0.46018 lineto 0.48958 0.46138 lineto 0.49219 0.46232 lineto 0.49349 0.46269 lineto 0.49479 0.46299 lineto 0.49609 0.46322 lineto 0.4974 0.46339 lineto 0.4987 0.46349 lineto 0.5 0.46353 lineto 0.5013 0.46349 lineto 0.5026 0.46339 lineto 0.50391 0.46322 lineto 0.50521 0.46299 lineto 0.50781 0.46232 lineto 0.51042 0.46138 lineto 0.51302 0.46018 lineto 0.51562 0.45872 lineto 0.52083 0.45502 lineto 0.53125 0.44461 lineto 0.54167 0.43044 lineto 0.5625 0.3925 lineto 0.58333 0.34536 lineto 0.625 0.24472 lineto 0.64583 0.20229 lineto 0.65625 0.18523 lineto 0.66667 0.17161 lineto 0.67188 0.1662 lineto 0.67708 0.16179 lineto 0.67969 0.15997 lineto 0.68229 0.1584 lineto 0.6849 0.1571 lineto 0.6875 0.15605 lineto 0.6888 0.15563 lineto 0.6901 0.15528 lineto Mistroke 0.69141 0.15499 lineto 0.69271 0.15477 lineto 0.69401 0.15462 lineto 0.69531 0.15453 lineto 0.69661 0.15451 lineto 0.69792 0.15456 lineto 0.69922 0.15467 lineto 0.70052 0.15485 lineto 0.70313 0.15542 lineto 0.70443 0.1558 lineto 0.70573 0.15625 lineto 0.70833 0.15734 lineto 0.71354 0.16032 lineto 0.71875 0.16433 lineto 0.72917 0.17532 lineto 0.73958 0.19002 lineto 0.75 0.20802 lineto 0.79167 0.30195 lineto 0.8125 0.35285 lineto 0.83333 0.39891 lineto 0.85417 0.43508 lineto 0.86458 0.44815 lineto 0.86979 0.45326 lineto 0.875 0.45737 lineto 0.8776 0.45904 lineto 0.88021 0.46045 lineto 0.88281 0.4616 lineto 0.88542 0.46248 lineto 0.88672 0.46282 lineto 0.88802 0.46309 lineto 0.88932 0.4633 lineto 0.89063 0.46344 lineto 0.89193 0.46351 lineto 0.89323 0.46352 lineto 0.89453 0.46346 lineto 0.89583 0.46333 lineto 0.89714 0.46314 lineto 0.89844 0.46287 lineto 0.90104 0.46215 lineto 0.90365 0.46116 lineto 0.90625 0.45991 lineto 0.91146 0.45662 lineto 0.91667 0.4523 lineto 0.92708 0.44073 lineto 0.9375 0.4255 lineto 0.95833 0.38588 lineto 1 0.28654 lineto Mfstroke grestore grestore grestore gsave gsave gsave 0.004 setlinewidth 0 0.28654 moveto 0.02083 0.33779 lineto 0.04167 0.38588 lineto 0.05208 0.40705 lineto 0.0625 0.4255 lineto 0.07292 0.44073 lineto 0.07813 0.44699 lineto 0.08333 0.4523 lineto 0.08854 0.45662 lineto 0.09115 0.45839 lineto 0.09375 0.45991 lineto 0.09635 0.46116 lineto 0.09896 0.46215 lineto 0.10026 0.46255 lineto 0.10156 0.46287 lineto 0.10286 0.46314 lineto 0.10417 0.46333 lineto 0.10547 0.46346 lineto 0.10677 0.46352 lineto 0.10807 0.46351 lineto 0.10937 0.46344 lineto 0.11068 0.4633 lineto 0.11198 0.46309 lineto 0.11328 0.46282 lineto 0.11458 0.46248 lineto 0.11979 0.46045 lineto 0.1224 0.45904 lineto 0.125 0.45737 lineto 0.13542 0.44815 lineto 0.14583 0.43508 lineto 0.16667 0.39891 lineto 0.20833 0.30195 lineto 0.22917 0.25184 lineto 0.25 0.20802 lineto 0.26042 0.19002 lineto 0.27083 0.17532 lineto 0.28125 0.16433 lineto 0.28646 0.16032 lineto 0.28906 0.1587 lineto 0.29167 0.15734 lineto 0.29427 0.15625 lineto 0.29687 0.15542 lineto 0.29818 0.1551 lineto 0.29948 0.15485 lineto 0.30078 0.15467 lineto 0.30208 0.15456 lineto 0.30339 0.15451 lineto 0.30469 0.15453 lineto 0.30599 0.15462 lineto 0.30729 0.15477 lineto Mistroke 0.30859 0.15499 lineto 0.3099 0.15528 lineto 0.3125 0.15605 lineto 0.3151 0.1571 lineto 0.31771 0.1584 lineto 0.32292 0.16179 lineto 0.32812 0.1662 lineto 0.33333 0.17161 lineto 0.35417 0.20229 lineto 0.375 0.24472 lineto 0.41667 0.34536 lineto 0.4375 0.3925 lineto 0.45833 0.43044 lineto 0.46875 0.44461 lineto 0.47917 0.45502 lineto 0.48437 0.45872 lineto 0.48698 0.46018 lineto 0.48958 0.46138 lineto 0.49219 0.46232 lineto 0.49349 0.46269 lineto 0.49479 0.46299 lineto 0.49609 0.46322 lineto 0.4974 0.46339 lineto 0.4987 0.46349 lineto 0.5 0.46353 lineto 0.5013 0.46349 lineto 0.5026 0.46339 lineto 0.50391 0.46322 lineto 0.50521 0.46299 lineto 0.50781 0.46232 lineto 0.51042 0.46138 lineto 0.51302 0.46018 lineto 0.51562 0.45872 lineto 0.52083 0.45502 lineto 0.53125 0.44461 lineto 0.54167 0.43044 lineto 0.5625 0.3925 lineto 0.58333 0.34536 lineto 0.625 0.24472 lineto 0.64583 0.20229 lineto 0.65625 0.18523 lineto 0.66667 0.17161 lineto 0.67188 0.1662 lineto 0.67708 0.16179 lineto 0.67969 0.15997 lineto 0.68229 0.1584 lineto 0.6849 0.1571 lineto 0.6875 0.15605 lineto 0.6888 0.15563 lineto 0.6901 0.15528 lineto Mistroke 0.69141 0.15499 lineto 0.69271 0.15477 lineto 0.69401 0.15462 lineto 0.69531 0.15453 lineto 0.69661 0.15451 lineto 0.69792 0.15456 lineto 0.69922 0.15467 lineto 0.70052 0.15485 lineto 0.70313 0.15542 lineto 0.70443 0.1558 lineto 0.70573 0.15625 lineto 0.70833 0.15734 lineto 0.71354 0.16032 lineto 0.71875 0.16433 lineto 0.72917 0.17532 lineto 0.73958 0.19002 lineto 0.75 0.20802 lineto 0.79167 0.30195 lineto 0.8125 0.35285 lineto 0.83333 0.39891 lineto 0.85417 0.43508 lineto 0.86458 0.44815 lineto 0.86979 0.45326 lineto 0.875 0.45737 lineto 0.8776 0.45904 lineto 0.88021 0.46045 lineto 0.88281 0.4616 lineto 0.88542 0.46248 lineto 0.88672 0.46282 lineto 0.88802 0.46309 lineto 0.88932 0.4633 lineto 0.89063 0.46344 lineto 0.89193 0.46351 lineto 0.89323 0.46352 lineto 0.89453 0.46346 lineto 0.89583 0.46333 lineto 0.89714 0.46314 lineto 0.89844 0.46287 lineto 0.90104 0.46215 lineto 0.90365 0.46116 lineto 0.90625 0.45991 lineto 0.91146 0.45662 lineto 0.91667 0.4523 lineto 0.92708 0.44073 lineto 0.9375 0.4255 lineto 0.95833 0.38588 lineto 1 0.28654 lineto Mfstroke grestore grestore grestore grestore % End of Graphics MathPictureEnd\ \>"], "Graphics", Evaluatable->False, AspectRatioFixed->True, ImageSize->{371, 229}, ImageMargins->{{0, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHggYjN[Vi^OShn03ooeGooj[ooonICXf=SLcII03=Voc=Vc3=V VC=VIS=VP000ol0000<0003o`0006X0001^0003 o`0000h000?o0000;`03o`H000?o0000>@000ol0000>0003o`0006T0001]0003o`0000l000?o0000 >0000ol0000h0003o`00010000?o0000J00006`000?o00004@000ol0000g0003o`0003L000?o0000 4P000ol0001W0000J`000ol0000B0003o`0003L000?o0000=`000ol0000C0003o`0006H0001[0003 o`0001<000?o0000=P000ol0000f0003o`0001@000?o0000IP0006X000?o00005@000ol0000e0003 o`0003D000?o00005P000ol0001U0000J@000ol0000G0003o`0003@000?o0000=0000ol0000H0003 o`0006@0001X0003o`0001T000?o0000<`000ol0000d0003o`0001T000?o0000H`0006L000?o0000 6P000ol0000c0003o`0003<000?o00006`000ol0001R0000I`000ol0000K0003o`00038000?o0000 0003o`0004D000?o0000?@000ol0000Q0003 o`00024000?o0000?P000ol000150003o`0000T0000<0003o`3o02T000?o00006P000ol0000;0003 o`0002T000?o00001@000ol0000P0003o`00024000?o00001@000ol0000X0003o`0000`000?o0000 6P000ol0000V0003o`3o00X0000<0003o`3o02T000?o00006P000ol0000;0003o`0002T000?o0000 1@000ol0000P0003o`00020000?o00001P000ol0000X0003o`0000`000?o00006P000ol0000V0003 o`3o00X0000<0?ooG_l:000030001?l00?lX0003o`0001T000?o000030000ol0000Y0003o`0000H0 00?o00007`000ol0000O0003o`0000L000?o0000:0000ol0000=0003o`0001T000?o00009@001?l0 0?l:000030001Ol0003o02L000?o000060000ol0000=0003o`0002T000?o00001P000ol0000O0003 o`0001l000?o00001`000ol0000X0003o`0000d000?o00006@000ol0000T0005o`000?l02P0000`0 00Go0000o`0W0003o`0001P000?o00003@000ol0000Y0003o`0000L000?o00007P000ol0000N0003 o`0000P000?o0000:0000ol0000>0003o`0001P000?o000090001Ol0003o00X0000A0003o`0003l0 00?o0000@`000ol0000N0003o`0001h000?o0000A0000ol0000o0003o`0000`0000A0003o`0003h0 00?o0000A@000ol0000M0003o`0001h000?o0000A@000ol0000m0003o`0000d0000B0003o`0003d0 00?o0000A@000ol0000M0003o`0001d000?o0000AP000ol0000m0003o`0000d0000B0003o`0003`0 00?o0000AP000ol0000M0003o`0001d000?o0000AP000ol0000l0003o`0000h0000B0003o`0003`0 00?o0000A`000ol0000L0003o`0001`000?o0000B0000ol0000k0003o`0000h0000C0003o`0003X0 00?o0000B0000ol0000L0003o`0001`000?o0000B0000ol0000k0003o`0000h0000C0003o`0003X0 00?o0000B@000ol0000K0003o`0001/000?o0000B@000ol0000j0003o`0000l0000D0003o`0003P0 00?o0000BP000ol0000K0003o`0001/000?o0000BP000ol0000i0003o`0000l0000D0003o`0003P0 00?o0000BP000ol0000K0003o`0001/000?o0000BP000ol0000h0003o`000100000E0003o`0003L0 00?o0000B`000ol0000J0003o`0001X000?o0000C0000ol0000g0003o`000100000E0003o`0003H0 00?o0000C0000ol0000J0003o`0001X000?o0000C0000ol0000g0003o`000100000F0003o`0003D0 00?o0000C@000ol0000I0003o`0001T000?o0000C@000ol0000f0003o`000140000F0003o`0003@0 00?o0000CP000ol0000I0003o`0001T000?o0000CP000ol0000e0003o`000140000F0003o`0003@0 00?o0000C`000ol0000H0003o`0001T000?o0000CP000ol0000d0003o`000180000G0003o`000380 00?o0000D0000ol0000H0003o`0001P000?o0000D0000ol0000c0003o`000180000G0003o`000380 00?o0000D@000ol0000G0003o`0001P000?o0000D0000ol0000b0003o`0001<0000H0003o`000340 00?o0000D@000ol0000G0003o`0001L000?o0000DP000ol0000a0003o`0001<0000H0003o`000300 00?o0000D`000ol0000F0003o`0001L000?o0000DP000ol0000a0003o`0001<0000I0003o`0002l0 00?o0000D`000ol0000F0003o`0001H000?o0000D`000ol0000`0003o`0001@0000I0003o`0002h0 00?o0000E0000ol0000F0003o`0001H000?o0000E0000ol0000_0003o`0001@0000I0003o`0002h0 00?o0000E@000ol0000E0003o`0001H000?o0000E0000ol0000^0003o`0001D0000J0003o`0002`0 00?o0000EP000ol0000;00Go1@000ol0000E0003o`0005H000?o0000;@000ol0000E00006P000ol0 000/0003o`0005L000?o000030000ol000050003o`0001D000?o0000EP000ol0000]0003o`0001D0 000K0003o`0002X000?o0000F0000ol0000<0003o`0000<01OlD0003o`0005P000?o0000:`000ol0 000F00006`000ol0000Z0003o`0005T000?o00002`000ol000050003o`0001@000?o0000F0000ol0 000[0003o`0001H0000L0003o`0002T000?o0000F@000ol0000;0003o`0000D000?o000050000ol0 001H0003o`0002X000?o00005`0001`000?o0000:0000ol0001K0003o`0000X000?o00001@000ol0 000C0003o`0005X000?o0000:@000ol0000G000070000ol0000X0003o`0005/000?o00002003o`L0 00?o00004`000ol0001J0003o`0002P000?o0000600001d000?o00009P000ol0001M0003o`0000T0 00?o00001@000ol0000B0003o`0005`000?o00009P000ol0000I00007@000ol0000V0003o`0005d0 00?o00004@000ol0000B0003o`0005`000?o00009P000ol0000I00007@000ol0000U0003o`0005l0 00?o000040000ol0000A0003o`0005h000?o000090000ol0000J00007P000ol0000T0003o`0005l0 00?o000040000ol0000A0003o`0005l000?o00008`000ol0000J00007P000ol0000S0003o`000640 00?o00003`000ol0000@0003o`00060000?o00008P000ol0000K00007`000ol0000Q0003o`0006<0 00?o00003P000ol0000?0003o`00068000?o00008@000ol0000K000080000ol0000P0003o`0006<0 00?o00003P000ol0000?0003o`0006<000?o00007`000ol0000L000080000ol0000O0003o`0006D0 00?o00003@000ol0000>0003o`0006@000?o00007P000ol0000M00008@000ol0000N0003o`0006D0 00?o00003@000ol0000>0003o`0006D000?o00007@000ol0000M00008P000ol0000L0003o`0006L0 00?o000030000ol0000=0003o`0006L000?o00006`000ol0000N00008P000ol0000K0003o`0006P0 00?o000030000ol0000=0003o`0006L000?o00006`000ol0000N00008`000ol0000J0003o`0006T0 00?o00002`000ol0000<0003o`0006T000?o00006@000ol0000O000090000ol0000H0003o`0006X0 00?o00002`000ol0000<0003o`0006X000?o00005`000ol0000P00009@000ol0000G0003o`0006/0 00?o00002P000ol0000;0003o`0006/000?o00005`000ol0000P00009P000ol0000E0003o`0006d0 00?o00002@000ol0000:0003o`0006d000?o00005@000ol0000Q00009`000ol0000C0003o`0006h0 00?o00002@000ol000090003o`0006l000?o00004`000ol0000R0000:0000ol0000A0003o`000700 0_l90003o`0000P000?o0000L0000ol0000B0003o`0002<0000X0003o`00010000?o0000L`000ol0 00060003o`0000L000?o0000LP000ol0000@0003o`0002@0000Y0003o`0000h000?o0000M@000ol0 00050003o`0000H000?o0000M0000ol0000>0003o`0002D0000Z0003o`0000`000?o0000M`000ol0 00040003o`0000D000?o0000MP02o`d000?o00009P0002/00_l;0003o`0007D01Ol50003o`0000@0 00?o0000N@000ol000090003o`0002L0000]00;o1P03ogP000Co00000ol30003o`0000800_mm00;o 1`02obX0000_00KoO0000ol0000300SoP008ob`0002b0003o`0000D000?o0000]P000;<000?o0000 10000ol0002f0000/0001Ol0003o00D000?o0000]P000;0000Go0000o`050003o`000;H0002a00?o 1P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000 ^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000 ^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000 ^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000 /@03o`H000?o0000]P000;0000Go0000o`050003o`000;H0002d0004o`0000Go]P000;@000?o0000 0`000ol0002f0000/P02o`H000?o0000]P000;@000?o00000`000ol0002f0000/0001Ol0003o00D0 00?o0000]P000;400ol60003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0 002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0 002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0 002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0 002b00?o1@000ol0002f0000/`000ol000040003o`000;H0002_00Ko1@000ol0002f0000[`001Ol0 003o00@01Onf0000/0001?l00?no0000/@000ol0o`2o0000/P02okl0002c0003o`000;d0003o07@0 003o07@00000\ \>"], ImageRangeCache->{{{0, 370}, {228, 0}} -> {-4.29571, -4.24217, 0.0229967, 0.0372115}}], Cell[TextData["a) Sin(x)-2\nb) Cos(x)+2\nc) 2Sin(x)\nd) 2Cos(2x)"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "Choice= \n\na:=Plot[Sin[x]-2,{x,-4,4}, DisplayFunction->Identity]\n\ b:=Plot[Cos[x]+2,{x,-4,4}, DisplayFunction->Identity]\n\ c:=Plot[2Sin[x],{x,-4,4}, DisplayFunction->Identity]\n\ d:=Plot[2Cos[2x],{x,-4,4},DisplayFunction->Identity]\n\n\ Show[Choice,ex4,DisplayFunction->$DisplayFunction,PlotRange->{{-4,4},{-4,4}}];\ \n"], "Input", AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData[{ StyleBox["\n", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["GRAPH 3", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 0.61803 MathPictureStart % Scaling calculations 0.5 0.125 0.30902 0.07725 [ [(-4)] 0 0.29652 0 1 Msboxa [(-3)] 0.125 0.29652 0 1 Msboxa [(-2)] 0.25 0.29652 0 1 Msboxa [(-1)] 0.375 0.29652 0 1 Msboxa [(1)] 0.625 0.29652 0 1 Msboxa [(2)] 0.75 0.29652 0 1 Msboxa [(3)] 0.875 0.29652 0 1 Msboxa [(4)] 1 0.29652 0 1 Msboxa [(-4)] 0.4875 0 1 0 Msboxa [(-3)] 0.4875 0.07725 1 0 Msboxa [(-2)] 0.4875 0.15451 1 0 Msboxa [(-1)] 0.4875 0.23176 1 0 Msboxa [(1)] 0.4875 0.38627 1 0 Msboxa [(2)] 0.4875 0.46353 1 0 Msboxa [(3)] 0.4875 0.54078 1 0 Msboxa [(4)] 0.4875 0.61803 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 0.61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath %%Object: Graphics [ ] 0 setdash 0 setgray gsave gsave 0.002 setlinewidth 0 0.30902 moveto 1 0.30902 lineto stroke 0 0.30277 moveto 0 0.31527 lineto stroke 0 setgray [(-4)] 0 0.29652 0 1 Mshowa 0.125 0.30277 moveto 0.125 0.31527 lineto stroke 0 setgray [(-3)] 0.125 0.29652 0 1 Mshowa 0.25 0.30277 moveto 0.25 0.31527 lineto stroke 0 setgray [(-2)] 0.25 0.29652 0 1 Mshowa 0.375 0.30277 moveto 0.375 0.31527 lineto stroke 0 setgray [(-1)] 0.375 0.29652 0 1 Mshowa 0.625 0.30277 moveto 0.625 0.31527 lineto stroke 0 setgray [(1)] 0.625 0.29652 0 1 Mshowa 0.75 0.30277 moveto 0.75 0.31527 lineto stroke 0 setgray [(2)] 0.75 0.29652 0 1 Mshowa 0.875 0.30277 moveto 0.875 0.31527 lineto stroke 0 setgray [(3)] 0.875 0.29652 0 1 Mshowa 1 0.30277 moveto 1 0.31527 lineto stroke 0 setgray [(4)] 1 0.29652 0 1 Mshowa 0.5 0 moveto 0.5 0.61803 lineto stroke 0.49375 0 moveto 0.50625 0 lineto stroke 0 setgray [(-4)] 0.4875 0 1 0 Mshowa 0.49375 0.07725 moveto 0.50625 0.07725 lineto stroke 0 setgray [(-3)] 0.4875 0.07725 1 0 Mshowa 0.49375 0.15451 moveto 0.50625 0.15451 lineto stroke 0 setgray [(-2)] 0.4875 0.15451 1 0 Mshowa 0.49375 0.23176 moveto 0.50625 0.23176 lineto stroke 0 setgray [(-1)] 0.4875 0.23176 1 0 Mshowa 0.49375 0.38627 moveto 0.50625 0.38627 lineto stroke 0 setgray [(1)] 0.4875 0.38627 1 0 Mshowa 0.49375 0.46353 moveto 0.50625 0.46353 lineto stroke 0 setgray [(2)] 0.4875 0.46353 1 0 Mshowa 0.49375 0.54078 moveto 0.50625 0.54078 lineto stroke 0 setgray [(3)] 0.4875 0.54078 1 0 Mshowa 0.49375 0.61803 moveto 0.50625 0.61803 lineto stroke 0 setgray [(4)] 0.4875 0.61803 1 0 Mshowa grestore grestore 0 0 moveto 1 0 lineto 1 0.618034 lineto 0 0.618034 lineto closepath clip newpath 0 setgray gsave gsave gsave gsave 0.004 setlinewidth 0 0.40506 moveto 0.04167 0.4248 lineto 0.08333 0.4488 lineto 0.125 0.47443 lineto 0.16667 0.49885 lineto 0.1875 0.50976 lineto 0.20833 0.51939 lineto 0.22917 0.52747 lineto 0.25 0.53377 lineto 0.26042 0.5362 lineto 0.27083 0.53813 lineto 0.28125 0.53954 lineto 0.28646 0.54005 lineto 0.28906 0.54025 lineto 0.29167 0.54042 lineto 0.29427 0.54056 lineto 0.29687 0.54067 lineto 0.29818 0.54071 lineto 0.29948 0.54074 lineto 0.30078 0.54076 lineto 0.30208 0.54077 lineto 0.30339 0.54078 lineto 0.30469 0.54078 lineto 0.30599 0.54077 lineto 0.30729 0.54075 lineto 0.30859 0.54072 lineto 0.3099 0.54068 lineto 0.3125 0.54059 lineto 0.3151 0.54046 lineto 0.31771 0.54029 lineto 0.32292 0.53986 lineto 0.32812 0.5393 lineto 0.33333 0.53861 lineto 0.34375 0.53684 lineto 0.35417 0.53456 lineto 0.375 0.52853 lineto 0.39583 0.52071 lineto 0.41667 0.5113 lineto 0.45833 0.4888 lineto 0.5 0.46353 lineto 0.54167 0.43825 lineto 0.58333 0.41575 lineto 0.60417 0.40634 lineto 0.625 0.39852 lineto 0.63542 0.39527 lineto 0.64583 0.39249 lineto 0.65625 0.39021 lineto 0.66667 0.38844 lineto 0.67188 0.38775 lineto 0.67708 0.38719 lineto Mistroke 0.67969 0.38696 lineto 0.68229 0.38676 lineto 0.6849 0.3866 lineto 0.6875 0.38646 lineto 0.6888 0.38641 lineto 0.6901 0.38637 lineto 0.69141 0.38633 lineto 0.69271 0.3863 lineto 0.69401 0.38628 lineto 0.69531 0.38627 lineto 0.69661 0.38627 lineto 0.69792 0.38628 lineto 0.69922 0.38629 lineto 0.70052 0.38631 lineto 0.70313 0.38638 lineto 0.70443 0.38643 lineto 0.70573 0.38649 lineto 0.70833 0.38663 lineto 0.71354 0.387 lineto 0.71875 0.38751 lineto 0.72917 0.38892 lineto 0.73958 0.39085 lineto 0.75 0.39328 lineto 0.77083 0.39959 lineto 0.79167 0.40766 lineto 0.83333 0.4282 lineto 0.875 0.45262 lineto 0.91667 0.47825 lineto 0.95833 0.50225 lineto 1 0.52199 lineto Mfstroke grestore grestore grestore gsave gsave gsave 0.004 setlinewidth 0 0.40506 moveto 0.04167 0.4248 lineto 0.08333 0.4488 lineto 0.125 0.47443 lineto 0.16667 0.49885 lineto 0.1875 0.50976 lineto 0.20833 0.51939 lineto 0.22917 0.52747 lineto 0.25 0.53377 lineto 0.26042 0.5362 lineto 0.27083 0.53813 lineto 0.28125 0.53954 lineto 0.28646 0.54005 lineto 0.28906 0.54025 lineto 0.29167 0.54042 lineto 0.29427 0.54056 lineto 0.29687 0.54067 lineto 0.29818 0.54071 lineto 0.29948 0.54074 lineto 0.30078 0.54076 lineto 0.30208 0.54077 lineto 0.30339 0.54078 lineto 0.30469 0.54078 lineto 0.30599 0.54077 lineto 0.30729 0.54075 lineto 0.30859 0.54072 lineto 0.3099 0.54068 lineto 0.3125 0.54059 lineto 0.3151 0.54046 lineto 0.31771 0.54029 lineto 0.32292 0.53986 lineto 0.32812 0.5393 lineto 0.33333 0.53861 lineto 0.34375 0.53684 lineto 0.35417 0.53456 lineto 0.375 0.52853 lineto 0.39583 0.52071 lineto 0.41667 0.5113 lineto 0.45833 0.4888 lineto 0.5 0.46353 lineto 0.54167 0.43825 lineto 0.58333 0.41575 lineto 0.60417 0.40634 lineto 0.625 0.39852 lineto 0.63542 0.39527 lineto 0.64583 0.39249 lineto 0.65625 0.39021 lineto 0.66667 0.38844 lineto 0.67188 0.38775 lineto 0.67708 0.38719 lineto Mistroke 0.67969 0.38696 lineto 0.68229 0.38676 lineto 0.6849 0.3866 lineto 0.6875 0.38646 lineto 0.6888 0.38641 lineto 0.6901 0.38637 lineto 0.69141 0.38633 lineto 0.69271 0.3863 lineto 0.69401 0.38628 lineto 0.69531 0.38627 lineto 0.69661 0.38627 lineto 0.69792 0.38628 lineto 0.69922 0.38629 lineto 0.70052 0.38631 lineto 0.70313 0.38638 lineto 0.70443 0.38643 lineto 0.70573 0.38649 lineto 0.70833 0.38663 lineto 0.71354 0.387 lineto 0.71875 0.38751 lineto 0.72917 0.38892 lineto 0.73958 0.39085 lineto 0.75 0.39328 lineto 0.77083 0.39959 lineto 0.79167 0.40766 lineto 0.83333 0.4282 lineto 0.875 0.45262 lineto 0.91667 0.47825 lineto 0.95833 0.50225 lineto 1 0.52199 lineto Mfstroke grestore grestore grestore grestore % End of Graphics MathPictureEnd\ \>"], "Graphics", Evaluatable->False, AspectRatioFixed->True, ImageSize->{371, 229}, ImageMargins->{{0, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHggYjN[Vi^OShn03ooeGooj[ooonICXf=SLcII03=Voc=Vc3=V VC=VIS=V00;oB`0001L00_nQ0003o`0001L00_mB00;oB@0001T00_nO0003o`0001D00_mF00;oA`0001/0 0_nM0003o`0001<00_mJ00;oA@0001d00_nK0003o`0001400_mN00;o@`0001l000?o0000V0000ol0 000?00;oHP02od40000P00;oV0000ol0000=00;oIP02ocl0000R00;oUP000ol0000;00;oJP02ocd0 000T00;oU0000ol0000900;oKP000ol0000j00009P000ol0002A0003o`0000P000?o0000K`02ocX0 000W00;oT@000ol0000600;oM002ocP0000Y00;oS`000ol0000400;oN002ocH0000[00;oS@000ol0 00030003o`0007X00_ld0000;@000ol0002:0004o`0000;oO`000ol0000a0000;P02oh001Ol50004 o`3ooh800_la0000<002ogh000Go0000o`0500;oQP000ol0000^0000`02og<000?o0000 1`000ol0002@00;o900003d000?o0000KP02o`X000?o0000TP000ol0000Q0000?P02ofd000?o0000 2P000ol0002C00;o8@0004000_mY00;o3@000ol0002E00;o7`00048000?o0000I002o`l000?o0000 U`000ol0000L0000@`02of800_lA0003o`0009P00_lL0000A@000ol0001M00;o4`000ol0002J00;o 6P0004H00_mL0003o`0001<000?o0000W0000ol0000G0000B003oeL00_lF0003o`0009d00_lG0000 B`03oe800_lH0003o`0009l00_lE0000CP02odh00_lJ0003o`000:400_lC0000D002odX00_lL0003 o`000:<00_lA0000DP000ol0001400?o7P000ol0002U00;o3`0005<00_m200;o8@000ol0002W00;o 3@0005D00olm00;o8`000ol0002Y00;o2`0005P00olg00?o9@000ol0002[0003o`0000P0001K00?o "], ImageRangeCache->{{{0, 370}, {228, 0}} -> {-4.29571, -4.24217, 0.0229967, 0.0372115}}], Cell[TextData["\na) -Sin(x)+2\nb) Cos(x)+2\nc) 2Sin(x)\nd) -2Cos(x)"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "\nChoice= \n\na:=Plot[-Sin[x]+2,{x,-4,4},DisplayFunction->Identity]\n\ b:=Plot[Cos[x]+2,{x,-4,4},DisplayFunction->Identity]\n\ c:=Plot[2Sin[x],{x,-4,4},DisplayFunction->Identity]\n\ d:=Plot[-2Cos[x],{x,-4,4},DisplayFunction->Identity]\n\n\ Show[Choice,ex5,DisplayFunction->$DisplayFunction,PlotRange->{{-4,4},{-4,4}}];\ \n"], "Input", AspectRatioFixed->False]}, Open]], Cell[CellGroupData[{Cell[TextData[{ StyleBox["\n", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["GRAPH 4", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"] }], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 0.61803 MathPictureStart % Scaling calculations 0.5 0.125 0.30902 0.07725 [ [(-4)] 0 0.29652 0 1 Msboxa [(-3)] 0.125 0.29652 0 1 Msboxa [(-2)] 0.25 0.29652 0 1 Msboxa [(-1)] 0.375 0.29652 0 1 Msboxa [(1)] 0.625 0.29652 0 1 Msboxa [(2)] 0.75 0.29652 0 1 Msboxa [(3)] 0.875 0.29652 0 1 Msboxa [(4)] 1 0.29652 0 1 Msboxa [(-4)] 0.4875 0 1 0 Msboxa [(-3)] 0.4875 0.07725 1 0 Msboxa [(-2)] 0.4875 0.15451 1 0 Msboxa [(-1)] 0.4875 0.23176 1 0 Msboxa [(1)] 0.4875 0.38627 1 0 Msboxa [(2)] 0.4875 0.46353 1 0 Msboxa [(3)] 0.4875 0.54078 1 0 Msboxa [(4)] 0.4875 0.61803 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 0.61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath %%Object: Graphics [ ] 0 setdash 0 setgray gsave gsave 0.002 setlinewidth 0 0.30902 moveto 1 0.30902 lineto stroke 0 0.30277 moveto 0 0.31527 lineto stroke 0 setgray [(-4)] 0 0.29652 0 1 Mshowa 0.125 0.30277 moveto 0.125 0.31527 lineto stroke 0 setgray [(-3)] 0.125 0.29652 0 1 Mshowa 0.25 0.30277 moveto 0.25 0.31527 lineto stroke 0 setgray [(-2)] 0.25 0.29652 0 1 Mshowa 0.375 0.30277 moveto 0.375 0.31527 lineto stroke 0 setgray [(-1)] 0.375 0.29652 0 1 Mshowa 0.625 0.30277 moveto 0.625 0.31527 lineto stroke 0 setgray [(1)] 0.625 0.29652 0 1 Mshowa 0.75 0.30277 moveto 0.75 0.31527 lineto stroke 0 setgray [(2)] 0.75 0.29652 0 1 Mshowa 0.875 0.30277 moveto 0.875 0.31527 lineto stroke 0 setgray [(3)] 0.875 0.29652 0 1 Mshowa 1 0.30277 moveto 1 0.31527 lineto stroke 0 setgray [(4)] 1 0.29652 0 1 Mshowa 0.5 0 moveto 0.5 0.61803 lineto stroke 0.49375 0 moveto 0.50625 0 lineto stroke 0 setgray [(-4)] 0.4875 0 1 0 Mshowa 0.49375 0.07725 moveto 0.50625 0.07725 lineto stroke 0 setgray [(-3)] 0.4875 0.07725 1 0 Mshowa 0.49375 0.15451 moveto 0.50625 0.15451 lineto stroke 0 setgray [(-2)] 0.4875 0.15451 1 0 Mshowa 0.49375 0.23176 moveto 0.50625 0.23176 lineto stroke 0 setgray [(-1)] 0.4875 0.23176 1 0 Mshowa 0.49375 0.38627 moveto 0.50625 0.38627 lineto stroke 0 setgray [(1)] 0.4875 0.38627 1 0 Mshowa 0.49375 0.46353 moveto 0.50625 0.46353 lineto stroke 0 setgray [(2)] 0.4875 0.46353 1 0 Mshowa 0.49375 0.54078 moveto 0.50625 0.54078 lineto stroke 0 setgray [(3)] 0.4875 0.54078 1 0 Mshowa 0.49375 0.61803 moveto 0.50625 0.61803 lineto stroke 0 setgray [(4)] 0.4875 0.61803 1 0 Mshowa grestore grestore 0 0 moveto 1 0 lineto 1 0.618034 lineto 0 0.618034 lineto closepath clip newpath 0 setgray gsave gsave gsave gsave 0.004 setlinewidth 0 0.16152 moveto 0.02083 0.15908 lineto 0.04167 0.15716 lineto 0.05208 0.15639 lineto 0.0625 0.15575 lineto 0.07292 0.15524 lineto 0.07813 0.15503 lineto 0.08333 0.15486 lineto 0.08854 0.15473 lineto 0.09115 0.15467 lineto 0.09375 0.15462 lineto 0.09635 0.15458 lineto 0.09896 0.15455 lineto 0.10026 0.15454 lineto 0.10156 0.15453 lineto 0.10286 0.15452 lineto 0.10417 0.15451 lineto 0.10547 0.15451 lineto 0.10677 0.15451 lineto 0.10807 0.15451 lineto 0.10937 0.15451 lineto 0.11068 0.15452 lineto 0.11198 0.15452 lineto 0.11328 0.15453 lineto 0.11458 0.15454 lineto 0.11979 0.1546 lineto 0.1224 0.15465 lineto 0.125 0.1547 lineto 0.13542 0.155 lineto 0.14062 0.15519 lineto 0.14583 0.15542 lineto 0.16667 0.15668 lineto 0.1875 0.15845 lineto 0.20833 0.16073 lineto 0.25 0.16676 lineto 0.29167 0.17458 lineto 0.33333 0.18399 lineto 0.375 0.19473 lineto 0.41667 0.20649 lineto 0.45833 0.21895 lineto 0.5 0.23176 lineto 0.54167 0.24458 lineto 0.58333 0.25704 lineto 0.625 0.2688 lineto 0.66667 0.27953 lineto 0.70833 0.28894 lineto 0.75 0.29677 lineto 0.77083 0.30002 lineto 0.79167 0.30279 lineto 0.8125 0.30508 lineto Mistroke 0.83333 0.30685 lineto 0.84375 0.30754 lineto 0.85417 0.3081 lineto 0.85938 0.30833 lineto 0.86458 0.30853 lineto 0.86979 0.30869 lineto 0.875 0.30882 lineto 0.8776 0.30888 lineto 0.88021 0.30892 lineto 0.88281 0.30896 lineto 0.88542 0.30898 lineto 0.88672 0.30899 lineto 0.88802 0.309 lineto 0.88932 0.30901 lineto 0.89063 0.30901 lineto 0.89193 0.30902 lineto 0.89323 0.30902 lineto 0.89453 0.30901 lineto 0.89583 0.30901 lineto 0.89714 0.309 lineto 0.89844 0.309 lineto 0.90104 0.30897 lineto 0.90365 0.30894 lineto 0.90625 0.3089 lineto 0.91146 0.3088 lineto 0.91667 0.30866 lineto 0.92708 0.30829 lineto 0.9375 0.30778 lineto 0.95833 0.30637 lineto 0.97917 0.30444 lineto 1 0.30201 lineto Mfstroke grestore grestore grestore gsave gsave gsave 0.004 setlinewidth 0 0.16152 moveto 0.02083 0.15908 lineto 0.04167 0.15716 lineto 0.05208 0.15639 lineto 0.0625 0.15575 lineto 0.07292 0.15524 lineto 0.07813 0.15503 lineto 0.08333 0.15486 lineto 0.08854 0.15473 lineto 0.09115 0.15467 lineto 0.09375 0.15462 lineto 0.09635 0.15458 lineto 0.09896 0.15455 lineto 0.10026 0.15454 lineto 0.10156 0.15453 lineto 0.10286 0.15452 lineto 0.10417 0.15451 lineto 0.10547 0.15451 lineto 0.10677 0.15451 lineto 0.10807 0.15451 lineto 0.10937 0.15451 lineto 0.11068 0.15452 lineto 0.11198 0.15452 lineto 0.11328 0.15453 lineto 0.11458 0.15454 lineto 0.11979 0.1546 lineto 0.1224 0.15465 lineto 0.125 0.1547 lineto 0.13542 0.155 lineto 0.14062 0.15519 lineto 0.14583 0.15542 lineto 0.16667 0.15668 lineto 0.1875 0.15845 lineto 0.20833 0.16073 lineto 0.25 0.16676 lineto 0.29167 0.17458 lineto 0.33333 0.18399 lineto 0.375 0.19473 lineto 0.41667 0.20649 lineto 0.45833 0.21895 lineto 0.5 0.23176 lineto 0.54167 0.24458 lineto 0.58333 0.25704 lineto 0.625 0.2688 lineto 0.66667 0.27953 lineto 0.70833 0.28894 lineto 0.75 0.29677 lineto 0.77083 0.30002 lineto 0.79167 0.30279 lineto 0.8125 0.30508 lineto Mistroke 0.83333 0.30685 lineto 0.84375 0.30754 lineto 0.85417 0.3081 lineto 0.85938 0.30833 lineto 0.86458 0.30853 lineto 0.86979 0.30869 lineto 0.875 0.30882 lineto 0.8776 0.30888 lineto 0.88021 0.30892 lineto 0.88281 0.30896 lineto 0.88542 0.30898 lineto 0.88672 0.30899 lineto 0.88802 0.309 lineto 0.88932 0.30901 lineto 0.89063 0.30901 lineto 0.89193 0.30902 lineto 0.89323 0.30902 lineto 0.89453 0.30901 lineto 0.89583 0.30901 lineto 0.89714 0.309 lineto 0.89844 0.309 lineto 0.90104 0.30897 lineto 0.90365 0.30894 lineto 0.90625 0.3089 lineto 0.91146 0.3088 lineto 0.91667 0.30866 lineto 0.92708 0.30829 lineto 0.9375 0.30778 lineto 0.95833 0.30637 lineto 0.97917 0.30444 lineto 1 0.30201 lineto Mfstroke grestore grestore grestore grestore % End of Graphics MathPictureEnd\ \>"], "Graphics", Evaluatable->False, AspectRatioFixed->True, ImageSize->{371, 229}, ImageMargins->{{0, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHggYjN[Vi^OShn03ooeGooj[ooonICXf=SLcII03=Voc=Vc3=V VC=VIS=V00Co:0000ol0002f0000 TP03obD000?o0000]P0009D01?lQ0003o`000;H0002I00?o7P000ol0002f0000W004oaX000?o0000 ]P000:001?lF0003o`000;H0002T00?o4`000ol0002f0000Y`04o`l000?o0000]P000:/00ol<0003 o`000;H0002^00?o2@000ol0002f0000/005o`D000?o0000]P000;8000?o0?l00_l30003o`000;H0 002b0003o`0000801?nh0000Z@05o`@000?o00000`05okH0002b0003o`0000D000?o00001?nb0000 /P000ol000050003o`0000@00on_0000/003o`L000?o00001`04oj/0002b0003o`0000D000?o0000 2`04ojL0002j0003o`0000l00onT0000^P000ol0000B00CoX0000;X000?o00005P03oid0002j0003 o`0001T01?nI0000^P000ol0000M00?oUP000;X000?o00008003oi<0002j0003o`0002<00on@0000 ^P000ol0000V00?oS@0000l00olX00?o9`05obL01OlU0003o`0002H01_lV00Go9`03obX00ol80000 40000ol0000V0005o`000?l09P001Ol0003o02T000?o00009@000ol0000X0004o`0000Go8@001Ol0 003o02H000Go0000o`0Z0003o`0000L0000<00Ko:`000ol0000U0003o`0002X000?o00009@000ol0 000X0003o`0000H01OlM0003o`0002/000?o00009006o`P0000600Go00<0o`000P000ol0000O00Go 1P000ol0000M00Go10000ol0000P00Go10000ol0000U0003o`0002P000?o00002`04oaX000?o0000 :P000ol0000T0005o`000?l02@0000d000Co003o:P02obX000?o0000:0000ol0000U0003o`0002P0 00?o00003`04oaL000?o00009`02obP000Co003o2@0000h000?o0?l0;0000ol0000T0005o`000?l0 :@000ol0000U0003o`0002P000?o00004`03oa4000Go0000o`0Z0003o`0002H000?o0?l02@0000l0 0_lX0005o`000?l09P001Ol0003o02L00olW0003o`0002H00olH00Co3@001Ol0003o02H000Go0000 o`0Y00;o2@00010000?o00009`03obP00olZ0003o`0002D000?o0000:0000ol0000J00Ko2003obP0 0ol[0003o`0000L0002j0003o`0004/01omT0000^P000ol0001B00OoG@000;X000?o0000F@08oeD0 000<0003o`0002T000?o0000:0000ol0000Y0003o`0002P000?o0000:@000ol0000X0003o`0000X0 1olH0003o`0002D01?l:000030000ol0000Y0003o`0002P000?o0000:@000ol0000X0003o`0002T0 00?o0000:0000ol0000A00Oo4@000ol0000N00Oo0`000ol000080000303ooeko2P0000`000?o0000 :@000ol0000X0003o`0002T000?o0000:0000ol0000Y0003o`0002P000?o0000:@000ol0000X0003 o`0000P0000<0003o`0002T000?o0000:0000ol0000Y0003o`0002P000?o0000:@000ol0000X0003 o`0002T000?o0000:0000ol00008000030000ol0000Y0003o`0002P000?o0000:@000ol0000X0003 o`0002T000?o0000:0000ol0000Y0003o`0002P000?o000020000;X000?o0000]P000;X000?o0000 ]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000 ]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000 ]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000 ]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;X000?o0000]P000;001Ol50003 o`000;H0002b0003o`0000D000?o0000]P000;8000?o00000`05okH0002b0003o`0000D000?o0000 ]P000;8000?o00001@000ol0002f0000/P000ol000050003o`000;H0002`00?o1`000ol0002f0000 /P000ol000050003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002`00Go1@000ol0002f0000/0001Ol0003o00D000?o0000]P000;4000?o00001005okH0 002b0003o`0000D000?o0000]P000;<000?o000010000ol0002f0000/0001Ol0003o00D000?o0000 ]P000;0000Go0000o`050003o`000;H0002a00?o1P000ol0002f0000^P000ol0002f0000^P000ol0 002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0 002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0 002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0002f0000^P000ol0 002f0000^P000ol0002f0000^P000ol0002f0000/@03o`H000?o0000]P000;0000Go0000o`050003 o`000;H0002d0004o`0000Go]P000;@000?o00000`000ol0002f0000/P02o`H000?o0000]P000;@0 00?o00000`000ol0002f0000/0001Ol0003o00D000?o0000]P000;400ol60003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003o`000;H0002j0003 o`000;H0002j0003o`000;H0002j0003o`000;H0002b00?o1@000ol0002f0000/`000ol000040003 o`000;H0002_00Ko1@000ol0002f0000[`001Ol0003o00@01Onf0000/0001?l00?no0000/@000ol0 o`2o0000/P02okl0002c0003o`000;d0003o07@0003o07@00000\ \>"], ImageRangeCache->{{{0, 370}, {228, 0}} -> {-4.29571, -4.24217, 0.0229967, 0.0372115}}], Cell[TextData[ "\na) Sin(x)-.5\nb) Cos(2x)-1\nc) Sin(.5x)-1\nd) Cos(.5x)-1"], "Text", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[ "Choice= \n\na:=Plot[Sin[x]-.5,{x,-4,4},DisplayFunction->Identity]\n\ b:=Plot[Cos[2x]-1,{x,-4,4},DisplayFunction->Identity]\n\ c:=Plot[Sin[.5x]-1,{x,-4,4},DisplayFunction->Identity]d:=Plot[Cos[.5x]-1,{x,-\ 4,4},DisplayFunction->Identity]\n\n\ Show[Choice,ex6,DisplayFunction->$DisplayFunction,PlotRange->{{-4,4},{-4,4}}];\ \n"], "Input", AspectRatioFixed->False]}, Open]]}, Open]], Cell[CellGroupData[{Cell[TextData["Sunset\n"], "Section", Evaluatable->False, AspectRatioFixed->False], Cell[TextData[{ StyleBox[ "\n Well, that's all for this lesson. I hope you enjoyed it. It's easy \ to see why the graphs of Sine and Cosine can be so confusing at times. If \ you take each parameter,", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox[" a", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[",", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["b", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[",", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["c ", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox["and \n", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"], StyleBox["d", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago", FontWeight->"Bold"], StyleBox[ ", one at a time, however, it can all be worked out, often in many \ acceptable forms!!", Evaluatable->False, AspectRatioFixed->False, FontFamily->"Chicago"] }], "Text", Evaluatable->False, AspectRatioFixed->False]}, Open]] }, FrontEndVersion->"Macintosh 3.0", ScreenRectangle->{{0, 640}, {0, 460}}, WindowToolbars->{}, CellGrouping->Manual, WindowSize->{520, 365}, WindowMargins->{{36, Automatic}, {15, Automatic}}, PrivateNotebookOptions->{"ColorPalette"->{RGBColor, -1}}, ShowCellLabel->True, ShowCellTags->False, RenderingOptions->{"ObjectDithering"->True, "RasterDithering"->False}, MacintoshSystemPageSetup->"\<\ AVU/IFiQKFD000000V:^/09R]g0000000OVaH097bCP0AP1Y06`0I@1^0642HZj` 0V:gT0000001nK500TO9>000000000000000009R[[0000000000000000000000 00000000000000000000000000000000\>" ] (*********************************************************************** Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. ***********************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[1711, 51, 105, 2, 70, "Section", Evaluatable->False], Cell[1819, 55, 343, 11, 70, "Section", Evaluatable->False], Cell[2165, 68, 232, 5, 70, "Section", Evaluatable->False], Cell[2400, 75, 58, 1, 70, "Input"], Cell[2461, 78, 187, 6, 70, "Title", Evaluatable->False], Cell[2651, 86, 214, 6, 70, "Subtitle", Evaluatable->False], Cell[CellGroupData[{ Cell[2888, 94, 90, 2, 70, "Section", Evaluatable->False], Cell[2981, 98, 477, 8, 70, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[3490, 108, 95, 2, 70, "Section", Evaluatable->False], Cell[3588, 112, 489, 16, 70, "Text", Evaluatable->False], Cell[4080, 130, 77, 1, 70, "Input"], Cell[4160, 133, 468, 8, 70, "Text", Evaluatable->False], Cell[4631, 143, 86, 1, 70, "Input"], Cell[CellGroupData[{ Cell[4740, 146, 262, 5, 70, "Text", Evaluatable->False], Cell[5005, 153, 285, 5, 70, "Input"] }, Open ]], Cell[CellGroupData[{ Cell[5322, 160, 478, 16, 70, "Text", Evaluatable->False], Cell[5803, 178, 134, 3, 70, "Input"] }, Open ]], Cell[5949, 183, 501, 8, 70, "Text", Evaluatable->False] }, Closed]], Cell[CellGroupData[{ Cell[6482, 193, 84, 2, 70, "Section", Evaluatable->False], Cell[6569, 197, 3705, 146, 70, "Text", Evaluatable->False], Cell[CellGroupData[{ Cell[10297, 345, 82, 2, 70, "Subsection", Evaluatable->False], Cell[CellGroupData[{ Cell[10402, 349, 2671, 96, 70, "Text", Evaluatable->False], Cell[13076, 447, 389, 7, 70, "Text", Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[13497, 456, 90, 2, 70, "Subsection", Evaluatable->True], Cell[13590, 460, 320, 5, 70, "Input"], Cell[CellGroupData[{ Cell[13933, 467, 160, 4, 70, "Text", Evaluatable->False], Cell[14096, 473, 241, 5, 70, "Input"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[14387, 480, 81, 2, 70, "Subsection", Evaluatable->True], Cell[CellGroupData[{ Cell[14491, 484, 1679, 58, 70, "Text", Evaluatable->True], Cell[16173, 544, 288, 5, 70, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[16493, 551, 179, 4, 70, "Text", Evaluatable->False], Cell[16675, 557, 244, 5, 70, "Input"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[16960, 564, 82, 2, 70, "Subsection", Evaluatable->False], Cell[CellGroupData[{ Cell[17065, 568, 1187, 40, 70, "Text", Evaluatable->False], Cell[18255, 610, 227, 4, 70, "Input"] }, Open ]], Cell[CellGroupData[{ Cell[18514, 616, 163, 4, 70, "Text", Evaluatable->False], Cell[18680, 622, 634, 19, 70, "Input"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[19355, 643, 82, 2, 70, "Subsection", Evaluatable->False], Cell[CellGroupData[{ Cell[19460, 647, 1133, 38, 70, "Text", Evaluatable->False], Cell[20596, 687, 215, 4, 70, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[20843, 693, 153, 4, 70, "Text", Evaluatable->False], Cell[20999, 699, 240, 5, 70, "Input"] }, Closed]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[21289, 706, 86, 2, 70, "Section", Evaluatable->False], Cell[CellGroupData[{ Cell[21398, 710, 573, 16, 70, "Text", Evaluatable->False], Cell[21974, 728, 439, 8, 70, "Input", InitializationCell->True] }, Closed]], Cell[22425, 738, 22618, 485, 70, 5633, 269, "GraphicsData", "PostScript", "Graphics", Evaluatable->False], Cell[CellGroupData[{ Cell[45066, 1225, 132, 3, 70, "Text", Evaluatable->False], Cell[45201, 1230, 354, 6, 70, "Input"] }, Open ]], Cell[45567, 1238, 44, 1, 70, "Input"], Cell[45614, 1241, 169, 4, 70, "Text", Evaluatable->False], Cell[45786, 1247, 112, 2, 70, "Text", Evaluatable->False], Cell[45901, 1251, 15455, 345, 70, 4102, 200, "GraphicsData", "PostScript", "Graphics", Evaluatable->False], Cell[61359, 1598, 134, 3, 70, "Text", Evaluatable->False], Cell[61496, 1603, 342, 6, 70, "Input"], Cell[61841, 1611, 223, 5, 70, "Text", Evaluatable->False] }, Closed]], Cell[CellGroupData[{ Cell[62096, 1618, 88, 2, 70, "Section", Evaluatable->False], Cell[62187, 1622, 367, 13, 70, "Text", Evaluatable->False], Cell[CellGroupData[{ Cell[62577, 1637, 300, 12, 70, "Text", Evaluatable->False], Cell[62880, 1651, 13757, 412, 70, 6271, 314, "GraphicsData", "PostScript", "Graphics", Evaluatable->False], Cell[76640, 2065, 128, 2, 70, "Text", Evaluatable->False], Cell[76771, 2069, 378, 7, 70, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[77181, 2078, 300, 12, 70, "Text", Evaluatable->False], Cell[77484, 2092, 21454, 605, 70, 9343, 450, "GraphicsData", "PostScript", "Graphics", Evaluatable->False], Cell[98941, 2699, 124, 2, 70, "Text", Evaluatable->False], Cell[99068, 2703, 378, 7, 70, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[99478, 2712, 300, 12, 70, "Text", Evaluatable->False], Cell[99781, 2726, 13791, 412, 70, 6277, 314, "GraphicsData", "PostScript", "Graphics", Evaluatable->False], Cell[113575, 3140, 127, 2, 70, "Text", Evaluatable->False], Cell[113705, 3144, 378, 7, 70, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[114115, 3153, 300, 12, 70, "Text", Evaluatable->False], Cell[114418, 3167, 13207, 406, 70, 6321, 316, "GraphicsData", "PostScript", "Graphics", Evaluatable->False], Cell[127628, 3575, 134, 3, 70, "Text", Evaluatable->False], Cell[127765, 3580, 379, 7, 70, "Input"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[128185, 3589, 86, 2, 70, "Section", Evaluatable->False], Cell[128274, 3593, 1317, 48, 70, "Text", Evaluatable->False] }, Closed]] } ] *) (*********************************************************************** End of Mathematica Notebook file. ***********************************************************************)