(***********************************************************************

                    Mathematica-Compatible Notebook

This notebook can be used on any computer system with Mathematica 4.0,
MathReader 4.0, or any compatible application. The data for the notebook 
starts with the line containing 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[     80223,       2271]*)
(*NotebookOutlinePosition[    106776,       3231]*)
(*  CellTagsIndexPosition[    106732,       3227]*)
(*WindowFrame->Normal*)



Notebook[{

Cell[CellGroupData[{
Cell[TextData[{
  StyleBox["Mean Value Theorem",
    CellFrame->True,
    CellMargins->{{36, Inherited}, {Inherited, Inherited}},
    TextAlignment->Center,
    AspectRatioFixed->False,
    FontFamily->"Times",
    FontSize->33,
    FontSlant->"Italic",
    FontColor->RGBColor[1, 0, 0],
    Background->GrayLevel[0.899992]],
  StyleBox["\n",
    CellFrame->True,
    CellMargins->{{36, Inherited}, {Inherited, Inherited}},
    TextAlignment->Center,
    AspectRatioFixed->False,
    FontFamily->"Times",
    FontSlant->"Italic",
    FontColor->RGBColor[1, 0, 0],
    Background->GrayLevel[0.899992]],
  StyleBox["by Dan Bach, Diablo Valley College",
    CellFrame->True,
    CellMargins->{{36, Inherited}, {Inherited, Inherited}},
    TextAlignment->Center,
    AspectRatioFixed->False,
    FontFamily->"Times",
    FontSize->19,
    FontSlant->"Italic",
    FontColor->RGBColor[1, 0, 0],
    Background->GrayLevel[0.899992]]
}], "Title",
  CellFrame->True,
  CellMargins->{{36, Inherited}, {Inherited, Inherited}},
  TextAlignment->Center,
  AspectRatioFixed->False,
  Background->GrayLevel[0.899992]],

Cell["\<\
(* The secret code that makes decreasing powers *)

Unprotect[Plus];
Format[Literal[Plus[p__]]] := Module[{s1,s2},
\t\ts1 = Hold[p];
\t\ts2 = Reverse[s1];
\t\tReplacePart[HoldForm[
\t\t\t\t\tEvaluate[s2]],Plus,{1,0}]/;
\t\t\tOrderedQ[s1] && s1 =!= s2]\
\>", "Input",
  InitializationCell->True,
  AspectRatioFixed->True,
  FontSize->10,
  FontWeight->"Plain",
  FontSlant->"Plain",
  FontTracking->"Plain",
  FontVariations->{"Underline"->False,
  "Outline"->False,
  "Shadow"->False}]
}, Closed]],

Cell[TextData[
"The Mean Value Theorem from Calculus states that for a smooth function, the \
average rate of change over an interval is attained by the instantaneous rate \
of change at least once.  For example, if you drive to L.A. (400 miles) at \
various speeds, and it takes you 8 hours, then at some point you had to be \
going exactly 50 miles per hour.  \n\nWe illustrate this phenomenon with some \
nifty pictures."], "Text",
  CellFrame->True,
  Evaluatable->False,
  AspectRatioFixed->True,
  FontWeight->"Bold",
  FontSlant->"Plain",
  FontTracking->"Plain",
  Background->RGBColor[1, 0.987976, 0.761456],
  FontVariations->{"Underline"->False,
  "Outline"->False,
  "Shadow"->False}],

Cell[TextData[{
  StyleBox["Enter these cells ",
    Evaluatable->False,
    AspectRatioFixed->False],
  StyleBox["one at a time",
    Evaluatable->False,
    AspectRatioFixed->False,
    FontVariations->{"Underline"->True}],
  StyleBox[" by clicking after the command and hitting the 'Enter' key ",
    Evaluatable->False,
    AspectRatioFixed->False],
  StyleBox["(not 'Return')",
    Evaluatable->False,
    AspectRatioFixed->False,
    FontSize->12],
  StyleBox[
  ".  After you go through it once, you can change the function or the \
interval and go through it again.",
    Evaluatable->False,
    AspectRatioFixed->False]
}], "Section",
  Evaluatable->False,
  AspectRatioFixed->False],

Cell[TextData[
"First we define a function f[x] and interval [a, b]."], "Section",
  Evaluatable->False,
  AspectRatioFixed->True],

Cell[CellGroupData[{

Cell["\<\
Clear[m,t,x,a,b];

f[x_]:= x^3 + 4 x^2 - 20 x    

a = -6.7 ;
b = 6.7 ;

Print[\"f[x] = \",f[x],\"  on the interval [\",a,\", \",b,\"].\"]\t\t\t\t\t\t\
\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\
\>", "Input",
  AspectRatioFixed->False],

Cell[BoxData[
    FormBox[
      InterpretationBox[
        RowBox[{"\<\"f[x] = \"\>", "\[InvisibleSpace]", 
          FormBox[
            TagBox[\(x\^3 + 4\ x\^2 - 20\ x\),
              HoldForm],
            "TraditionalForm"], 
          "\[InvisibleSpace]", "\<\"  on the interval [\"\>", 
          "\[InvisibleSpace]", \(-6.7`\), "\[InvisibleSpace]", "\<\", \"\>", 
          "\[InvisibleSpace]", "6.7`", "\[InvisibleSpace]", "\<\"].\"\>"}],
        SequenceForm[ "f[x] = ", 
          Plus[ 
            Times[ -20, x], 
            Times[ 4, 
              Power[ x, 2]], 
            Power[ x, 3]], "  on the interval [", -6.7000000000000002, ", ", 
          6.7000000000000002, "]."],
        Editable->False], TraditionalForm]], "Print"]
}, Open  ]],

Cell[TextData["What does the graph look like?"], "Section",
  Evaluatable->False,
  AspectRatioFixed->True],

Cell[CellGroupData[{

Cell["\<\
pf = Plot[ f[x], {x,a,b}, PlotRange->All,
\t\tPlotStyle->{{Hue[.6], Thickness[.007]}}];      \
\>", "Input",
  AspectRatioFixed->False],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .61803 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.0710732 0.0432896 0.00161707 [
[.07356 .03079 -6 -9 ]
[.07356 .03079 6 0 ]
[.21571 .03079 -6 -9 ]
[.21571 .03079 6 0 ]
[.35785 .03079 -6 -9 ]
[.35785 .03079 6 0 ]
[.64215 .03079 -3 -9 ]
[.64215 .03079 3 0 ]
[.78429 .03079 -3 -9 ]
[.78429 .03079 3 0 ]
[.92644 .03079 -3 -9 ]
[.92644 .03079 3 0 ]
[.4875 .12414 -12 -4.5 ]
[.4875 .12414 0 4.5 ]
[.4875 .205 -18 -4.5 ]
[.4875 .205 0 4.5 ]
[.4875 .28585 -18 -4.5 ]
[.4875 .28585 0 4.5 ]
[.4875 .3667 -18 -4.5 ]
[.4875 .3667 0 4.5 ]
[.4875 .44756 -18 -4.5 ]
[.4875 .44756 0 4.5 ]
[.4875 .52841 -18 -4.5 ]
[.4875 .52841 0 4.5 ]
[.4875 .60927 -18 -4.5 ]
[.4875 .60927 0 4.5 ]
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 g
.25 Mabswid
[ ] 0 setdash
.07356 .04329 m
.07356 .04954 L
s
[(-6)] .07356 .03079 0 1 Mshowa
.21571 .04329 m
.21571 .04954 L
s
[(-4)] .21571 .03079 0 1 Mshowa
.35785 .04329 m
.35785 .04954 L
s
[(-2)] .35785 .03079 0 1 Mshowa
.64215 .04329 m
.64215 .04954 L
s
[(2)] .64215 .03079 0 1 Mshowa
.78429 .04329 m
.78429 .04954 L
s
[(4)] .78429 .03079 0 1 Mshowa
.92644 .04329 m
.92644 .04954 L
s
[(6)] .92644 .03079 0 1 Mshowa
.125 Mabswid
.1091 .04329 m
.1091 .04704 L
s
.14463 .04329 m
.14463 .04704 L
s
.18017 .04329 m
.18017 .04704 L
s
.25124 .04329 m
.25124 .04704 L
s
.28678 .04329 m
.28678 .04704 L
s
.32232 .04329 m
.32232 .04704 L
s
.39339 .04329 m
.39339 .04704 L
s
.42893 .04329 m
.42893 .04704 L
s
.46446 .04329 m
.46446 .04704 L
s
.53554 .04329 m
.53554 .04704 L
s
.57107 .04329 m
.57107 .04704 L
s
.60661 .04329 m
.60661 .04704 L
s
.67768 .04329 m
.67768 .04704 L
s
.71322 .04329 m
.71322 .04704 L
s
.74876 .04329 m
.74876 .04704 L
s
.81983 .04329 m
.81983 .04704 L
s
.85537 .04329 m
.85537 .04704 L
s
.8909 .04329 m
.8909 .04704 L
s
.03802 .04329 m
.03802 .04704 L
s
.00249 .04329 m
.00249 .04704 L
s
.96198 .04329 m
.96198 .04704 L
s
.99751 .04329 m
.99751 .04704 L
s
.25 Mabswid
0 .04329 m
1 .04329 L
s
.5 .12414 m
.50625 .12414 L
s
[(50)] .4875 .12414 1 0 Mshowa
.5 .205 m
.50625 .205 L
s
[(100)] .4875 .205 1 0 Mshowa
.5 .28585 m
.50625 .28585 L
s
[(150)] .4875 .28585 1 0 Mshowa
.5 .3667 m
.50625 .3667 L
s
[(200)] .4875 .3667 1 0 Mshowa
.5 .44756 m
.50625 .44756 L
s
[(250)] .4875 .44756 1 0 Mshowa
.5 .52841 m
.50625 .52841 L
s
[(300)] .4875 .52841 1 0 Mshowa
.5 .60927 m
.50625 .60927 L
s
[(350)] .4875 .60927 1 0 Mshowa
.125 Mabswid
.5 .05946 m
.50375 .05946 L
s
.5 .07563 m
.50375 .07563 L
s
.5 .0918 m
.50375 .0918 L
s
.5 .10797 m
.50375 .10797 L
s
.5 .14031 m
.50375 .14031 L
s
.5 .15648 m
.50375 .15648 L
s
.5 .17266 m
.50375 .17266 L
s
.5 .18883 m
.50375 .18883 L
s
.5 .22117 m
.50375 .22117 L
s
.5 .23734 m
.50375 .23734 L
s
.5 .25351 m
.50375 .25351 L
s
.5 .26968 m
.50375 .26968 L
s
.5 .30202 m
.50375 .30202 L
s
.5 .31819 m
.50375 .31819 L
s
.5 .33436 m
.50375 .33436 L
s
.5 .35053 m
.50375 .35053 L
s
.5 .38287 m
.50375 .38287 L
s
.5 .39905 m
.50375 .39905 L
s
.5 .41522 m
.50375 .41522 L
s
.5 .43139 m
.50375 .43139 L
s
.5 .46373 m
.50375 .46373 L
s
.5 .4799 m
.50375 .4799 L
s
.5 .49607 m
.50375 .49607 L
s
.5 .51224 m
.50375 .51224 L
s
.5 .54458 m
.50375 .54458 L
s
.5 .56075 m
.50375 .56075 L
s
.5 .57692 m
.50375 .57692 L
s
.5 .59309 m
.50375 .59309 L
s
.5 .02712 m
.50375 .02712 L
s
.5 .01095 m
.50375 .01095 L
s
.25 Mabswid
.5 0 m
.5 .61803 L
s
0 .4 1 r
.007 w
.02381 .06398 m
.04262 .08832 L
.06244 .11023 L
.08426 .13014 L
.10458 .14496 L
.12297 .15548 L
.14264 .16387 L
.15285 .16714 L
.16394 .16988 L
.16902 .17086 L
.17441 .17173 L
.17946 .17238 L
.18408 .17283 L
.18639 .17301 L
.18891 .17317 L
.19128 .17328 L
.19349 .17336 L
.19482 .1734 L
.19606 .17342 L
.19718 .17343 L
.19839 .17344 L
.19902 .17344 L
.19972 .17344 L
.20044 .17343 L
.20111 .17342 L
.20232 .1734 L
.20362 .17337 L
.20597 .17329 L
.20853 .17317 L
.21319 .17287 L
.21772 .17246 L
.22192 .17199 L
.23154 .17059 L
.24058 .16888 L
.26118 .16364 L
.28137 .15691 L
.29987 .14954 L
.33949 .13069 L
.3776 .10991 L
.41816 .08664 L
.45721 .06475 L
.49871 .04388 L
.51951 .03493 L
.53869 .02786 L
.55856 .02194 L
.57716 .01787 L
.5862 .01646 L
.59085 .0159 L
.59592 .0154 L
.59879 .01518 L
Mistroke
.60145 .01501 L
.604 .01488 L
.6053 .01483 L
.6067 .01479 L
.60738 .01477 L
.60809 .01475 L
.60937 .01473 L
.61056 .01472 L
.61188 .01472 L
.61305 .01472 L
.6143 .01473 L
.61548 .01475 L
.61656 .01478 L
.61885 .01486 L
.62138 .01498 L
.62402 .01514 L
.6265 .01533 L
.63092 .01577 L
.63568 .01637 L
.64653 .01828 L
.65646 .02069 L
.67542 .02718 L
.68616 .03201 L
.69613 .03728 L
.73523 .06573 L
.75662 .08695 L
.77678 .11094 L
.8153 .16829 L
.85627 .24738 L
.89572 .34286 L
.93366 .45411 L
.97406 .59518 L
.97619 .60332 L
Mfstroke
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{282, 174.25},
  ImageMargins->{{34, 0}, {0, 0}},
  ImageRegion->{{0, 1}, {0, 1}},
  ImageCache->GraphicsData["Bitmap", "\<\
CF5dJ6E]HGAYHf4PAg9QL6QYHg<PAVmbKF5d0`40004J0000[R000`400?l00000o`00003oo`3ooolK
0?ooo`005`3oool3000002D0oooo0`00000S0?ooo`D000008P3oool00`000000oooo0?ooo`0Q0?oo
o`D000009@3oool3000002<0oooo0`00000G0?ooo`005P3oool01@000000oooo0?ooo`3oool00000
02D0oooo00<000000?ooo`3oool08`3oool010000000oooo0?ooo`00000R0?ooo`030000003oool0
oooo0280oooo00@000000?ooo`3oool000009P3oool00`000000oooo0?ooo`0Q0?ooo`050000003o
ool0oooo0?ooo`0000005P3oool00100oooo1@0000000`3oool000000?ooo`020?ooo`030000003o
ool0oooo01X0oooo1@0000000`3oool0000000000003000001d0oooo1@0000030?ooo`030000003o
ool0oooo0280oooo00<000000?ooo`3oool08`3oool00`000000oooo0?ooo`0S0?ooo`D000008P3o
ool01@000000oooo0?ooo`3oool0000001H0oooo000F0?ooo`@000008`3oool010000000oooo0?oo
o`00000W0?ooo`030000003oool0oooo0240oooo0P00000U0?ooo`030000003oool0oooo0280oooo
00@000000?ooo`3oool000008`3oool4000001L0oooo000F0?ooo`030000003oool0oooo02D0oooo
00<000000?ooo`000000903oool01@000000oooo0?ooo`3oool000000280oooo00<000000?ooo`3o
ool0503ooolA001Vo`030000003oool0oooo0280oooo00<000000?ooo`0000008`3oool00`000000
oooo0?ooo`0H0?ooo`005`3oool00`000000oooo0?ooo`0U0?ooo`800000903oool01@000000oooo
0?ooo`3oool000000280oooo00<000000?ooo`3oool0403oool4001Vo`d0oooo00@000000?ooo`3o
ool0oooo1@00I_lQ0?ooo`800000903oool00`000000oooo0?ooo`0G0?ooo`00603oool2000002H0
oooo00<000000?ooo`3oool08`3oool3000002<0oooo00<000000?ooo`3oool02`3oool5001Voa80
oooo0`0000050?ooo`<006Ko7`3oool00`000000oooo0?ooo`0S0?ooo`8000005`3oool008`0oooo
0P0000080?ooo`@006Ko8P3oool2001Voe`0oooo002<0?ooo`030000003oool0oooo00@0oooo0`00
I_lX0?ooo`03001Vo`3oool0oooo05T0oooo002<0?ooo`040000003oool0oooo0?ooo`<006Ko;03o
ool3001VoeP0oooo002<0?ooo`040000003oool006Ko001Voc80oooo0P00I_mF0?ooo`00S03oool0
0`00000006Ko0?ooo`0e0?ooo`03001Vo`3oool0oooo05<0oooo00020?ooohT000000P00I_lh0000
0003001Vo`000000000004l000000`3oool000<0oooo00<000000?ooo`3oool01P3oool00`000000
oooo0?ooo`070?ooo`030000003oool0oooo00L0oooo00<000000?ooo`3oool01`3oool00`000000
oooo0?ooo`070?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3oool01`3oool00`000000
oooo0?ooo`070?ooo`030000003oool0oooo00L0oooo00<000000?ooo`3oool01`3oool00`000000
oooo0?ooo`070?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3oool01`3oool00`000000
oooo0?ooo`040?ooo`8006Ko00<0oooo0000003oool0203oool00`000000oooo0?ooo`070?ooo`03
0000003oool0oooo00H0oooo00<000000?ooo`3oool01`3oool00`000000oooo0?ooo`070?ooo`03
0000003oool0oooo00H0oooo0P00I_l90?ooo`030000003oool0oooo00L0oooo00<000000?ooo`3o
ool01P3oool00`000000oooo0?ooo`070?ooo`030000003oool0oooo00L0oooo00<000000?ooo`3o
ool01`3oool00`000000oooo0?ooo`070?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3o
ool00P3oool008L0oooo0P00I_l30?ooo`030000003oool0oooo03T0oooo00<006Ko0?ooo`3oool0
C`3oool008D0oooo0P00I_l50?ooo`030000003oool0oooo03X0oooo0P00I_m?0?ooo`00P`3oool2
001Vo`L0oooo0P00000m0?ooo`03001Vo`3oool0oooo04`0oooo00090?ooo`03001Vo`3oool0oooo
07D0oooo0P00I_l90?ooo`030000003oool0oooo03d0oooo00<006Ko0?ooo`3oool0B`3oool000T0
oooo00<006Ko0?ooo`3oool0L`3oool2001Vo`/0oooo00<000000?ooo`3oool0?P3oool00`00I_l0
oooo0?ooo`1:0?ooo`002P3oool00`00I_l0oooo0?ooo`1`0?ooo`8006Ko3@3oool00`000000oooo
0?ooo`0o0?ooo`03001Vo`3oool0oooo04T0oooo000;0?ooo`03001Vo`3oool0oooo06d0oooo0P00
I_l?0?ooo`030000003oool0oooo0400oooo00<006Ko0?ooo`3oool0B03oool000`0oooo00<006Ko
0?ooo`3oool0J`3oool00`00I_l0oooo0?ooo`0?0?ooo`800000@P3oool00`00I_l0oooo0?ooo`17
0?ooo`00303oool00`00I_l0oooo0?ooo`1Y0?ooo`8006Ko4P3oool00`000000oooo0?ooo`120?oo
o`03001Vo`3oool0oooo04H0oooo000=0?ooo`03001Vo`3oool0oooo06H0oooo0P00I_lD0?ooo`03
0000003oool0oooo04<0oooo00<006Ko0?ooo`3oool0A@3oool000h0oooo00<006Ko0?ooo`3oool0
H`3oool2001VoaH0oooo00<000000?ooo`3oool0A03oool00`00I_l0oooo0?ooo`140?ooo`003P3o
ool00`00I_l0oooo0?ooo`1Q0?ooo`8006Ko603oool2000004D0oooo00<006Ko0?ooo`3oool0A03o
ool000l0oooo00<006Ko0?ooo`3oool0GP3oool2001VoaX0oooo00<000000?ooo`3oool0A@3oool0
0`00I_l0oooo0?ooo`130?ooo`00403oool00`00I_l0oooo0?ooo`1L0?ooo`03001Vo`3oool0oooo
01X0oooo00<000000?ooo`3oool0AP3oool00`00I_l0oooo0?ooo`120?ooo`004@3oool00`00I_l0
oooo0?ooo`1I0?ooo`8006Ko7@3oool00`000000oooo0?ooo`170?ooo`03001Vo`3oool0oooo0440
oooo000B0?ooo`03001Vo`3oool0oooo05H0oooo0P00I_lO0?ooo`030000003oool0oooo04P0oooo
00<006Ko0?ooo`3oool0@03oool001<0oooo00<006Ko0?ooo`3oool0D`3oool2001Vob40oooo0P00
001:0?ooo`03001Vo`3oool0oooo03l0oooo000D0?ooo`03001Vo`3oool0oooo0500oooo0P00I_lS
0?ooo`030000003oool0oooo04T0oooo00<006Ko0?ooo`3oool0?`3oool001D0oooo00<006Ko0?oo
o`3oool0CP3oool00`00I_l0oooo0?ooo`0E0?ooo`<00000103oool2000000D0oooo00<000000?oo
o`3oool0BP3oool00`00I_l0oooo0?ooo`0n0?ooo`005P3oool00`00I_l0oooo0?ooo`1;0?ooo`80
06Ko5`3oool01@000000oooo0?ooo`3oool000000080oooo00@000000?ooo`3oool00000103oool0
0`000000oooo0?ooo`1;0?ooo`03001Vo`3oool0oooo03d0oooo000G0?ooo`03001Vo`3oool0oooo
04P0oooo0P00I_lM0?ooo`040000003oool0oooo00000080oooo00<000000?ooo`3oool00P3oool3
000004/0oooo00<006Ko0?ooo`3oool0?@3oool001P0oooo00<006Ko0?ooo`3oool0AP3oool00`00
I_l0oooo0?ooo`0M0?ooo`040000003oool0oooo00000080oooo00<000000?ooo`3oool00P3oool0
0`000000oooo0?ooo`1<0?ooo`03001Vo`3oool0oooo03`0oooo000I0?ooo`8006KoA03oool2001V
oa`0oooo100000030?ooo`040000003oool0oooo000000@0oooo00<000000?ooo`3oool0C@3oool0
0`00I_l0oooo0?ooo`0k0?ooo`006`3oool00`00I_l0oooo0?ooo`0o0?ooo`8006Ko7P3oool00`00
0000oooo0?ooo`040?ooo`040000003oool0oooo000000@0oooo00<000000?ooo`3oool0C@3oool0
0`00I_l0oooo0?ooo`0k0?ooo`00703oool2001Voc`0oooo0`00I_lP0?ooo`D000000`3oool20000
00D0oooo0P00001?0?ooo`03001Vo`3oool0oooo03X0oooo000N0?ooo`03001Vo`3oool0oooo03L0
oooo0P00I_lb0?ooo`030000003oool0oooo04l0oooo00<006Ko0?ooo`3oool0>@3oool001l0oooo
0P00I_le0?ooo`8006Ko=03oool00`000000oooo0?ooo`1@0?ooo`03001Vo`3oool0oooo03P0oooo
000Q0?ooo`8006Ko<@3oool2001VocH0oooo00<000000?ooo`3oool0D03oool00`00I_l0oooo0?oo
o`0h0?ooo`008`3oool00`00I_l0oooo0?ooo`0[0?ooo`<006Ko>03oool00`000000oooo0?ooo`1A
0?ooo`03001Vo`3oool0oooo03L0oooo000T0?ooo`8006Ko:@3oool2001Voc/0oooo0P00001C0?oo
o`03001Vo`3oool0oooo03H0oooo000V0?ooo`<006Ko8`3oool3001Vocd0oooo00<000000?ooo`3o
ool0DP3oool00`00I_l0oooo0?ooo`0f0?ooo`00:@3oool3001Voa/0oooo1@00I_m00?ooo`030000
003oool0oooo05<0oooo00<006Ko0?ooo`3oool0=@3oool002`0oooo0`00I_lD0?ooo`@006KoA@3o
ool00`000000oooo0?ooo`1D0?ooo`03001Vo`3oool0oooo03@0oooo000_0?ooo`L006Ko1`3oool6
001VodT0oooo0P00001E0?ooo`03001Vo`3oool0oooo03@0oooo000e0?ooo`P006KoC`3oool00`00
0000oooo0?ooo`1E0?ooo`03001Vo`3oool0oooo03<0oooo002<0?ooo`030000003oool0oooo05D0
oooo00<006Ko0?ooo`3oool0<`3oool008`0oooo00<000000?ooo`3oool0EP3oool00`00I_l0oooo
0?ooo`0b0?ooo`00S03oool00`000000oooo0?ooo`1F0?ooo`03001Vo`3oool0oooo0380oooo002<
0?ooo`800000F03oool00`00I_l0oooo0?ooo`0a0?ooo`00S03oool00`000000oooo0?ooo`1G0?oo
o`03001Vo`3oool0oooo0340oooo001h0?ooo`<00000103oool2000000@0oooo0P0000050?ooo`03
0000003oool0oooo05P0oooo00<006Ko0?ooo`3oool0<03oool007T0oooo00<000000?ooo`3oool0
0P3oool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo000000@0oooo00<000000?oo
o`3oool0F03oool00`00I_l0oooo0?ooo`0`0?ooo`00N@3oool00`000000oooo0?ooo`020?ooo`04
0000003oool0oooo00000080oooo00@000000?ooo`3oool00000103oool3000005T0oooo00<006Ko
0?ooo`3oool0;`3oool007T0oooo00<000000?ooo`3oool00P3oool010000000oooo0?ooo`000002
0?ooo`040000003oool0oooo000000@0oooo00<000000?ooo`3oool0F@3oool00`00I_l0oooo0?oo
o`0_0?ooo`00N@3oool00`000000oooo0?ooo`020?ooo`040000003oool0oooo00000080oooo00@0
00000?ooo`3oool00000103oool00`000000oooo0?ooo`1J0?ooo`03001Vo`3oool0oooo02h0oooo
001h0?ooo`800000103oool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo000000@0
oooo00<000000?ooo`3oool0FP3oool00`00I_l0oooo0?ooo`0^0?ooo`00N@3oool00`000000oooo
0?ooo`030?ooo`800000103oool2000000D0oooo00<000000?ooo`3oool0F`3oool00`00I_l0oooo
0?ooo`0]0?ooo`00S03oool2000005`0oooo00<006Ko0?ooo`3oool0;@3oool008`0oooo00<00000
0?ooo`3oool0G03oool00`00I_l0oooo0?ooo`0/0?ooo`00S03oool00`000000oooo0?ooo`1L0?oo
o`03001Vo`3oool0oooo02`0oooo002<0?ooo`030000003oool0oooo05d0oooo00<006Ko0?ooo`3o
ool0:`3oool008`0oooo0P00001N0?ooo`03001Vo`3oool0oooo02/0oooo002<0?ooo`030000003o
ool0oooo05h0oooo00<006Ko0?ooo`3oool0:P3oool008`0oooo00<000000?ooo`3oool0GP3oool0
0`00I_l0oooo0?ooo`0Z0?ooo`00S03oool00`000000oooo0?ooo`1O0?ooo`03001Vo`3oool0oooo
02T0oooo002<0?ooo`030000003oool0oooo05l0oooo00<006Ko0?ooo`3oool0:@3oool008`0oooo
0P00001Q0?ooo`03001Vo`3oool0oooo02P0oooo002<0?ooo`030000003oool0oooo0600oooo00<0
06Ko0?ooo`3oool0:03oool008`0oooo00<000000?ooo`3oool0H03oool00`00I_l0oooo0?ooo`0X
0?ooo`00S03oool00`000000oooo0?ooo`1Q0?ooo`03001Vo`3oool0oooo02L0oooo002<0?ooo`80
0000HP3oool00`00I_l0oooo0?ooo`0W0?ooo`00S03oool00`000000oooo0?ooo`1R0?ooo`03001V
o`3oool0oooo02H0oooo001h0?ooo`<000000`3oool3000000@0oooo0P0000050?ooo`030000003o
ool0oooo0680oooo00<006Ko0?ooo`3oool09P3oool007T0oooo00D000000?ooo`3oool0oooo0000
00030?ooo`040000003oool0oooo00000080oooo00<000000?ooo`3oool00P3oool00`000000oooo
0?ooo`1S0?ooo`03001Vo`3oool0oooo02D0oooo001i0?ooo`030000003oool0oooo00D0oooo00@0
00000?ooo`3oool000000P3oool00`000000oooo0?ooo`020?ooo`030000003oool0oooo06<0oooo
00<006Ko0?ooo`3oool09@3oool007T0oooo00<000000?ooo`3oool01@3oool010000000oooo0?oo
o`0000020?ooo`030000003oool0oooo0080oooo0`00001S0?ooo`03001Vo`3oool0oooo02D0oooo
001i0?ooo`040000003oool0oooo0?ooo`@000000`3oool010000000oooo0?ooo`0000040?ooo`03
0000003oool0oooo06@0oooo00<006Ko0?ooo`3oool0903oool007P0oooo0P0000030?ooo`030000
003oool0oooo00@0oooo00@000000?ooo`3oool00000103oool00`000000oooo0?ooo`1T0?ooo`03
001Vo`3oool0oooo02@0oooo001i0?ooo`040000003oool0oooo0?ooo`D000000`3oool2000000D0
oooo00<000000?ooo`3oool0I@3oool00`00I_l0oooo0?ooo`0S0?ooo`00S03oool2000006H0oooo
00<006Ko0?ooo`3oool08`3oool008`0oooo00<000000?ooo`3oool0IP3oool00`00I_l0oooo0?oo
o`0R0?ooo`00S03oool00`000000oooo0?ooo`1V0?ooo`03001Vo`3oool0oooo0280oooo002<0?oo
o`030000003oool0oooo06H0oooo00<006Ko0?ooo`3oool08P3oool008`0oooo00<000000?ooo`3o
ool0I`3oool00`00I_l0oooo0?ooo`0Q0?ooo`00S03oool2000006P0oooo00<006Ko0?ooo`3oool0
8@3oool008`0oooo00<000000?ooo`3oool0J03oool00`00I_l0oooo0?ooo`0P0?ooo`00S03oool0
0`000000oooo0?ooo`1X0?ooo`03001Vo`3oool0oooo0200oooo002<0?ooo`030000003oool0oooo
06T0oooo00<006Ko0?ooo`3oool07`3oool008`0oooo0P00001Z0?ooo`03001Vo`3oool0oooo01l0
oooo002<0?ooo`030000003oool0oooo06T0oooo00<006Ko0?ooo`3oool07`3oool008`0oooo00<0
00000?ooo`3oool0JP3oool00`00I_l0oooo0?ooo`0N0?ooo`00S03oool00`000000oooo0?ooo`1Z
0?ooo`03001Vo`3oool0oooo01h0oooo002<0?ooo`030000003oool0oooo06/0oooo00<006Ko0?oo
o`3oool07@3oool008`0oooo0P00001/0?ooo`03001Vo`3oool0oooo01d0oooo002<0?ooo`030000
003oool0oooo06/0oooo00<006Ko0?ooo`3oool07@3oool007L0oooo1@0000030?ooo`800000103o
ool2000000D0oooo00<000000?ooo`3oool0K03oool00`00I_l0oooo0?ooo`0L0?ooo`00N03oool0
10000000oooo0?ooo`0000020?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool0
0000103oool00`000000oooo0?ooo`1/0?ooo`03001Vo`3oool0oooo01`0oooo001i0?ooo`030000
003oool0oooo0080oooo00@000000?ooo`3oool000000P3oool010000000oooo0?ooo`0000040?oo
o`<00000K03oool00`00I_l0oooo0?ooo`0L0?ooo`00NP3oool01@000000oooo0?ooo`3oool00000
0080oooo00@000000?ooo`3oool000000P3oool00`000000oooo0?ooo`020?ooo`030000003oool0
oooo06d0oooo00<006Ko0?ooo`3oool06`3oool007L0oooo00D000000?ooo`3oool0oooo00000002
0?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool00000103oool00`000000oooo
0?ooo`1]0?ooo`03001Vo`3oool0oooo01/0oooo001g0?ooo`050000003oool0oooo0?ooo`000000
0P3oool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo000000@0oooo00<000000?oo
o`3oool0K@3oool00`00I_l0oooo0?ooo`0K0?ooo`00N03oool3000000@0oooo0P0000040?ooo`80
00001@3oool2000006l0oooo00<006Ko0?ooo`3oool06P3oool008`0oooo00<000000?ooo`3oool0
KP3oool00`00I_l0oooo0?ooo`0J0?ooo`00S03oool00`000000oooo0?ooo`1^0?ooo`03001Vo`3o
ool0oooo01X0oooo002<0?ooo`030000003oool0oooo06l0oooo00<006Ko0?ooo`3oool06@3oool0
08`0oooo00<000000?ooo`3oool0K`3oool00`00I_l0oooo0?ooo`0I0?ooo`00S03oool200000740
oooo00<006Ko0?ooo`3oool0603oool008`0oooo00<000000?ooo`3oool0L03oool00`00I_l0oooo
0?ooo`0H0?ooo`00S03oool00`000000oooo0?ooo`1`0?ooo`03001Vo`3oool0oooo01P0oooo002<
0?ooo`030000003oool0oooo0740oooo00<006Ko0?ooo`3oool05`3oool008`0oooo0P00001b0?oo
o`03001Vo`3oool0oooo01L0oooo002<0?ooo`030000003oool0oooo0740oooo00<006Ko0?ooo`3o
ool05`3oool008`0oooo00<000000?ooo`3oool0LP3oool00`00I_l0oooo0?ooo`0F0?ooo`00S03o
ool00`000000oooo0?ooo`1b0?ooo`03001Vo`3oool0oooo01H0oooo002<0?ooo`030000003oool0
oooo0780oooo00<006Ko0?ooo`3oool05P3oool008`0oooo0P00001d0?ooo`03001Vo`3oool0oooo
01D0oooo002<0?ooo`030000003oool0oooo07<0oooo00<006Ko0?ooo`3oool05@3oool007L0oooo
1@0000020?ooo`<00000103oool2000000D0oooo00<000000?ooo`3oool0L`3oool00`00I_l0oooo
0?ooo`0E0?ooo`00N03oool01P000000oooo0?ooo`000000oooo000000<0oooo00@000000?ooo`3o
ool000000P3oool00`000000oooo0?ooo`020?ooo`030000003oool0oooo07@0oooo00<006Ko0?oo
o`3oool0503oool007T0oooo00<000000?ooo`3oool01@3oool010000000oooo0?ooo`0000020?oo
o`030000003oool0oooo0080oooo0`00001d0?ooo`03001Vo`3oool0oooo01@0oooo001j0?ooo`03
0000003oool0oooo00@0oooo00@000000?ooo`3oool000000P3oool00`000000oooo0?ooo`020?oo
o`030000003oool0oooo07@0oooo00<006Ko0?ooo`3oool0503oool007L0oooo00H000000?ooo`3o
ool0oooo0000003oool4000000<0oooo00@000000?ooo`3oool00000103oool00`000000oooo0?oo
o`1e0?ooo`03001Vo`3oool0oooo01<0oooo001g0?ooo`070000003oool0oooo0?ooo`000000oooo
000000060?ooo`040000003oool0oooo000000@0oooo00<000000?ooo`3oool0M@3oool00`00I_l0
oooo0?ooo`0C0?ooo`00N03oool300000080oooo1@0000030?ooo`8000001@3oool00`000000oooo
0?ooo`1e0?ooo`03001Vo`3oool0oooo01<0oooo002<0?ooo`800000M`3oool00`00I_l0oooo0?oo
o`0B0?ooo`00S03oool00`000000oooo0?ooo`1f0?ooo`03001Vo`3oool0oooo0180oooo002<0?oo
o`030000003oool0oooo07H0oooo00<006Ko0?ooo`3oool04P3oool008`0oooo00<000000?ooo`3o
ool0M`3oool00`00I_l0oooo0?ooo`0A0?ooo`00S03oool2000007P0oooo00<006Ko0?ooo`3oool0
4@3oool008`0oooo00<000000?ooo`3oool0M`3oool00`00I_l0oooo0?ooo`0A0?ooo`00S03oool0
0`000000oooo0?ooo`1g0?ooo`03001Vo`3oool0oooo0140oooo002<0?ooo`030000003oool0oooo
07P0oooo00<006Ko0?ooo`3oool0403oool008`0oooo00<000000?ooo`3oool0N03oool00`00I_l0
oooo0?ooo`0@0?ooo`00S03oool2000007T0oooo00<006Ko0?ooo`3oool0403oool008`0oooo00<0
00000?ooo`3oool0N@3oool00`00I_l0oooo0?ooo`0?0?ooo`00S03oool00`000000oooo0?ooo`1i
0?ooo`03001Vo`3oool0oooo00l0oooo002<0?ooo`030000003oool0oooo07T0oooo00<006Ko0?oo
o`3oool03`3oool008`0oooo0P00001j0?ooo`03001Vo`3oool0oooo00l0oooo002<0?ooo`030000
003oool0oooo07X0oooo00<006Ko0?ooo`3oool03P3oool007P0oooo0`0000040?ooo`800000103o
ool2000000D0oooo00<000000?ooo`3oool0NP3oool00`00I_l0oooo0?ooo`0>0?ooo`00M`3oool0
1@000000oooo0?ooo`3oool000000080oooo00@000000?ooo`3oool000000P3oool010000000oooo
0?ooo`0000040?ooo`030000003oool0oooo07X0oooo00<006Ko0?ooo`3oool03P3oool007/0oooo
00@000000?ooo`3oool000000P3oool010000000oooo0?ooo`0000020?ooo`030000003oool0oooo
0080oooo00<000000?ooo`3oool0N`3oool00`00I_l0oooo0?ooo`0=0?ooo`00N@3oool2000000<0
oooo00@000000?ooo`3oool000000P3oool010000000oooo0?ooo`0000040?ooo`<00000N`3oool0
0`00I_l0oooo0?ooo`0=0?ooo`00N`3oool010000000oooo0?ooo`0000020?ooo`040000003oool0
oooo00000080oooo00<000000?ooo`3oool00P3oool00`000000oooo0?ooo`1k0?ooo`03001Vo`3o
ool0oooo00d0oooo001g0?ooo`050000003oool0oooo0?ooo`0000000P3oool010000000oooo0?oo
o`0000020?ooo`040000003oool0oooo000000@0oooo00<000000?ooo`3oool0N`3oool00`00I_l0
oooo0?ooo`0=0?ooo`00N03oool3000000@0oooo0P0000040?ooo`8000001@3oool00`000000oooo
0?ooo`1l0?ooo`03001Vo`3oool0oooo00`0oooo002<0?ooo`800000O@3oool00`00I_l0oooo0?oo
o`0<0?ooo`00S03oool00`000000oooo0?ooo`1l0?ooo`03001Vo`3oool0oooo00`0oooo002<0?oo
o`030000003oool0oooo07`0oooo00<006Ko0?ooo`3oool0303oool008`0oooo00<000000?ooo`3o
ool0O@3oool00`00I_l0oooo0?ooo`0;0?ooo`00S03oool00`000000oooo0?ooo`1m0?ooo`03001V
o`3oool0oooo00/0oooo002<0?ooo`800000OP3oool00`00I_l0oooo0?ooo`0;0?ooo`00S03oool0
0`000000oooo0?ooo`1n0?ooo`03001Vo`3oool0oooo00X0oooo002<0?ooo`030000003oool0oooo
07h0oooo00<006Ko0?ooo`3oool02P3oool008`0oooo00<000000?ooo`3oool0OP3oool00`00I_l0
oooo0?ooo`0:0?ooo`00S03oool2000007l0oooo00<006Ko0?ooo`3oool02P3oool008`0oooo00<0
00000?ooo`3oool0O`3oool00`00I_l0oooo0?ooo`090?ooo`00S03oool00`000000oooo0?ooo`1o
0?ooo`03001Vo`3oool0oooo00T0oooo002<0?ooo`030000003oool0oooo07l0oooo00<006Ko0?oo
o`3oool02@3oool008`0oooo00<000000?ooo`3oool0P03oool00`00I_l0oooo0?ooo`080?ooo`00
S03oool200000840oooo00<006Ko0?ooo`3oool0203oool007P0oooo0`0000030?ooo`<00000103o
ool2000000D0oooo00<000000?ooo`3oool0P03oool00`00I_l0oooo0?ooo`080?ooo`00M`3oool0
1`000000oooo0?ooo`3oool000000?ooo`0000000`3oool010000000oooo0?ooo`0000020?ooo`03
0000003oool0oooo0080oooo00<000000?ooo`3oool0P@3oool00`00I_l0oooo0?ooo`070?ooo`00
N`3oool00`000000oooo0?ooo`030?ooo`040000003oool0oooo00000080oooo00<000000?ooo`3o
ool00P3oool00`000000oooo0?ooo`2;0?ooo`00N@3oool2000000H0oooo00@000000?ooo`3oool0
00000P3oool00`000000oooo0?ooo`020?ooo`<00000R`3oool007/0oooo00<000000?ooo`000000
0`0000030?ooo`040000003oool0oooo000000@0oooo00<000000?ooo`3oool0R`3oool007L0oooo
00L000000?ooo`3oool0oooo0000003oool0000000H0oooo00@000000?ooo`3oool00000103oool0
0`000000oooo0?ooo`2;0?ooo`00N03oool300000080oooo1@0000030?ooo`800000T`3oool00?l0
oooo6`3oool00001\
\>"],
  ImageRangeCache->{{{0, 281}, {173.25, 0}} -> {-7.1585, -27.8858, 0.0509502, \
2.23936}}]
}, Open  ]],

Cell[TextData[
"Let's find the slope and equation of the secant line and see the picture!"], 
  "Section",
  Evaluatable->False,
  AspectRatioFixed->True],

Cell[CellGroupData[{

Cell[TextData[{
  StyleBox["m = (f[b] - f[a]) / (b - a)     \nsecLine[x_] := m (x - a) + \
f[a]",
    AspectRatioFixed->False],
  StyleBox["\n",
    AspectRatioFixed->False,
    FontFamily->"New York",
    FontWeight->"Plain",
    FontColor->RGBColor[0, 0, 1]],
  StyleBox["secLine[x]\n\npfs = Plot[{f[x], secLine[x]}, {x,a,b},\n\t\t\
AxesLabel->{\"x\",\"\"},\n\t\tPlotStyle->{{Hue[.6], Thickness[.007]},\n\t\t\t\
\t\t{Thickness[.015],GrayLevel[.5]}},\n\t\tEpilog->{PointSize[.03],\n\t\t\t\t\
Point[{a,f[a]}],Point[{b,f[b]}]}];",
    AspectRatioFixed->False]
}], "Input",
  AspectRatioFixed->False],

Cell[BoxData[
    \(TraditionalForm\`24.890000000000004`\)], "Output"],

Cell[BoxData[
    FormBox[
      TagBox[
        RowBox[{
          RowBox[{"24.890000000000004`", " ", 
            RowBox[{"(", 
              FormBox[
                TagBox[\(x + 6.7`\),
                  HoldForm],
                "TraditionalForm"], ")"}]}], "+", "12.796999999999969`"}],
        HoldForm], TraditionalForm]], "Output"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .61803 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.0710732 0.0432896 0.00161707 [
[.07356 .03079 -6 -9 ]
[.07356 .03079 6 0 ]
[.21571 .03079 -6 -9 ]
[.21571 .03079 6 0 ]
[.35785 .03079 -6 -9 ]
[.35785 .03079 6 0 ]
[.64215 .03079 -3 -9 ]
[.64215 .03079 3 0 ]
[.78429 .03079 -3 -9 ]
[.78429 .03079 3 0 ]
[.92644 .03079 -3 -9 ]
[.92644 .03079 3 0 ]
[1.025 .04329 0 -6 ]
[1.025 .04329 10 6 ]
[.4875 .12414 -12 -4.5 ]
[.4875 .12414 0 4.5 ]
[.4875 .205 -18 -4.5 ]
[.4875 .205 0 4.5 ]
[.4875 .28585 -18 -4.5 ]
[.4875 .28585 0 4.5 ]
[.4875 .3667 -18 -4.5 ]
[.4875 .3667 0 4.5 ]
[.4875 .44756 -18 -4.5 ]
[.4875 .44756 0 4.5 ]
[.4875 .52841 -18 -4.5 ]
[.4875 .52841 0 4.5 ]
[.4875 .60926 -18 -4.5 ]
[.4875 .60926 0 4.5 ]
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 g
.25 Mabswid
[ ] 0 setdash
.07356 .04329 m
.07356 .04954 L
s
[(-6)] .07356 .03079 0 1 Mshowa
.21571 .04329 m
.21571 .04954 L
s
[(-4)] .21571 .03079 0 1 Mshowa
.35785 .04329 m
.35785 .04954 L
s
[(-2)] .35785 .03079 0 1 Mshowa
.64215 .04329 m
.64215 .04954 L
s
[(2)] .64215 .03079 0 1 Mshowa
.78429 .04329 m
.78429 .04954 L
s
[(4)] .78429 .03079 0 1 Mshowa
.92644 .04329 m
.92644 .04954 L
s
[(6)] .92644 .03079 0 1 Mshowa
.125 Mabswid
.1091 .04329 m
.1091 .04704 L
s
.14463 .04329 m
.14463 .04704 L
s
.18017 .04329 m
.18017 .04704 L
s
.25124 .04329 m
.25124 .04704 L
s
.28678 .04329 m
.28678 .04704 L
s
.32232 .04329 m
.32232 .04704 L
s
.39339 .04329 m
.39339 .04704 L
s
.42893 .04329 m
.42893 .04704 L
s
.46446 .04329 m
.46446 .04704 L
s
.53554 .04329 m
.53554 .04704 L
s
.57107 .04329 m
.57107 .04704 L
s
.60661 .04329 m
.60661 .04704 L
s
.67768 .04329 m
.67768 .04704 L
s
.71322 .04329 m
.71322 .04704 L
s
.74876 .04329 m
.74876 .04704 L
s
.81983 .04329 m
.81983 .04704 L
s
.85537 .04329 m
.85537 .04704 L
s
.8909 .04329 m
.8909 .04704 L
s
.03802 .04329 m
.03802 .04704 L
s
.00249 .04329 m
.00249 .04704 L
s
.96198 .04329 m
.96198 .04704 L
s
.99751 .04329 m
.99751 .04704 L
s
.25 Mabswid
0 .04329 m
1 .04329 L
s
gsave
1.025 .04329 -61 -10 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(x) show
69.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.5 .12414 m
.50625 .12414 L
s
[(50)] .4875 .12414 1 0 Mshowa
.5 .205 m
.50625 .205 L
s
[(100)] .4875 .205 1 0 Mshowa
.5 .28585 m
.50625 .28585 L
s
[(150)] .4875 .28585 1 0 Mshowa
.5 .3667 m
.50625 .3667 L
s
[(200)] .4875 .3667 1 0 Mshowa
.5 .44756 m
.50625 .44756 L
s
[(250)] .4875 .44756 1 0 Mshowa
.5 .52841 m
.50625 .52841 L
s
[(300)] .4875 .52841 1 0 Mshowa
.5 .60926 m
.50625 .60926 L
s
[(350)] .4875 .60926 1 0 Mshowa
.125 Mabswid
.5 .05946 m
.50375 .05946 L
s
.5 .07563 m
.50375 .07563 L
s
.5 .0918 m
.50375 .0918 L
s
.5 .10797 m
.50375 .10797 L
s
.5 .14031 m
.50375 .14031 L
s
.5 .15648 m
.50375 .15648 L
s
.5 .17266 m
.50375 .17266 L
s
.5 .18883 m
.50375 .18883 L
s
.5 .22117 m
.50375 .22117 L
s
.5 .23734 m
.50375 .23734 L
s
.5 .25351 m
.50375 .25351 L
s
.5 .26968 m
.50375 .26968 L
s
.5 .30202 m
.50375 .30202 L
s
.5 .31819 m
.50375 .31819 L
s
.5 .33436 m
.50375 .33436 L
s
.5 .35053 m
.50375 .35053 L
s
.5 .38287 m
.50375 .38287 L
s
.5 .39905 m
.50375 .39905 L
s
.5 .41522 m
.50375 .41522 L
s
.5 .43139 m
.50375 .43139 L
s
.5 .46373 m
.50375 .46373 L
s
.5 .4799 m
.50375 .4799 L
s
.5 .49607 m
.50375 .49607 L
s
.5 .51224 m
.50375 .51224 L
s
.5 .54458 m
.50375 .54458 L
s
.5 .56075 m
.50375 .56075 L
s
.5 .57692 m
.50375 .57692 L
s
.5 .59309 m
.50375 .59309 L
s
.5 .02712 m
.50375 .02712 L
s
.5 .01095 m
.50375 .01095 L
s
.25 Mabswid
.5 0 m
.5 .61803 L
s
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
0 .4 1 r
.007 w
.02381 .06398 m
.04262 .08832 L
.06244 .11023 L
.08426 .13014 L
.10458 .14496 L
.12297 .15548 L
.14264 .16387 L
.15285 .16714 L
.16394 .16988 L
.16902 .17086 L
.17441 .17173 L
.17946 .17238 L
.18408 .17283 L
.18639 .17301 L
.18891 .17317 L
.19128 .17328 L
.19349 .17336 L
.19482 .1734 L
.19606 .17342 L
.19718 .17343 L
.19839 .17344 L
.19902 .17344 L
.19972 .17344 L
.20044 .17343 L
.20111 .17342 L
.20232 .1734 L
.20362 .17337 L
.20597 .17329 L
.20853 .17317 L
.21319 .17287 L
.21772 .17246 L
.22192 .17199 L
.23154 .17059 L
.24058 .16888 L
.26118 .16364 L
.28137 .15691 L
.29987 .14954 L
.33949 .13069 L
.3776 .10991 L
.41816 .08664 L
.45721 .06475 L
.49871 .04388 L
.51951 .03493 L
.53869 .02786 L
.55856 .02194 L
.57716 .01787 L
.5862 .01646 L
.59085 .0159 L
.59592 .0154 L
.59879 .01518 L
Mistroke
.60145 .01501 L
.604 .01488 L
.6053 .01483 L
.6067 .01479 L
.60738 .01477 L
.60809 .01475 L
.60937 .01473 L
.61056 .01472 L
.61188 .01472 L
.61305 .01472 L
.6143 .01473 L
.61548 .01475 L
.61656 .01478 L
.61885 .01486 L
.62138 .01498 L
.62402 .01514 L
.6265 .01533 L
.63092 .01577 L
.63568 .01637 L
.64653 .01828 L
.65646 .02069 L
.67542 .02718 L
.68616 .03201 L
.69613 .03728 L
.73523 .06573 L
.75662 .08695 L
.77678 .11094 L
.8153 .16829 L
.85627 .24738 L
.89572 .34286 L
.93366 .45411 L
.97406 .59518 L
.97619 .60332 L
Mfstroke
.5 g
.015 w
.02381 .06398 m
.06244 .08586 L
.10458 .10972 L
.14415 .13213 L
.18221 .15368 L
.22272 .17662 L
.26171 .19871 L
.30316 .22218 L
.34309 .24479 L
.3815 .26654 L
.42237 .28969 L
.46172 .31197 L
.49955 .3334 L
.53984 .35621 L
.57861 .37817 L
.61984 .40151 L
.65954 .424 L
.69774 .44563 L
.73838 .46865 L
.77751 .49081 L
.81909 .51435 L
.85916 .53704 L
.89771 .55888 L
.93871 .5821 L
.97619 .60332 L
s
0 g
.03 w
.02381 .06398 Mdot
.97619 .60332 Mdot
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{282, 174.25},
  ImageMargins->{{34, 0}, {0, 0}},
  ImageRegion->{{0, 1}, {0, 1}},
  ImageCache->GraphicsData["Bitmap", "\<\
CF5dJ6E]HGAYHf4PAg9QL6QYHg<PAVmbKF5d0`40004J0000[R000`400?l00000o`00003oo`3ooolK
0?ooo`00o`3ooolK0?ooo`00o`3ooolK0?ooo`00o`3ooolK0?ooo`00o`3ooolK0?ooo`00503oool3
000002@0oooo0`00000P0?ooo`D000008@3oool00`000000oooo0?ooo`0O0?ooo`D000008`3oool3
00000240oooo0`00000U0?ooo`004`3oool01@000000oooo0?ooo`3oool0000002@0oooo00<00000
0?ooo`3oool0803oool010000000oooo0?ooo`00000Q0?ooo`030000003oool0oooo0200oooo00@0
00000?ooo`3oool00000903oool00`000000oooo0?ooo`0O0?ooo`050000003oool0oooo0?ooo`00
0000903oool000d0oooo1@0000000`3oool000000?ooo`020?ooo`030000003oool0oooo01T0oooo
1@0000000`3oool0000000000003000001X0oooo1@0000030?ooo`030000003oool0oooo0240oooo
0P00000R0?ooo`030000003oool0oooo0240oooo1@00000P0?ooo`050000003oool0oooo0?ooo`00
0000903oool001<0oooo1000000R0?ooo`040000003oool0oooo000002@0oooo00<000000?ooo`3o
ool0803oool00`000000oooo0?ooo`0H0?ooo`H006Ko103oool00`000000oooo0?ooo`0P0?ooo`04
0000003oool0oooo00000240oooo1000000U0?ooo`004`3oool00`000000oooo0?ooo`0T0?ooo`03
0000003oool000000240oooo00D000000?ooo`3oool0oooo0000000Q0?ooo`030000003oool0oooo
00l0oooo2@00I_l50?ooo`T006Ko803oool00`000000oooo0000000Q0?ooo`030000003oool0oooo
02H0oooo000D0?ooo`030000003oool0oooo02@0oooo0P00000Q0?ooo`050000003oool0oooo0?oo
o`0000008@3oool00`000000oooo0?ooo`0;0?ooo`@006Ko403oool01@000000oooo0?ooo`3oool0
00000080oooo0P00I_lO0?ooo`8000008P3oool00`000000oooo0?ooo`0U0?ooo`005@3oool20000
02D0oooo00<000000?ooo`3oool0803oool300000280oooo00<000000?ooo`3oool0203oool3001V
oaD0oooo0`0000050?ooo`<006Ko7@3oool00`000000oooo0?ooo`0Q0?ooo`8000009@3oool008@0
oooo0P0000070?ooo`8006Ko8`3oool3001VofD0oooo00240?ooo`030000003oool0oooo00<0oooo
0`00I_lX0?ooo`<006KoHP3oool008@0oooo00@000000?ooo`3oool0oooo0P00I_l^0?ooo`8006Ko
E`3oool2000000030?ooo`000000000000@0oooo00240?ooo`0400000000I_l006Ko001Voc80oooo
00<006Ko0?ooo`3oool0E@3oool00`000000oooo000000050?ooo`00PP000003001VocH0000000<0
06Ko000000000000B`00000:0?ooo`030000003oool0oooo00@0oooo00000`000000oooo0?ooo`07
0?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3oool01P3oool00`000000oooo0?ooo`07
0?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3oool01`3oool00`000000oooo0?ooo`06
0?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3oool01`3oool00`000000oooo0?ooo`06
0?ooo`030000003oool0oooo00L0oooo00<000000?ooo`3oool01P3oool00`000000oooo0?ooo`06
0?ooo`030000003oool0oooo00<0oooo0P00I_l20?ooo`030000003oool0oooo00H0oooo00<00000
0?ooo`3oool01P3oool00`000000oooo0?ooo`070?ooo`030000003oool0oooo00H0oooo00<00000
0?ooo`3oool01`3oool00`000000oooo0?ooo`060?ooo`03001Vo`3oool0oooo00H0oooo00<00000
0?ooo`3oool01`3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00L0oooo00<00000
0?ooo`3oool01P3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00L0oooo00<00000
0?ooo`3oool01P3oool00`000000oooo0?ooo`080?ooo`030000003oool0000000D0oooo000C0?oo
o`030000003oool0oooo02<0oooo00<000000?ooo`3oool08P3oool00`000000oooo0?ooo`0M0?oo
o`8006Ko103oool00`000000oooo0?ooo`0R0?ooo`030000003oool0oooo0140oooo0P00I_l@0?oo
o`030000003oool0oooo0280oooo00<000000?ooo`3oool06P3oool2000000030?ooo`0000000000
00@0oooo00040?ooo`<00000MP3oool00`00I_l0oooo0?ooo`040?ooo`030000003oool0oooo03P0
oooo00<006Ko0?ooo`3oool0F03oool000<0oooo1@0000000`1oOgl0oooo0?ooo`1`0?ooo`8006Ko
1`3oool2000003X0oooo00<006Ko0?ooo`3oool0E`3oool00080oooo1`00000207moOfh0oooo0P00
I_l90?ooo`030000003oool0oooo03X0oooo00<006Ko0?ooo`3oool0EP3oool00080oooo1`000003
07moOf/0oooo0P00I_l;0?ooo`030000003oool0oooo03/0oooo00<006Ko0?ooo`3oool0E@3oool0
0080oooo1`00000507moOfL0oooo0P00I_l=0?ooo`030000003oool0oooo03`0oooo00<006Ko0?oo
o`3oool0E03oool000<0oooo1@0000000`00I_l0Ogmo07moO`0507moOf<0oooo0P00I_l?0?ooo`03
0000003oool0oooo03d0oooo00<006Ko0?ooo`3oool0D`3oool000@0oooo0`0000020?ooo`03001V
o`1oOgl0Ogmo00D0OgmoH03oool2001Voa40oooo0P00000o0?ooo`03001Vo`3oool0oooo0580oooo
00090?ooo`03001Vo`3oool0oooo00L0OgmoG03oool2001Voa<0oooo00<000000?ooo`3oool0?`3o
ool00`00I_l0oooo0?ooo`1A0?ooo`002P3oool01000I_l0oooo0?ooo`3oool607moOeT0oooo0P00
I_lE0?ooo`030000003oool0oooo0400oooo00<006Ko0?ooo`3oool0D03oool000/0oooo00@006Ko
0?ooo`3oool0oooo1`1oOgmF0?ooo`03001Vo`3oool0oooo01D0oooo00<000000?ooo`3oool0@@3o
ool00`00I_l0oooo0?ooo`1?0?ooo`002`3oool00`00I_l0oooo0?ooo`030?ooo`L0OgmoDP3oool2
001VoaP0oooo0P0000120?ooo`03001Vo`3oool0oooo04l0oooo000<0?ooo`03001Vo`3oool0oooo
00<0oooo1`1oOgm?0?ooo`8006Ko6P3oool00`000000oooo0?ooo`120?ooo`03001Vo`3oool0oooo
04h0oooo000=0?ooo`03001Vo`3oool0oooo00@0oooo1`1oOgm<0?ooo`03001Vo`3oool0oooo01X0
oooo00<000000?ooo`3oool0@`3oool00`00I_l0oooo0?ooo`1=0?ooo`003P3oool00`00I_l0oooo
0?ooo`050?ooo`H0OgmoB@3oool2001Voad0oooo00<000000?ooo`3oool0A03oool00`00I_l0oooo
0?ooo`1<0?ooo`003`3oool00`00I_l0oooo0?ooo`050?ooo`L0OgmoAP3oool00`00I_l0oooo0?oo
o`0M0?ooo`800000AP3oool00`00I_l0oooo0?ooo`1;0?ooo`00403oool2001Vo`L0oooo1`1oOgm2
0?ooo`8006Ko803oool00`000000oooo0?ooo`160?ooo`03001Vo`3oool0oooo04X0oooo000B0?oo
o`03001Vo`3oool0oooo00D0oooo2@1oOglm0?ooo`8006Ko4`3oool3000000@0oooo0P0000060?oo
o`030000003oool0oooo04H0oooo00<006Ko0?ooo`3oool0BP3oool001<0oooo00<006Ko0?ooo`3o
ool01P3oool907moOcT0oooo0P00I_lD0?ooo`050000003oool0oooo0?ooo`0000000P3oool01000
0000oooo0?ooo`0000050?ooo`030000003oool0oooo04L0oooo00<006Ko0?ooo`3oool0B@3oool0
01@0oooo00<006Ko0?ooo`3oool01`3oool907moOcD0oooo0P00I_lJ0?ooo`040000003oool0oooo
00000080oooo00<000000?ooo`3oool00`3oool2000004T0oooo00<006Ko0?ooo`3oool0B03oool0
01D0oooo00<006Ko0?ooo`3oool02@3oool807moOc40oooo0P00I_lL0?ooo`040000003oool0oooo
00000080oooo00<000000?ooo`3oool00`3oool00`000000oooo0?ooo`180?ooo`03001Vo`3oool0
oooo04P0oooo000F0?ooo`8006Ko2`3oool807moObd0oooo0P00I_lJ0?ooo`@000000`3oool01000
0000oooo0?ooo`0000050?ooo`030000003oool0oooo04T0oooo00<006Ko0?ooo`3oool0A`3oool0
01P0oooo00<006Ko0?ooo`3oool02P3oool707moObX0oooo0P00I_lL0?ooo`030000003oool0oooo
00@0oooo00@000000?ooo`3oool000001@3oool00`000000oooo0?ooo`1:0?ooo`03001Vo`3oool0
oooo04H0oooo000I0?ooo`03001Vo`3oool0oooo00/0oooo1`1oOglV0?ooo`8006Ko7P3oool50000
00<0oooo0P0000060?ooo`030000003oool0oooo04X0oooo00<006Ko0?ooo`3oool0AP3oool001X0
oooo00<006Ko0?ooo`3oool0303oool707moOb80oooo0P00I_l`0?ooo`800000C03oool00`00I_l0
oooo0?ooo`150?ooo`006`3oool2001Vo`d0oooo1`1oOglO0?ooo`8006Ko<P3oool00`000000oooo
0?ooo`1<0?ooo`03001Vo`3oool0oooo04@0oooo000M0?ooo`8006Ko3@3oool707moOa/0oooo0P00
I_ld0?ooo`030000003oool0oooo04`0oooo00<006Ko0?ooo`3oool0A03oool001l0oooo00<006Ko
0?ooo`3oool0303oool707moOaH0oooo0`00I_lf0?ooo`030000003oool0oooo04d0oooo00<006Ko
0?ooo`3oool0@`3oool00200oooo0P00I_l=0?ooo`L0Ogmo4`3oool2001VocT0oooo0P00001?0?oo
o`03001Vo`3oool0oooo0480oooo000R0?ooo`<006Ko303oool707moO`h0oooo0`00I_lk0?ooo`03
0000003oool0oooo04h0oooo00<006Ko0?ooo`3oool0@P3oool002D0oooo0`00I_l;0?ooo`L0Ogmo
203oool4001Voch0oooo00<000000?ooo`3oool0C`3oool00`00I_l0oooo0?ooo`110?ooo`00:03o
ool4001Vo`P0oooo1`1oOgl30?ooo`@006Ko@P3oool00`000000oooo0?ooo`1@0?ooo`03001Vo`3o
ool0oooo0400oooo000/0?ooo`X006Ko1`1oOgl00`00I_l0oooo0?ooo`140?ooo`800000D@3oool0
0`00I_l0oooo0?ooo`100?ooo`00>03oool707moOdD0oooo00<000000?ooo`3oool0D@3oool00`00
I_l0oooo0?ooo`0o0?ooo`00>@3oool807moOd<0oooo00<000000?ooo`3oool0D@3oool00`00I_l0
oooo0?ooo`0o0?ooo`00>`3oool707moOd80oooo00<000000?ooo`3oool0DP3oool00`00I_l0oooo
0?ooo`0n0?ooo`00?@3oool707moOd00oooo0P00001C0?ooo`03001Vo`3oool0oooo03h0oooo000o
0?ooo`L0Ogmo?P3oool00`000000oooo0?ooo`1C0?ooo`03001Vo`3oool0oooo03d0oooo00100?oo
o`P0Ogmo9`3oool3000000@0oooo0P0000040?ooo`8000001P3oool00`000000oooo0?ooo`1C0?oo
o`03001Vo`3oool0oooo03d0oooo00120?ooo`P0Ogmo9P3oool00`000000oooo0?ooo`020?ooo`04
0000003oool0oooo00000080oooo00@000000?ooo`3oool000001@3oool00`000000oooo0?ooo`1D
0?ooo`03001Vo`3oool0oooo03`0oooo00140?ooo`P0Ogmo903oool00`000000oooo0?ooo`020?oo
o`040000003oool0oooo00000080oooo00@000000?ooo`3oool000001@3oool00`000000oooo0?oo
o`1D0?ooo`03001Vo`3oool0oooo03`0oooo00160?ooo`L0Ogmo8`3oool00`000000oooo0?ooo`02
0?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool000001@3oool2000005H0oooo
00<006Ko0?ooo`3oool0>`3oool004P0oooo1`1oOglQ0?ooo`030000003oool0oooo0080oooo00@0
00000?ooo`3oool000000P3oool010000000oooo0?ooo`0000050?ooo`030000003oool0oooo05H0
oooo00<006Ko0?ooo`3oool0>P3oool004X0oooo1`1oOglN0?ooo`800000103oool010000000oooo
0?ooo`0000020?ooo`040000003oool0oooo000000D0oooo00<000000?ooo`3oool0EP3oool00`00
I_l0oooo0?ooo`0j0?ooo`00B`3oool807moOad0oooo00<000000?ooo`3oool00`3oool2000000@0
oooo0P0000060?ooo`030000003oool0oooo05L0oooo00<006Ko0?ooo`3oool0>@3oool004d0oooo
201oOgl_0?ooo`800000F03oool00`00I_l0oooo0?ooo`0i0?ooo`00C`3oool707moObh0oooo00<0
00000?ooo`3oool0F03oool00`00I_l0oooo0?ooo`0h0?ooo`00D@3oool707moOb`0oooo00<00000
0?ooo`3oool0F03oool00`00I_l0oooo0?ooo`0h0?ooo`00D`3oool707moObX0oooo00<000000?oo
o`3oool0F@3oool00`00I_l0oooo0?ooo`0g0?ooo`00E03oool707moObT0oooo0P00001J0?ooo`03
001Vo`3oool0oooo03L0oooo001F0?ooo`L0Ogmo9`3oool00`000000oooo0?ooo`1J0?ooo`03001V
o`3oool0oooo03H0oooo001H0?ooo`L0Ogmo9@3oool00`000000oooo0?ooo`1J0?ooo`03001Vo`3o
ool0oooo03H0oooo001I0?ooo`L0Ogmo903oool00`000000oooo0?ooo`1K0?ooo`03001Vo`3oool0
oooo03D0oooo001K0?ooo`L0Ogmo8P3oool00`000000oooo0?ooo`1K0?ooo`03001Vo`3oool0oooo
03D0oooo001M0?ooo`L0Ogmo803oool2000005d0oooo00<006Ko0?ooo`3oool0=03oool005h0oooo
1`1oOglO0?ooo`030000003oool0oooo05`0oooo00<006Ko0?ooo`3oool0=03oool00600oooo1`1o
OglM0?ooo`030000003oool0oooo05`0oooo00<006Ko0?ooo`3oool0=03oool00680oooo1`1oOglK
0?ooo`030000003oool0oooo05d0oooo00<006Ko0?ooo`3oool0<`3oool006<0oooo201oOglI0?oo
o`800000GP3oool00`00I_l0oooo0?ooo`0c0?ooo`00I@3oool707moOaP0oooo00<000000?ooo`3o
ool0GP3oool00`00I_l0oooo0?ooo`0b0?ooo`00I`3oool707moO`040?ooo`0000000000000000<0
oooo0`0000040?ooo`8000001P3oool00`000000oooo0?ooo`1N0?ooo`03001Vo`3oool0oooo0380
oooo001Y0?ooo`L0Ogmo00D000000?ooo`3oool0oooo000000030?ooo`040000003oool0oooo0000
0080oooo00<000000?ooo`3oool00`3oool00`000000oooo0?ooo`1N0?ooo`03001Vo`3oool0oooo
0380oooo001Z0?ooo`P0Ogmo1P3oool010000000oooo0?ooo`0000020?ooo`030000003oool0oooo
00<0oooo0P00001P0?ooo`03001Vo`3oool0oooo0340oooo001/0?ooo`P0Ogmo103oool010000000
oooo0?ooo`0000020?ooo`030000003oool0oooo00<0oooo00<000000?ooo`3oool0G`3oool00`00
I_l0oooo0?ooo`0a0?ooo`00KP3oool807moO`8000000`3oool010000000oooo0?ooo`0000050?oo
o`030000003oool0oooo0600oooo00<006Ko0?ooo`3oool0<03oool006l0oooo00<0000007moO`1o
Ogl01@1oOgl40?ooo`040000003oool0oooo000000D0oooo00<000000?ooo`3oool0H03oool00`00
I_l0oooo0?ooo`0`0?ooo`00L03oool00`000000oooo07moO`0607moO`<0oooo0P0000060?ooo`80
0000H@3oool00`00I_l0oooo0?ooo`0`0?ooo`00M03oool707moO`T0oooo00<000000?ooo`3oool0
H@3oool00`00I_l0oooo0?ooo`0_0?ooo`00M@3oool807moO`L0oooo00<000000?ooo`3oool0H@3o
ool00`00I_l0oooo0?ooo`0_0?ooo`00M`3oool807moO`D0oooo00<000000?ooo`3oool0HP3oool0
0`00I_l0oooo0?ooo`0^0?ooo`00N@3oool707moO`@0oooo00<000000?ooo`3oool0HP3oool00`00
I_l0oooo0?ooo`0^0?ooo`00N`3oool707moO`80oooo0P00001S0?ooo`03001Vo`3oool0oooo02h0
oooo001m0?ooo`L0Ogmo00<000000?ooo`3oool0H`3oool00`00I_l0oooo0?ooo`0]0?ooo`00OP3o
ool707moOfD0oooo00<006Ko0?ooo`3oool0;@3oool00800oooo1`1oOgmT0?ooo`03001Vo`3oool0
oooo02`0oooo00220?ooo`L0OgmoHP3oool00`00I_l0oooo0?ooo`0/0?ooo`00P`3oool707moOf40
oooo00<006Ko0?ooo`3oool0;03oool008@0oooo00<0000007moO`1oOgl01@1oOgmP0?ooo`03001V
o`3oool0oooo02/0oooo00240?ooo`030000003oool0oooo00L0OgmoGP3oool00`00I_l0oooo0?oo
o`0[0?ooo`00Q03oool200000080oooo1`1oOgmN0?ooo`03001Vo`3oool0oooo02X0oooo00240?oo
o`030000003oool0oooo00<0oooo1`1oOgmL0?ooo`03001Vo`3oool0oooo02X0oooo001^0?ooo`D0
00000`3oool2000000@0oooo0P0000060?ooo`030000003oool0oooo00D0oooo1`1oOgmJ0?ooo`03
001Vo`3oool0oooo02X0oooo001_0?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3o
ool000000P3oool010000000oooo0?ooo`0000050?ooo`030000003oool0oooo00H0oooo201oOgmI
0?ooo`03001Vo`3oool0oooo02T0oooo001`0?ooo`030000003oool0oooo0080oooo00@000000?oo
o`3oool000000P3oool010000000oooo0?ooo`0000050?ooo`8000002@3oool807moOeL0oooo00<0
06Ko0?ooo`3oool0:@3oool00740oooo00D000000?ooo`3oool0oooo000000020?ooo`040000003o
ool0oooo00000080oooo00<000000?ooo`3oool00`3oool00`000000oooo0?ooo`0:0?ooo`P0Ogmo
E@3oool00`00I_l0oooo0?ooo`0Y0?ooo`00KP3oool01@000000oooo0?ooo`3oool000000080oooo
00@000000?ooo`3oool000000P3oool010000000oooo0?ooo`0000050?ooo`030000003oool0oooo
00`0oooo201oOgmD0?ooo`03001Vo`3oool0oooo02P0oooo001^0?ooo`050000003oool0oooo0?oo
o`0000000P3oool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo000000D0oooo00<0
00000?ooo`3oool03P3oool707moOe<0oooo00<006Ko0?ooo`3oool0:03oool006l0oooo0`000004
0?ooo`800000103oool2000000H0oooo00<000000?ooo`3oool0403oool707moOe40oooo00<006Ko
0?ooo`3oool0:03oool008@0oooo0P00000C0?ooo`L0OgmoD03oool00`00I_l0oooo0?ooo`0W0?oo
o`00Q03oool00`000000oooo0?ooo`0C0?ooo`L0OgmoC`3oool00`00I_l0oooo0?ooo`0W0?ooo`00
Q03oool00`000000oooo0?ooo`0E0?ooo`L0OgmoC@3oool00`00I_l0oooo0?ooo`0W0?ooo`00Q03o
ool00`000000oooo0?ooo`0G0?ooo`H0OgmoC@3oool00`00I_l0oooo0?ooo`0V0?ooo`00Q03oool2
000001T0oooo1`1oOgm;0?ooo`03001Vo`3oool0oooo02H0oooo00240?ooo`030000003oool0oooo
01X0oooo1`1oOgm90?ooo`03001Vo`3oool0oooo02H0oooo00240?ooo`030000003oool0oooo01/0
oooo201oOgm80?ooo`03001Vo`3oool0oooo02D0oooo00240?ooo`030000003oool0oooo01d0oooo
1`1oOgm70?ooo`03001Vo`3oool0oooo02D0oooo00240?ooo`800000803oool707moOdD0oooo00<0
06Ko0?ooo`3oool09@3oool008@0oooo00<000000?ooo`3oool08@3oool707moOd@0oooo00<006Ko
0?ooo`3oool0903oool008@0oooo00<000000?ooo`3oool08P3oool807moOd80oooo00<006Ko0?oo
o`3oool0903oool008@0oooo00<000000?ooo`3oool0903oool807moOd00oooo00<006Ko0?ooo`3o
ool0903oool008@0oooo00<000000?ooo`3oool09P3oool807moOcl0oooo00<006Ko0?ooo`3oool0
8`3oool008@0oooo0P00000Y0?ooo`P0Ogmo?@3oool00`00I_l0oooo0?ooo`0S0?ooo`00KP3oool5
00000080oooo0`0000040?ooo`8000001P3oool00`000000oooo0?ooo`0Z0?ooo`P0Ogmo>`3oool0
0`00I_l0oooo0?ooo`0S0?ooo`00K`3oool01P000000oooo0?ooo`000000oooo000000<0oooo00@0
00000?ooo`3oool000000P3oool00`000000oooo0?ooo`030?ooo`030000003oool0oooo02`0oooo
201oOglj0?ooo`03001Vo`3oool0oooo0280oooo001`0?ooo`030000003oool0oooo00D0oooo00@0
00000?ooo`3oool000000P3oool00`000000oooo0?ooo`030?ooo`030000003oool0oooo02h0oooo
201oOglh0?ooo`03001Vo`3oool0oooo0280oooo001a0?ooo`030000003oool0oooo00@0oooo00@0
00000?ooo`3oool000000P3oool00`000000oooo0?ooo`030?ooo`800000<@3oool807moOcH0oooo
00<006Ko0?ooo`3oool08P3oool006h0oooo00H000000?ooo`3oool0oooo0000003oool4000000<0
oooo00@000000?ooo`3oool000001@3oool00`000000oooo0?ooo`0b0?ooo`L0Ogmo=P3oool00`00
I_l0oooo0?ooo`0Q0?ooo`00KP3oool01`000000oooo0?ooo`3oool000000?ooo`0000001P3oool0
10000000oooo0?ooo`0000050?ooo`030000003oool0oooo03@0oooo1`1oOgld0?ooo`03001Vo`3o
ool0oooo0240oooo001_0?ooo`<000000P3oool5000000<0oooo0P0000060?ooo`030000003oool0
oooo03H0oooo1`1oOglb0?ooo`03001Vo`3oool0oooo0240oooo00240?ooo`800000>03oool807mo
Oc00oooo00<006Ko0?ooo`3oool08@3oool008@0oooo00<000000?ooo`3oool0>@3oool807moObl0
oooo00<006Ko0?ooo`3oool0803oool008@0oooo00<000000?ooo`3oool0>`3oool707moObh0oooo
00<006Ko0?ooo`3oool0803oool008@0oooo00<000000?ooo`3oool0?@3oool707moOb`0oooo00<0
06Ko0?ooo`3oool0803oool008@0oooo0P0000100?ooo`L0Ogmo:`3oool00`00I_l0oooo0?ooo`0O
0?ooo`00Q03oool00`000000oooo0?ooo`100?ooo`L0Ogmo:P3oool00`00I_l0oooo0?ooo`0O0?oo
o`00Q03oool00`000000oooo0?ooo`120?ooo`L0Ogmo:03oool00`00I_l0oooo0?ooo`0O0?ooo`00
Q03oool00`000000oooo0?ooo`140?ooo`H0Ogmo:03oool00`00I_l0oooo0?ooo`0N0?ooo`00Q03o
ool00`000000oooo0?ooo`150?ooo`L0Ogmo9P3oool00`00I_l0oooo0?ooo`0N0?ooo`00Q03oool2
000004P0oooo1`1oOglT0?ooo`03001Vo`3oool0oooo01h0oooo00240?ooo`030000003oool0oooo
04P0oooo1`1oOglS0?ooo`03001Vo`3oool0oooo01h0oooo00240?ooo`030000003oool0oooo04X0
oooo1`1oOglR0?ooo`03001Vo`3oool0oooo01d0oooo00240?ooo`030000003oool0oooo04`0oooo
1P1oOglQ0?ooo`03001Vo`3oool0oooo01d0oooo00240?ooo`800000CP3oool707moOal0oooo00<0
06Ko0?ooo`3oool07@3oool008@0oooo00<000000?ooo`3oool0C`3oool707moOah0oooo00<006Ko
0?ooo`3oool0703oool006l0oooo0`0000040?ooo`800000103oool2000000H0oooo00<000000?oo
o`3oool0D03oool907moOa/0oooo00<006Ko0?ooo`3oool0703oool006h0oooo00D000000?ooo`3o
ool0oooo000000020?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool000001@3o
ool00`000000oooo0?ooo`1B0?ooo`T0Ogmo6@3oool00`00I_l0oooo0?ooo`0L0?ooo`00LP3oool0
10000000oooo0?ooo`0000020?ooo`040000003oool0oooo00000080oooo00<000000?ooo`3oool0
0`3oool2000005D0oooo2@1oOglH0?ooo`03001Vo`3oool0oooo01/0oooo001`0?ooo`8000000`3o
ool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo000000D0oooo00<000000?ooo`3o
ool0E`3oool807moOaH0oooo00<006Ko0?ooo`3oool06`3oool00780oooo00@000000?ooo`3oool0
00000P3oool010000000oooo0?ooo`0000020?ooo`030000003oool0oooo00<0oooo00<000000?oo
o`3oool0F@3oool807moOa@0oooo00<006Ko0?ooo`3oool06`3oool006h0oooo00D000000?ooo`3o
ool0oooo000000020?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool000001@3o
ool00`000000oooo0?ooo`1K0?ooo`L0Ogmo4`3oool00`00I_l0oooo0?ooo`0K0?ooo`00K`3oool3
000000@0oooo0P0000040?ooo`8000001P3oool2000005h0oooo1`1oOglB0?ooo`03001Vo`3oool0
oooo01X0oooo00240?ooo`030000003oool0oooo05l0oooo1`1oOgl@0?ooo`03001Vo`3oool0oooo
01X0oooo00240?ooo`030000003oool0oooo0600oooo1`1oOgl?0?ooo`03001Vo`3oool0oooo01X0
oooo00240?ooo`030000003oool0oooo0680oooo1`1oOgl>0?ooo`03001Vo`3oool0oooo01T0oooo
00240?ooo`030000003oool0oooo06@0oooo1`1oOgl<0?ooo`03001Vo`3oool0oooo01T0oooo0024
0?ooo`800000IP3oool807moO`X0oooo00<006Ko0?ooo`3oool06@3oool008@0oooo00<000000?oo
o`3oool0I`3oool707moO`T0oooo00<006Ko0?ooo`3oool06@3oool008@0oooo00<000000?ooo`3o
ool0J@3oool707moO`P0oooo00<006Ko0?ooo`3oool0603oool008@0oooo00<000000?ooo`3oool0
J`3oool707moO`H0oooo00<006Ko0?ooo`3oool0603oool008@0oooo0P00001]0?ooo`P0Ogmo103o
ool00`00I_l0oooo0?ooo`0H0?ooo`00Q03oool00`000000oooo0?ooo`1^0?ooo`P0Ogmo0`3oool0
0`00I_l0oooo0?ooo`0G0?ooo`00Q03oool00`000000oooo0?ooo`1`0?ooo`L0Ogmo0P3oool00`00
I_l0oooo0?ooo`0G0?ooo`00Q03oool00`000000oooo0?ooo`1b0?ooo`L0Ogmo00<006Ko0?ooo`3o
ool05`3oool008@0oooo0P00001e0?ooo`D0Ogmo0`00000G0?ooo`00Q03oool00`000000oooo0?oo
o`1e0?ooo`<0Ogmo1@00000F0?ooo`00K`3oool3000000<0oooo0`0000040?ooo`8000001P3oool0
0`000000oooo0?ooo`1g0?ooo`L000005@3oool006h0oooo00L000000?ooo`3oool0oooo0000003o
ool0000000<0oooo00@000000?ooo`3oool000000P3oool00`000000oooo0?ooo`030?ooo`030000
003oool0oooo07L0oooo1`00000E0?ooo`00LP3oool00`000000oooo0?ooo`030?ooo`040000003o
ool0oooo00000080oooo00<000000?ooo`3oool00`3oool00`000000oooo0?ooo`1g0?ooo`L00000
5@3oool00700oooo0P0000060?ooo`040000003oool0oooo00000080oooo00<000000?ooo`3oool0
0`3oool2000007T0oooo1@00000F0?ooo`00LP3oool00`000000oooo00000003000000<0oooo00@0
00000?ooo`3oool000001@3oool00`000000oooo0?ooo`1i0?ooo`<000005`3oool006h0oooo00L0
00000?ooo`3oool0oooo0000003oool0000000H0oooo00@000000?ooo`3oool000001@3oool00`00
0000oooo0?ooo`2C0?ooo`00K`3oool300000080oooo1@0000030?ooo`800000W03oool00?l0oooo
6`3oool00?l0oooo6`3oool00?l0oooo6`3oool00?l0oooo6`3oool00001\
\>"],
  ImageRangeCache->{{{0, 281}, {173.25, 0}} -> {-7.03507, -36.7447, \
0.0532173, 2.339}}]
}, Open  ]],

Cell[TextData[
"Now figure out where the tangent line is parallel to the secant line.  If \
there are more than two solutions, you might need to adjust the code from \
here on."], "Section",
  Evaluatable->False,
  AspectRatioFixed->True],

Cell[CellGroupData[{

Cell["\<\
cees = N[Solve[f'[x] == m, x]]
c1 = cees[[1,1,2]]
c2 = cees[[2,1,2]]\
\>", "Input",
  AspectRatioFixed->False],

Cell[BoxData[
    \(TraditionalForm\`{{x \[Rule] \(-5.4249236245417665`\)}, {x \[Rule] 
          2.7582569578751`}}\)], "Output"],

Cell[BoxData[
    \(TraditionalForm\`\(-5.4249236245417665`\)\)], "Output"],

Cell[BoxData[
    \(TraditionalForm\`2.7582569578751`\)], "Output"]
}, Open  ]],

Cell[TextData[
"This defines the tangent line and draws a neat picture!"], "Section",
  Evaluatable->False,
  AspectRatioFixed->True],

Cell[CellGroupData[{

Cell["\<\
Clear[tanLine]
tanLine[x_,c_] := f[c] + f'[c](x - c)
\t\t\t\t\t\t                 
Plot[{f[x], secLine[x], tanLine[x,c1],tanLine[x,c2]},
\t\t{x,a,b}, AxesLabel->{\"x\",\"\"},
\t\tPlotStyle->{{Hue[.6], Thickness[.007]},
\t\t\t\t\t{Thickness[.015],GrayLevel[.5]},
\t\t\t\t\t{Hue[0], Dashing[{.03}]},
\t\t\t\t\t{Hue[0], Dashing[{.03}]}},
\t\tEpilog->{PointSize[.03],
\t\t\t\tPoint[{a,f[a]}],Point[{b,f[b]}],
\t\t\t\tPointSize[.025], Hue[0],
\t\t\t\tPoint[{c1,f[c1]}],Point[{c2,f[c2]}]}];
\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\
\>", "Input",
  AspectRatioFixed->False],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .61803 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.0710732 0.246434 0.000968868 [
[.07356 .23393 -6 -9 ]
[.07356 .23393 6 0 ]
[.21571 .23393 -6 -9 ]
[.21571 .23393 6 0 ]
[.35785 .23393 -6 -9 ]
[.35785 .23393 6 0 ]
[.64215 .23393 -3 -9 ]
[.64215 .23393 3 0 ]
[.78429 .23393 -3 -9 ]
[.78429 .23393 3 0 ]
[.92644 .23393 -3 -9 ]
[.92644 .23393 3 0 ]
[1.025 .24643 0 -6 ]
[1.025 .24643 10 6 ]
[.4875 .05266 -24 -4.5 ]
[.4875 .05266 0 4.5 ]
[.4875 .14955 -24 -4.5 ]
[.4875 .14955 0 4.5 ]
[.4875 .34332 -18 -4.5 ]
[.4875 .34332 0 4.5 ]
[.4875 .44021 -18 -4.5 ]
[.4875 .44021 0 4.5 ]
[.4875 .53709 -18 -4.5 ]
[.4875 .53709 0 4.5 ]
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 g
.25 Mabswid
[ ] 0 setdash
.07356 .24643 m
.07356 .25268 L
s
[(-6)] .07356 .23393 0 1 Mshowa
.21571 .24643 m
.21571 .25268 L
s
[(-4)] .21571 .23393 0 1 Mshowa
.35785 .24643 m
.35785 .25268 L
s
[(-2)] .35785 .23393 0 1 Mshowa
.64215 .24643 m
.64215 .25268 L
s
[(2)] .64215 .23393 0 1 Mshowa
.78429 .24643 m
.78429 .25268 L
s
[(4)] .78429 .23393 0 1 Mshowa
.92644 .24643 m
.92644 .25268 L
s
[(6)] .92644 .23393 0 1 Mshowa
.125 Mabswid
.1091 .24643 m
.1091 .25018 L
s
.14463 .24643 m
.14463 .25018 L
s
.18017 .24643 m
.18017 .25018 L
s
.25124 .24643 m
.25124 .25018 L
s
.28678 .24643 m
.28678 .25018 L
s
.32232 .24643 m
.32232 .25018 L
s
.39339 .24643 m
.39339 .25018 L
s
.42893 .24643 m
.42893 .25018 L
s
.46446 .24643 m
.46446 .25018 L
s
.53554 .24643 m
.53554 .25018 L
s
.57107 .24643 m
.57107 .25018 L
s
.60661 .24643 m
.60661 .25018 L
s
.67768 .24643 m
.67768 .25018 L
s
.71322 .24643 m
.71322 .25018 L
s
.74876 .24643 m
.74876 .25018 L
s
.81983 .24643 m
.81983 .25018 L
s
.85537 .24643 m
.85537 .25018 L
s
.8909 .24643 m
.8909 .25018 L
s
.03802 .24643 m
.03802 .25018 L
s
.00249 .24643 m
.00249 .25018 L
s
.96198 .24643 m
.96198 .25018 L
s
.99751 .24643 m
.99751 .25018 L
s
.25 Mabswid
0 .24643 m
1 .24643 L
s
gsave
1.025 .24643 -61 -10 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(x) show
69.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.5 .05266 m
.50625 .05266 L
s
[(-200)] .4875 .05266 1 0 Mshowa
.5 .14955 m
.50625 .14955 L
s
[(-100)] .4875 .14955 1 0 Mshowa
.5 .34332 m
.50625 .34332 L
s
[(100)] .4875 .34332 1 0 Mshowa
.5 .44021 m
.50625 .44021 L
s
[(200)] .4875 .44021 1 0 Mshowa
.5 .53709 m
.50625 .53709 L
s
[(300)] .4875 .53709 1 0 Mshowa
.125 Mabswid
.5 .07204 m
.50375 .07204 L
s
.5 .09141 m
.50375 .09141 L
s
.5 .11079 m
.50375 .11079 L
s
.5 .13017 m
.50375 .13017 L
s
.5 .16892 m
.50375 .16892 L
s
.5 .1883 m
.50375 .1883 L
s
.5 .20768 m
.50375 .20768 L
s
.5 .22706 m
.50375 .22706 L
s
.5 .26581 m
.50375 .26581 L
s
.5 .28519 m
.50375 .28519 L
s
.5 .30457 m
.50375 .30457 L
s
.5 .32394 m
.50375 .32394 L
s
.5 .3627 m
.50375 .3627 L
s
.5 .38208 m
.50375 .38208 L
s
.5 .40145 m
.50375 .40145 L
s
.5 .42083 m
.50375 .42083 L
s
.5 .45958 m
.50375 .45958 L
s
.5 .47896 m
.50375 .47896 L
s
.5 .49834 m
.50375 .49834 L
s
.5 .51772 m
.50375 .51772 L
s
.5 .03328 m
.50375 .03328 L
s
.5 .01391 m
.50375 .01391 L
s
.5 .55647 m
.50375 .55647 L
s
.5 .57585 m
.50375 .57585 L
s
.5 .59523 m
.50375 .59523 L
s
.5 .6146 m
.50375 .6146 L
s
.25 Mabswid
.5 0 m
.5 .61803 L
s
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
0 .4 1 r
.007 w
.02381 .25883 m
.04262 .27342 L
.06244 .28654 L
.08426 .29847 L
.10458 .30735 L
.12297 .31365 L
.14264 .31868 L
.15285 .32064 L
.16394 .32228 L
.16902 .32287 L
.17441 .32339 L
.17946 .32378 L
.18408 .32405 L
.18639 .32416 L
.18891 .32425 L
.19128 .32432 L
.19349 .32437 L
.19482 .32439 L
.19606 .3244 L
.19718 .32441 L
.19839 .32441 L
.19902 .32441 L
.19972 .32441 L
.20044 .32441 L
.20111 .3244 L
.20232 .32439 L
.20362 .32437 L
.20597 .32433 L
.20853 .32425 L
.21319 .32407 L
.21772 .32383 L
.22192 .32355 L
.23154 .32271 L
.24058 .32168 L
.26118 .31854 L
.28137 .31451 L
.29987 .31009 L
.33949 .2988 L
.3776 .28635 L
.41816 .2724 L
.45721 .25929 L
.49871 .24679 L
.51951 .24143 L
.53869 .23719 L
.55856 .23364 L
.57716 .2312 L
.5862 .23036 L
.59085 .23002 L
.59592 .22972 L
.59879 .22959 L
Mistroke
.60145 .22949 L
.604 .22941 L
.6053 .22938 L
.6067 .22936 L
.60738 .22935 L
.60809 .22934 L
.60937 .22932 L
.61056 .22932 L
.61188 .22931 L
.61305 .22932 L
.6143 .22932 L
.61548 .22934 L
.61656 .22935 L
.61885 .2294 L
.62138 .22947 L
.62402 .22957 L
.6265 .22968 L
.63092 .22995 L
.63568 .23031 L
.64653 .23145 L
.65646 .23289 L
.67542 .23678 L
.68616 .23968 L
.69613 .24283 L
.73523 .25988 L
.75662 .2726 L
.77678 .28697 L
.8153 .32133 L
.85627 .36871 L
.89572 .42592 L
.93366 .49258 L
.97406 .5771 L
.97619 .58198 L
Mfstroke
.5 g
.015 w
.02381 .25883 m
.06244 .27194 L
.10458 .28624 L
.14415 .29966 L
.18221 .31258 L
.22272 .32632 L
.26171 .33955 L
.30316 .35361 L
.34309 .36716 L
.3815 .3802 L
.42237 .39406 L
.46172 .40741 L
.49955 .42025 L
.53984 .43392 L
.57861 .44708 L
.61984 .46106 L
.65954 .47454 L
.69774 .4875 L
.73838 .50129 L
.77751 .51456 L
.81909 .52867 L
.85916 .54227 L
.89771 .55535 L
.93871 .56926 L
.97619 .58198 L
s
1 0 0 r
.5 Mabswid
[ .03 ] 0 setdash
.02381 .28018 m
.06244 .29329 L
.10458 .30758 L
.14415 .32101 L
.18221 .33392 L
.22272 .34767 L
.26171 .3609 L
.30316 .37496 L
.34309 .38851 L
.3815 .40154 L
.42237 .41541 L
.46172 .42876 L
.49955 .4416 L
.53984 .45527 L
.57861 .46842 L
.61984 .48241 L
.65954 .49588 L
.69774 .50884 L
.73838 .52263 L
.77751 .53591 L
.81909 .55002 L
.85916 .56361 L
.89771 .57669 L
.93871 .5906 L
.97619 .60332 L
s
.02381 .01472 m
.06244 .02782 L
.10458 .04212 L
.14415 .05555 L
.18221 .06846 L
.22272 .0822 L
.26171 .09543 L
.30316 .1095 L
.34309 .12305 L
.3815 .13608 L
.42237 .14995 L
.46172 .1633 L
.49955 .17613 L
.53984 .1898 L
.57861 .20296 L
.61984 .21695 L
.65954 .23042 L
.69774 .24338 L
.73838 .25717 L
.77751 .27045 L
.81909 .28456 L
.85916 .29815 L
.89771 .31123 L
.93871 .32514 L
.97619 .33786 L
s
0 g
.03 w
.02381 .25883 Mdot
.97619 .58198 Mdot
1 0 0 r
.025 w
.11443 .31092 Mdot
.69604 .2428 Mdot
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{282, 174.25},
  ImageMargins->{{34, 0}, {0, 0}},
  ImageRegion->{{0, 1}, {0, 1}},
  ImageCache->GraphicsData["Bitmap", "\<\
CF5dJ6E]HGAYHf4PAg9QL6QYHg<PAVmbKF5d0`40004J0000[R000`400?l00000o`00003oo`3ooolK
0?ooo`00o`3ooolK0?ooo`00o`3ooolK0?ooo`00o`3ooolK0?ooo`00o`3ooolK0?ooo`00Q03oool0
0`000000oooo0?ooo`2C0?ooo`00Q03oool00`000000oooo0?ooo`2C0?ooo`00Q03oool00`000000
oooo0?ooo`2C0?ooo`00Q03oool00`000000oooo0?ooo`2C0?ooo`001P3oool20?l007`0oooo0P00
002D0?ooo`00203oool30?l007T0oooo00<000000?ooo`3oool0T`3oool000/0oooo0P3o001g0?oo
o`030000003oool0oooo09<0oooo000=0?ooo`030?l0003oool0oooo07@0oooo00<000000?ooo`3o
ool0T`3oool008@0oooo00<000000?ooo`3oool0T`3oool001D0oooo0`3o001/0?ooo`800000U03o
ool001P0oooo0`3o001Y0?ooo`030000003oool0oooo09<0oooo000K0?ooo`030?l0003oool0oooo
06H0oooo00<000000?ooo`3oool0T`3oool001`0oooo00<0o`000?ooo`3oool0C`3oool5000000<0
oooo0P0000040?ooo`8000001P3oool00`000000oooo0?ooo`2C0?ooo`00K`3oool010000000oooo
0?ooo`0000020?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool000001@3oool0
0`000000oooo0?ooo`2C0?ooo`00903oool20?l00480oooo1@0000030?ooo`030000003oool0oooo
0080oooo00@000000?ooo`3oool000000P3oool010000000oooo0?ooo`0000050?ooo`800000U03o
ool002H0oooo0P3o00190?ooo`050000003oool0oooo0?ooo`0000000P3oool010000000oooo0?oo
o`0000020?ooo`030000003oool0oooo00<0oooo00<000000?ooo`3oool0T`3oool002P0oooo0`3o
00130?ooo`050000003oool0oooo0?ooo`0000000P3oool010000000oooo0?ooo`0000020?ooo`04
0000003oool0oooo000000D0oooo00<000000?ooo`3oool0T`3oool002/0oooo00<0o`000?ooo`3o
ool0@03oool01@000000oooo0?ooo`3oool000000080oooo00@000000?ooo`3oool000000P3oool0
10000000oooo0?ooo`0000050?ooo`030000003oool0oooo09<0oooo001_0?ooo`<00000103oool2
000000@0oooo0P0000060?ooo`030000003oool0oooo09<0oooo000c0?ooo`80o`00C`3oool20000
09@0oooo000e0?ooo`<0o`00C03oool00`000000oooo0?ooo`2C0?ooo`00>03oool20?l004X0oooo
00<000000?ooo`3oool0T`3oool003X0oooo00<0o`000?ooo`3oool0A`3oool00`000000oooo0?oo
o`2C0?ooo`00Q03oool00`000000oooo0?ooo`2C0?ooo`00@P3oool30?l003l0oooo0P00002D0?oo
o`00A@3oool20?l003d0oooo00<000000?ooo`3oool0T`3oool004L0oooo0P3o000k0?ooo`030000
003oool0oooo09<0oooo00190?ooo`030?l0003oool0oooo03P0oooo00<000000?ooo`3oool0T`3o
ool008@0oooo00<000000?ooo`3oool0T`3oool008@0oooo0P00002D0?ooo`00D@3oool30?l00300
oooo00<000000?ooo`3oool0T`3oool005@0oooo0`3o000]0?ooo`030000003oool0oooo09<0oooo
001G0?ooo`80o`00:`3oool00`000000oooo0?ooo`2C0?ooo`00Q03oool00`000000oooo0?ooo`2C
0?ooo`00Q03oool00`000000oooo0?ooo`2C0?ooo`00H03oool30?l00240oooo0P00002D0?ooo`00
H`3oool40?l001d0oooo00<000000?ooo`3oool0T`3oool006L0oooo00<0o`000?ooo`3oool01@3o
ool3000000@0oooo0P0000040?ooo`8000001P3oool00`000000oooo0?ooo`2C0?ooo`00L03oool0
0`000000oooo0?ooo`020?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool00000
1@3oool00`000000oooo0?ooo`2C0?ooo`00J03oool5000000<0oooo00<000000?ooo`3oool00P3o
ool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo000000D0oooo00<000000?ooo`3o
ool0T`3oool006l0oooo0`3o00030?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3o
ool000001@3oool2000009@0oooo001`0?ooo`030000003oool0o`000080o`0000@000000?ooo`3o
ool000000P3oool010000000oooo0?ooo`0000050?ooo`030000003oool0oooo09<0oooo001_0?oo
o`800000103oool20?l000050?ooo`000000oooo0?ooo`0000000P3oool00`000000oooo0?ooo`03
0?ooo`030000003oool0oooo09<0oooo001`0?ooo`030000003oool0oooo00<0oooo0P0000040?oo
o`8000001P3oool00`000000oooo0?ooo`2C0?ooo`00Q03oool00`000000oooo0?ooo`2C0?ooo`00
OP3oool30?l000<0oooo0P00002D0?ooo`00P@3oool30?l000030000003oool0oooo09<0oooo0024
0?ooo`80o`00U03oool008@0oooo00<000000?ooo`3oool0T`3oool008@0oooo00<000000?ooo`3o
ool0T`3oool008@0oooo0P0000070?ooo`<0o`00RP3oool008@0oooo00<000000?ooo`3oool02@3o
ool20?l008P0oooo00240?ooo`030000003oool0oooo00/0oooo0P3o00260?ooo`00Q03oool00`00
0000oooo0?ooo`0=0?ooo`030?l0003oool0oooo08<0oooo000D0?ooo`<00000903oool300000200
oooo1@00000Q0?ooo`030000003oool0oooo01l0oooo1@00000S0?ooo`<000008@3oool3000002D0
oooo000C0?ooo`050000003oool0oooo0?ooo`000000903oool00`000000oooo0?ooo`0P0?ooo`04
0000003oool0oooo00000240oooo0P00000F0?ooo`80o`002@3oool010000000oooo0?ooo`00000T
0?ooo`030000003oool0oooo01l0oooo00D000000?ooo`3oool0oooo0000000T0?ooo`003@3oool5
000000030?ooo`000000oooo0080oooo00<000000?ooo`3oool06@3oool5000000030?ooo`000000
000000<000006P3oool5000000<0oooo00<000000?ooo`3oool08@3oool00`000000oooo0?ooo`0G
0?ooo`<0o`001`3oool00`000000oooo0?ooo`0Q0?ooo`D00000803oool01@000000oooo0?ooo`3o
ool0000002@0oooo000C0?ooo`@000008P3oool010000000oooo0?ooo`00000T0?ooo`030000003o
ool0oooo0200oooo00<000000?ooo`3oool06P3oool20?l000H0oooo00<000000?ooo`3oool0803o
ool010000000oooo0?ooo`00000Q0?ooo`@000009@3oool001<0oooo00<000000?ooo`3oool0903o
ool00`000000oooo0000000Q0?ooo`050000003oool0oooo0?ooo`0000008@3oool00`000000oooo
0?ooo`0L0?ooo`040?l0003oool0oooo000000<0oooo00<000000?ooo`3oool0803oool00`000000
oooo0000000Q0?ooo`030000003oool0oooo02H0oooo000D0?ooo`030000003oool0oooo02@0oooo
0P00000Q0?ooo`050000003oool0oooo0?ooo`0000008@3oool00`000000oooo0?ooo`0O0?ooo`05
0000003oool0oooo0?ooo`0000008`3oool200000280oooo00<000000?ooo`3oool09@3oool001D0
oooo0P00000U0?ooo`030000003oool0oooo0200oooo0`00000R0?ooo`8000008@3oool300000004
0?ooo`3o0000o`000?l00240oooo00<000000?ooo`3oool08@3oool2000002D0oooo00240?ooo`03
0000003oool0oooo00l0oooo5`00I_l00`3oool0o`000?l0001Z0?ooo`00Q03oool00`000000oooo
0?ooo`0:0?ooo`D006Ko5`3oool3001Vo`<0o`000`3oool40?l00600oooo00240?ooo`030000003o
ool0oooo00D0oooo1@00I_lP0?ooo`8006Ko00<0o`00001Vo`3o00001@3o001F0?ooo`80000000<0
oooo000000000000103oool008@0oooo00<000000?ooo`00I_l01@00I_lY0?ooo`H0o`00E`3oool0
0`000000oooo000000050?ooo`00PP000004001Vobl000001`3o001=000000X0oooo00<000000?oo
o`3oool0103oool000040000003oool0oooo0?ooo`<000000`3oool00`000000oooo0?ooo`060?oo
o`030000003oool0oooo00H0oooo00<000000?ooo`3oool01`3oool00`000000oooo0?ooo`060?oo
o`030000003oool0oooo00L0oooo00<000000?ooo`3oool01P3oool00`000000oooo0?ooo`060?oo
o`030000003oool0oooo00L0oooo00<000000?ooo`3oool01P3oool00`000000oooo0?ooo`070?oo
o`030000003oool0oooo00H0oooo00<000000?ooo`3oool01P3oool00`000000oooo0?ooo`020?oo
o`<006Ko0P3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00H0oooo00<000000?oo
o`3oool01`3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00L0oooo00<000000?oo
o`3o00001@3o0000103oool0o`000?l0003o00060?ooo`030000003oool0oooo00L0oooo00<00000
0?ooo`3oool01P3oool00`000000oooo0?ooo`070?ooo`030000003oool0oooo00H0oooo00<00000
0?ooo`3oool01P3oool00`000000oooo0?ooo`070?ooo`030000003oool0oooo00H0oooo00<00000
0?ooo`3oool0203oool00`000000oooo000000050?ooo`000`3oool5000000/0oooo00<000000?oo
o`3oool08`3oool00`000000oooo0?ooo`0R0?ooo`030000003oool0oooo01/0oooo0`00I_l50?oo
o`030000003oool0oooo0280oooo00<000000?ooo`3oool02P3oool40?l000@0oooo00@006Ko0?l0
003o0000o`003@3oool00`000000oooo0?ooo`0R0?ooo`030000003oool0oooo01X0oooo0P000000
0`3oool00000000000040?ooo`000P3oool70000000307moO`3oool0oooo06d0oooo0`00I_l80?oo
o`030000003oool0oooo03T0oooo0P00I_l00`3o0000oooo0?ooo`1E0?ooo`000P3oool7000000@0
OgmoJ@3oool3001Vo`/0oooo00<000000?ooo`3oool0>`3oool2001VoeH0oooo00020?ooo`L00000
1`1oOgmS0?ooo`<006Ko3P3oool2000003h0oooo0P00I_l30?ooo`80o`00C`3oool000<0oooo1@00
000;07moOed0oooo0`00I_lA0?ooo`030000003oool0oooo03l0oooo0P00I_l30?ooo`80o`00C@3o
ool000@0oooo0`0000040?ooo`/0OgmoE`3oool3001Voa@0oooo00<000000?ooo`3oool0@@3oool2
001Vo`<0oooo0`3o001:0?ooo`003@3oool00`00I_l0Ogmo07moO`0907moOe40oooo0`00I_lG0?oo
o`030000003oool0oooo04<0oooo00<006Ko0?ooo`3oool00`3oool20?l004P0oooo00060?ooo`80
o`001P3oool00`00I_l0oooo0?ooo`0;07moOd/0oooo0`00I_lJ0?ooo`030000003oool0oooo04@0
oooo00<006Ko0?ooo`3oool0C03oool000P0oooo0`3o00040?ooo`03001Vo`3oool0oooo0080oooo
2`1oOgm50?ooo`<006Ko7@3oool00`000000oooo0?ooo`150?ooo`03001Vo`3oool0oooo00T0oooo
0P3o00100?ooo`002`3oool20?l000<0oooo0P00I_l50?ooo``0Ogmo?P3oool3001Vob00oooo0P00
00170?ooo`8006Ko2`3oool30?l003d0oooo000=0?ooo`030?l0003oool0oooo0080oooo0P00I_l6
0?ooo``0Ogmo>03oool3001Vob<0oooo00<000000?ooo`3oool0B03oool00`00I_l0oooo0?ooo`0;
0?ooo`<0o`00>P3oool001@0oooo0P00I_l70?ooo``0Ogmo<P3oool3001VobH0oooo00<000000?oo
o`3oool0B@3oool00`00I_l0oooo0?ooo`0=0?ooo`030?l0003oool0oooo03L0oooo000E0?ooo`<0
o`002@3oool;07moOb/0oooo1000I_lY0?ooo`030000003oool0oooo04X0oooo00<006Ko0?ooo`3o
ool0AP3oool001P0oooo0`3o00000`3oool0o`000?l000020?l000@0oooo2P1oOglV0?ooo`<006Ko
;@3oool00`000000oooo0?ooo`1;0?ooo`03001Vo`3oool0oooo04D0oooo000K0?ooo`H0o`001P3o
ool:07moOb00oooo0`00I_l`0?ooo`800000C@3oool00`00I_l0oooo0?ooo`0A0?ooo`@0o`00;`3o
ool001/0oooo1P3o00090?ooo`X0Ogmo6@3oool4001Voc<0oooo00<000000?ooo`3oool0C@3oool0
0`00I_l0oooo0?ooo`0D0?ooo`@0o`00:`3oool001/0oooo1P3o0003001Vo`P0oooo2`1oOglA0?oo
o`D006Ko=`3oool00`000000oooo0?ooo`1>0?ooo`03001Vo`3oool0oooo01L0oooo00<0o`000?oo
o`3oool0:03oool001/0oooo1P3o00030?ooo`80o`000P00I_l70?ooo`/0Ogmo203oool6001Voc`0
oooo00<000000?ooo`3oool0C`3oool00`00I_l0oooo0?ooo`110?ooo`00703oool40?l000H0oooo
0P3o0004001Vo`H0oooo2`1oOgl5001Vod80oooo00<000000?ooo`3oool0D03oool00`00I_l0oooo
0?ooo`100?ooo`00:03oool30?l000030?ooo`00I_l006Ko00L006Ko2`1oOgm40?ooo`800000D@3o
ool00`00I_l0oooo0?ooo`0L0?ooo`D0o`007`3oool002/0oooo00<0o`000?ooo`3oool02P3oool;
07moOd40oooo00<000000?ooo`3oool0D@3oool00`00I_l0oooo0?ooo`0P0?ooo`<0o`00703oool0
03/0oooo2`1oOglY0?ooo`<00000103oool2000000@0oooo0P0000060?ooo`030000003oool0oooo
0580oooo00<006Ko0?ooo`3oool08P3oool00`3o0000oooo0?ooo`0I0?ooo`00?P3oool:07moObP0
oooo00<000000?ooo`3oool00P3oool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo
000000D0oooo00<000000?ooo`3oool0D`3oool00`00I_l0oooo0?ooo`0m0?ooo`00<`3oool30?l0
00/0oooo2P1oOglU0?ooo`030000003oool0oooo0080oooo00@000000?ooo`3oool000000P3oool0
10000000oooo0?ooo`0000050?ooo`030000003oool0oooo05@0oooo00<006Ko0?ooo`3oool0?03o
ool003H0oooo0`3o000;0?ooo`X0Ogmo8P3oool00`000000oooo0?ooo`020?ooo`040000003oool0
oooo00000080oooo00@000000?ooo`3oool000001@3oool2000005H0oooo00<006Ko0?ooo`3oool0
>`3oool003T0oooo0P3o000;0?ooo`/0Ogmo7`3oool00`000000oooo0?ooo`020?ooo`040000003o
ool0oooo00000080oooo00@000000?ooo`3oool000001@3oool00`000000oooo0?ooo`1F0?ooo`03
001Vo`3oool0oooo03X0oooo00190?ooo`/0Ogmo6`3oool2000000@0oooo00@000000?ooo`3oool0
00000P3oool010000000oooo0?ooo`0000050?ooo`030000003oool0oooo05H0oooo00<006Ko0?oo
o`3oool0>P3oool004`0oooo2`1oOglI0?ooo`030000003oool0oooo00<0oooo0P0000040?ooo`80
00001P3oool00`000000oooo0?ooo`1G0?ooo`03001Vo`3oool0oooo03T0oooo00120?ooo`<0o`00
2P3oool;07moObX0oooo00<000000?ooo`3oool0F03oool00`00I_l0oooo0?ooo`0h0?ooo`00A@3o
ool30?l000X0oooo2`1oOglW0?ooo`800000FP3oool00`00I_l0oooo0?ooo`0g0?ooo`00B03oool2
0?l000/0oooo2`1oOglT0?ooo`030000003oool0oooo05X0oooo00<006Ko0?ooo`3oool0=P3oool0
05P0oooo2P1oOglR0?ooo`030000003oool0oooo05/0oooo00<006Ko0?ooo`3oool0=@3oool005/0
oooo2P1oOglO0?ooo`030000003oool0oooo05/0oooo00<006Ko0?ooo`3oool0=@3oool00540oooo
0`3o000:0?ooo`X0Ogmo703oool00`000000oooo0?ooo`1L0?ooo`03001Vo`3oool0oooo03@0oooo
001D0?ooo`<0o`002@3oool<07moOaP0oooo0P00001N0?ooo`03001Vo`3oool0oooo03<0oooo001G
0?ooo`80o`002P3oool<07moOaD0oooo00<000000?ooo`3oool0G@3oool00`00I_l0oooo0?ooo`0c
0?ooo`00IP3oool<07moOa80oooo00<000000?ooo`3oool0GP3oool00`00I_l0oooo0?ooo`0b0?oo
o`00JP3oool;07moO`l0oooo00<000000?ooo`3oool0G`3oool00`00I_l0oooo0?ooo`0a0?ooo`00
H03oool30?l000X0oooo2`1oOgl<0?ooo`030000003oool0oooo05l0oooo00<006Ko0?ooo`3oool0
<@3oool006<0oooo103o00090?ooo`/0Ogmo2@3oool200000640oooo00<006Ko0?ooo`3oool0<03o
ool006L0oooo00<0o`000?ooo`3oool02@3oool;07moO`H0oooo00<000000?ooo`3oool0H@3oool0
0`00I_l0oooo0?ooo`0_0?ooo`00MP3oool;07moO`<0oooo00<000000?ooo`3oool0H@3oool00`00
I_l0oooo0?ooo`0_0?ooo`00N@3oool;07moO`030000003oool0oooo0680oooo00<006Ko0?ooo`3o
ool0;P3oool006l0oooo0P3o000;0?ooo`/0OgmoH`3oool00`00I_l0oooo0?ooo`0]0?ooo`00L@3o
ool30?l000/0oooo2`1oOgmP0?ooo`03001Vo`3oool0oooo02d0oooo001d0?ooo`80o`00303oool:
07moOel0oooo00<006Ko0?ooo`3oool0;03oool007H0oooo00<0o`000?ooo`3oool02`3oool00`00
0000Ogmo07moO`0807moOed0oooo00<006Ko0?ooo`3oool0:`3oool006h0oooo1@0000030?ooo`80
0000103oool2000000H0oooo00@000000?ooo`3oool0oooo2P1oOgmJ0?ooo`03001Vo`3oool0oooo
02/0oooo001_0?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool000000P3oool0
0`000000oooo0?ooo`030?l000<0oooo00<000000?ooo`3oool00`3oool;07moOeP0oooo00<006Ko
0?ooo`3oool0:P3oool00700oooo00<000000?ooo`3oool00P3oool010000000oooo0?ooo`000002
0?ooo`040000003oool0oooo00000080oooo0`3o00000`000000oooo0?ooo`060?ooo`/0OgmoE@3o
ool00`00I_l0oooo0?ooo`0Z0?ooo`00L@3oool01@000000oooo0?ooo`3oool000000080oooo00@0
00000?ooo`3oool000000P3oool00`000000oooo0?ooo`030?ooo`030?l000000000oooo00T0oooo
2`1oOgmC0?ooo`03001Vo`3oool0oooo02T0oooo001^0?ooo`050000003oool0oooo0?ooo`000000
0P3oool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo000000D0oooo00<000000?l0
003oool0303oool;07moOe40oooo00<006Ko0?ooo`3oool0:03oool006h0oooo00D000000?ooo`3o
ool0oooo000000020?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool000001@3o
ool00`000000oooo0?ooo`0?0?ooo`/0OgmoCP3oool00`00I_l0oooo0?ooo`0X0?ooo`00K`3oool3
000000@0oooo0P0000040?ooo`8000001P3oool00`000000oooo0?ooo`060?ooo`030?l0003oool0
oooo00T0oooo2`1oOgm<0?ooo`03001Vo`3oool0oooo02L0oooo00240?ooo`030000003oool0oooo
00L0oooo0`3o000;0?ooo`X0OgmoBP3oool00`00I_l0oooo0?ooo`0W0?ooo`00Q03oool2000000/0
oooo0`3o000;0?ooo`X0OgmoB03oool00`00I_l0oooo0?ooo`0V0?ooo`00Q03oool00`000000oooo
0?ooo`0=0?ooo`030?l0003oool0oooo00/0oooo2P1oOgm60?ooo`03001Vo`3oool0oooo02D0oooo
00240?ooo`030000003oool0oooo01d0oooo2`1oOgm30?ooo`03001Vo`3oool0oooo02D0oooo0024
0?ooo`030000003oool0oooo01D0oooo0P3o00090?ooo`/0Ogmo@@3oool00`00I_l0oooo0?ooo`0T
0?ooo`00Q03oool00`000000oooo0?ooo`0G0?ooo`<0o`002@3oool;07moOch0oooo00<006Ko0?oo
o`3oool0903oool008@0oooo0P00000K0?ooo`80o`002P3oool;07moOc`0oooo00<006Ko0?ooo`3o
ool08`3oool008@0oooo00<000000?ooo`3oool0703oool00`3o0000oooo0?ooo`0:0?ooo`/0Ogmo
>P3oool00`00I_l0oooo0?ooo`0R0?ooo`00Q03oool00`000000oooo0?ooo`0/0?ooo`/0Ogmo=`3o
ool00`00I_l0oooo0?ooo`0R0?ooo`00Q03oool00`000000oooo0?ooo`0T0?ooo`<0o`00203oool;
07moOcD0oooo00<006Ko0?ooo`3oool08@3oool008@0oooo00<000000?ooo`3oool09`3oool20?l0
00T0oooo2`1oOglb0?ooo`03001Vo`3oool0oooo0240oooo00240?ooo`800000:P3oool20?l000X0
oooo2`1oOgl`0?ooo`03001Vo`3oool0oooo0200oooo00240?ooo`030000003oool0oooo02/0oooo
00<0o`000?ooo`3oool02P3oool;07moObd0oooo00<006Ko0?ooo`3oool0803oool008@0oooo00<0
00000?ooo`3oool0>`3oool;07moOb/0oooo00<006Ko0?ooo`3oool07`3oool008@0oooo00<00000
0?ooo`3oool0<`3oool20?l000T0oooo2`1oOglX0?ooo`03001Vo`3oool0oooo01l0oooo00240?oo
o`030000003oool0oooo03D0oooo0`3o00090?ooo`/0Ogmo9P3oool00`00I_l0oooo0?ooo`0N0?oo
o`00Q03oool2000003T0oooo0`3o00090?ooo`/0Ogmo8`3oool00`00I_l0oooo0?ooo`0N0?ooo`00
Q03oool00`000000oooo0?ooo`0k0?ooo`030?l0003oool0oooo00T0oooo2`1oOglQ0?ooo`03001V
o`3oool0oooo01d0oooo00240?ooo`030000003oool0oooo04X0oooo2P1oOglO0?ooo`03001Vo`3o
ool0oooo01d0oooo001_0?ooo`<00000103oool2000000@0oooo0P0000060?ooo`030000003oool0
oooo04d0oooo2P1oOglM0?ooo`03001Vo`3oool0oooo01`0oooo001^0?ooo`050000003oool0oooo
0?ooo`0000000P3oool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo000000D0oooo
00<000000?ooo`3oool0@P3oool30?l000/0oooo2P1oOglJ0?ooo`03001Vo`3oool0oooo01`0oooo
001b0?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool000000P3oool00`000000
oooo0?ooo`030?ooo`800000AP3oool40?l000T0oooo2`1oOglH0?ooo`03001Vo`3oool0oooo01/0
oooo001`0?ooo`8000000`3oool010000000oooo0?ooo`0000020?ooo`040000003oool0oooo0000
00D0oooo00<000000?ooo`3oool0B@3oool20?l000X0oooo2`1oOglE0?ooo`03001Vo`3oool0oooo
01/0oooo001b0?ooo`040000003oool0oooo00000080oooo00@000000?ooo`3oool000000P3oool0
0`000000oooo0?ooo`030?ooo`030000003oool0oooo05P0oooo2`1oOglB0?ooo`03001Vo`3oool0
oooo01/0oooo001^0?ooo`050000003oool0oooo0?ooo`0000000P3oool010000000oooo0?ooo`00
00020?ooo`040000003oool0oooo000000D0oooo00<000000?ooo`3oool0F`3oool;07moOa00oooo
00<006Ko0?ooo`3oool06P3oool006l0oooo0`0000040?ooo`800000103oool2000000H0oooo00<0
00000?ooo`3oool0D@3oool30?l000X0oooo2`1oOgl=0?ooo`03001Vo`3oool0oooo01X0oooo0024
0?ooo`800000E@3oool40?l000T0oooo2`1oOgl;0?ooo`03001Vo`3oool0oooo01T0oooo00240?oo
o`030000003oool0oooo05P0oooo0P3o000:0?ooo`/0Ogmo203oool00`00I_l0oooo0?ooo`0I0?oo
o`00Q03oool00`000000oooo0?ooo`1W0?ooo`/0Ogmo1P3oool00`00I_l0oooo0?ooo`0H0?ooo`00
Q03oool00`000000oooo0?ooo`1Z0?ooo`/0Ogmo0`3oool00`00I_l0oooo0?ooo`0H0?ooo`00Q03o
ool00`000000oooo0?ooo`1P0?ooo`<0o`002P3oool;07moO`040?ooo`0000000000000001L0oooo
00240?ooo`800000I03oool30?l000X0oooo201oOgl5000001H0oooo00240?ooo`030000003oool0
oooo06H0oooo0`3o000:0?ooo`@0Ogmo1`00000E0?ooo`00Q03oool00`000000oooo0?ooo`1f0?oo
o`0307moO`000000000000D000005@3oool008@0oooo00<000000?ooo`3oool0M`3oool7000001D0
oooo00240?ooo`030000003oool0oooo06l0oooo1@3o00040?ooo`D000005P3oool008@0oooo00<0
00000?ooo`3oool0M03oool30?l00080oooo0`00000G0?ooo`00Q03oool2000007P0oooo00<0o`00
0?ooo`3oool06@3oool008@0oooo00<000000?ooo`3oool0T`3oool008@0oooo00<000000?ooo`3o
ool0T`3oool008@0oooo00<000000?ooo`3oool0T`3oool008@0oooo00<000000?ooo`3oool0T`3o
ool008@0oooo0P00002D0?ooo`00Q03oool00`000000oooo0?ooo`2C0?ooo`00o`3ooolK0?ooo`00
o`3ooolK0?ooo`00o`3ooolK0?ooo`00o`3ooolK0?ooo`00\
\>"],
  ImageRangeCache->{{{0, 281}, {173.25, 0}} -> {-7.03507, -273.58, 0.0532173, \
3.90386}}]
}, Open  ]],

Cell[TextData[
"Pretty cool, huh? Now go back and change the function and interval according \
to your lab handout. Remember our motto: \"There's value in being mean!\""], 
  "Section",
  Evaluatable->False,
  AspectRatioFixed->False]
},
FrontEndVersion->"4.0 for Macintosh",
ScreenRectangle->{{0, 1024}, {0, 748}},
AutoGeneratedPackage->None,
WindowToolbars->{},
CellGrouping->Manual,
WindowSize->{613, 617},
WindowMargins->{{44, Automatic}, {Automatic, -2}},
PrivateNotebookOptions->{"ColorPalette"->{RGBColor, -1}},
ShowCellLabel->True,
ShowCellTags->False,
RenderingOptions->{"ObjectDithering"->True,
"RasterDithering"->False},
StyleDefinitions -> Notebook[{
  
  Cell[CellGroupData[{
  Cell["Style Definitions", "Subtitle"],
  
  Cell["\<\
Modify the definitions below to change the default appearance of \
all cells in a given style.  Make modifications to any definition using \
commands in the Format menu.\
\>", "Text"],
  
  Cell[CellGroupData[{
  
  Cell["Style Environment Names", "Section"],
  
  Cell[StyleData[All, "Working"],
    PageWidth->WindowWidth,
    ScriptMinSize->9],
  
  Cell[StyleData[All, "Presentation"],
    PageWidth->WindowWidth,
    ScriptMinSize->12,
    FontSize->16],
  
  Cell[StyleData[All, "Condensed"],
    PageWidth->WindowWidth,
    CellBracketOptions->{"Margins"->{1, 1},
    "Widths"->{0, 5}},
    ScriptMinSize->8,
    FontSize->11],
  
  Cell[StyleData[All, "Printout"],
    PageWidth->PaperWidth,
    ScriptMinSize->5,
    FontSize->10,
    PrivateFontOptions->{"FontType"->"Outline"}]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Notebook Options", "Section"],
  
  Cell["\<\
The options defined for the style below will be used at the \
Notebook level.\
\>", "Text"],
  
  Cell[StyleData["Notebook"],
    PageHeaders->{{Cell[ 
            TextData[ {
              CounterBox[ "Page"]}], "PageNumber"], None, Cell[ 
            TextData[ {
              ValueBox[ "FileName"]}], "Header"]}, {Cell[ 
            TextData[ {
              ValueBox[ "FileName"]}], "Header"], None, Cell[ 
            TextData[ {
              CounterBox[ "Page"]}], "PageNumber"]}},
    CellFrameLabelMargins->6,
    StyleMenuListing->None]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Styles for Headings", "Section"],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Title"],
    CellMargins->{{7, Inherited}, {8, 40}},
    Evaluatable->False,
    CellGroupingRules->{"TitleGrouping", 0},
    CellHorizontalScrolling->False,
    PageBreakBelow->False,
    TextAlignment->Center,
    LineSpacing->{1, 3},
    CounterIncrements->"Title",
    CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, {
        "Subtitle", 0}, {"Subsubtitle", 0}},
    AspectRatioFixed->True,
    FontFamily->"New York",
    FontSize->24,
    FontWeight->"Bold"],
  
  Cell[StyleData["Title", "Presentation"],
    CellMargins->{{24, 10}, {20, 40}},
    LineSpacing->{1, 0},
    FontSize->44],
  
  Cell[StyleData["Title", "Condensed"],
    CellMargins->{{8, 10}, {4, 8}},
    FontSize->20],
  
  Cell[StyleData["Title", "Printout"],
    CellMargins->{{2, 10}, {12, 30}},
    FontSize->24]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Subtitle"],
    CellMargins->{{7, Inherited}, {6, 15}},
    Evaluatable->False,
    CellGroupingRules->{"TitleGrouping", 10},
    CellHorizontalScrolling->False,
    PageBreakBelow->False,
    TextAlignment->Center,
    LineSpacing->{1, 2},
    CounterIncrements->"Subtitle",
    CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, {
        "Subsubtitle", 0}},
    AspectRatioFixed->True,
    FontFamily->"New York",
    FontSize->18,
    FontWeight->"Bold"],
  
  Cell[StyleData["Subtitle", "Presentation"],
    CellMargins->{{24, 10}, {20, 20}},
    LineSpacing->{1, 0},
    FontSize->36],
  
  Cell[StyleData["Subtitle", "Condensed"],
    CellMargins->{{8, 10}, {4, 4}},
    FontSize->14],
  
  Cell[StyleData["Subtitle", "Printout"],
    CellMargins->{{2, 10}, {12, 8}},
    FontSize->18]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Subsubtitle"],
    CellMargins->{{7, Inherited}, {6, 15}},
    Evaluatable->False,
    CellGroupingRules->{"TitleGrouping", 20},
    CellHorizontalScrolling->False,
    PageBreakBelow->False,
    TextAlignment->Center,
    LineSpacing->{1, 2},
    CounterIncrements->"Subsubtitle",
    CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}},
    AspectRatioFixed->True,
    FontFamily->"New York",
    FontSize->14,
    FontWeight->"Bold",
    FontSlant->"Italic"],
  
  Cell[StyleData["Subsubtitle", "Presentation"],
    CellMargins->{{24, 10}, {20, 20}},
    LineSpacing->{1, 0},
    FontSize->24],
  
  Cell[StyleData["Subsubtitle", "Condensed"],
    CellMargins->{{8, 10}, {8, 8}},
    FontSize->12],
  
  Cell[StyleData["Subsubtitle", "Printout"],
    CellMargins->{{2, 10}, {12, 8}},
    FontSize->14]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Section"],
    CellDingbat->"\[GraySquare]",
    CellMargins->{{22, Inherited}, {8, 20}},
    Evaluatable->False,
    CellGroupingRules->{"SectionGrouping", 30},
    CellHorizontalScrolling->False,
    PageBreakBelow->False,
    LineSpacing->{1, 2},
    CounterIncrements->"Section",
    CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}},
    AspectRatioFixed->True,
    FontFamily->"New York",
    FontSize->14,
    FontWeight->"Bold",
    FontColor->RGBColor[0.499992, 0, 0.499992]],
  
  Cell[StyleData["Section", "Presentation"],
    CellMargins->{{40, 10}, {11, 32}},
    LineSpacing->{1, 0},
    FontSize->24],
  
  Cell[StyleData["Section", "Condensed"],
    CellMargins->{{18, Inherited}, {6, 12}},
    FontSize->12],
  
  Cell[StyleData["Section", "Printout"],
    CellMargins->{{13, 0}, {7, 22}},
    FontSize->14]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Subsection"],
    CellDingbat->"\[FilledSquare]",
    CellMargins->{{19, Inherited}, {8, 15}},
    Evaluatable->False,
    CellGroupingRules->{"SectionGrouping", 40},
    CellHorizontalScrolling->False,
    PageBreakBelow->False,
    LineSpacing->{1, 2},
    CounterIncrements->"Subsection",
    CounterAssignments->{{"Subsubsection", 0}},
    AspectRatioFixed->True,
    FontFamily->"New York",
    FontSize->12,
    FontWeight->"Bold"],
  
  Cell[StyleData["Subsection", "Presentation"],
    CellMargins->{{36, 10}, {11, 32}},
    LineSpacing->{1, 0},
    FontSize->22],
  
  Cell[StyleData["Subsection", "Condensed"],
    CellMargins->{{16, Inherited}, {6, 12}},
    FontSize->12],
  
  Cell[StyleData["Subsection", "Printout"],
    CellMargins->{{9, 0}, {7, 22}},
    FontSize->12]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Subsubsection"],
    CellDingbat->"\[EmptySquare]",
    CellMargins->{{18, Inherited}, {8, 12}},
    Evaluatable->False,
    CellGroupingRules->{"SectionGrouping", 50},
    CellHorizontalScrolling->False,
    PageBreakBelow->False,
    LineSpacing->{1, 2},
    CounterIncrements->"Subsubsection",
    AspectRatioFixed->True,
    FontFamily->"New York",
    FontSize->10,
    FontWeight->"Bold"],
  
  Cell[StyleData["Subsubsection", "Presentation"],
    CellMargins->{{34, 10}, {11, 26}},
    LineSpacing->{1, 0},
    FontSize->18],
  
  Cell[StyleData["Subsubsection", "Condensed"],
    CellMargins->{{17, Inherited}, {6, 12}},
    FontSize->10],
  
  Cell[StyleData["Subsubsection", "Printout"],
    CellMargins->{{9, 0}, {7, 14}},
    FontSize->11]
  }, Closed]]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Styles for Body Text", "Section"],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Text"],
    CellMargins->{{36, 10}, {7, 7}},
    Evaluatable->False,
    CellHorizontalScrolling->False,
    PageBreakWithin->Automatic,
    LineSpacing->{1, 2},
    CounterIncrements->"Text",
    AspectRatioFixed->True,
    FontFamily->"New York",
    FontSize->12,
    FontColor->RGBColor[0, 0, 1]],
  
  Cell[StyleData["Text", "Presentation"],
    CellMargins->{{24, 10}, {10, 10}},
    LineSpacing->{1, 5}],
  
  Cell[StyleData["Text", "Condensed"],
    CellMargins->{{8, 10}, {6, 6}},
    LineSpacing->{1, 1}],
  
  Cell[StyleData["Text", "Printout"],
    CellMargins->{{2, 2}, {6, 6}}]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["SmallText"],
    CellMargins->{{7, 10}, {6, 6}},
    Evaluatable->False,
    CellHorizontalScrolling->False,
    PageBreakWithin->Automatic,
    LineSpacing->{1, 2},
    CounterIncrements->"SmallText",
    AspectRatioFixed->True,
    FontFamily->"New York",
    FontSize->10],
  
  Cell[StyleData["SmallText", "Presentation"],
    CellMargins->{{24, 10}, {8, 8}},
    LineSpacing->{1, 5},
    FontSize->12],
  
  Cell[StyleData["SmallText", "Condensed"],
    CellMargins->{{8, 10}, {5, 5}},
    LineSpacing->{1, 2},
    FontSize->9],
  
  Cell[StyleData["SmallText", "Printout"],
    CellMargins->{{2, 2}, {5, 5}},
    FontSize->7]
  }, Closed]]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Styles for Input/Output", "Section"],
  
  Cell["\<\
The cells in this section define styles used for input and output \
to the kernel.  Be careful when modifying, renaming, or removing these \
styles, because the front end associates special meanings with these style \
names. Some attributes for these styles are actually set in FormatType Styles \
(in the last section of this stylesheet). \
\>", "Text"],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Input"],
    PageWidth->Infinity,
    CellMargins->{{42, 10}, {5, 7}},
    Evaluatable->True,
    CellGroupingRules->"InputGrouping",
    PageBreakWithin->False,
    GroupPageBreakWithin->False,
    CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}},
    DefaultFormatType->DefaultInputFormatType,
    LineSpacing->{1, 2},
    AutoItalicWords->{},
    FormatType->InputForm,
    ShowStringCharacters->True,
    NumberMarks->True,
    CounterIncrements->"Input",
    AspectRatioFixed->True,
    FontFamily->"Courier",
    FontSize->12,
    FontWeight->"Bold"],
  
  Cell[StyleData["Input", "Presentation"],
    CellMargins->{{72, Inherited}, {8, 10}},
    LineSpacing->{1, 0}],
  
  Cell[StyleData["Input", "Condensed"],
    CellMargins->{{40, 10}, {2, 3}}],
  
  Cell[StyleData["Input", "Printout"],
    CellMargins->{{39, 0}, {4, 6}},
    FontSize->9]
  }, Closed]],
  
  Cell[StyleData["InputOnly"],
    Evaluatable->True,
    CellGroupingRules->"InputGrouping",
    DefaultFormatType->DefaultInputFormatType,
    AutoItalicWords->{},
    FormatType->InputForm,
    ShowStringCharacters->True,
    NumberMarks->True,
    CounterIncrements->"Input",
    StyleMenuListing->None,
    FontWeight->"Bold"],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Output"],
    PageWidth->Infinity,
    CellMargins->{{42, 10}, {7, 5}},
    CellEditDuplicate->True,
    Evaluatable->False,
    CellGroupingRules->"OutputGrouping",
    CellHorizontalScrolling->True,
    PageBreakWithin->False,
    GroupPageBreakWithin->False,
    GeneratedCell->True,
    CellAutoOverwrite->True,
    CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}},
    DefaultFormatType->DefaultOutputFormatType,
    LineSpacing->{1, 2},
    AutoItalicWords->{},
    FormatType->InputForm,
    CounterIncrements->"Output",
    AspectRatioFixed->True,
    FontFamily->"Courier",
    FontSize->12],
  
  Cell[StyleData["Output", "Presentation"],
    CellMargins->{{72, Inherited}, {10, 8}},
    LineSpacing->{1, 0}],
  
  Cell[StyleData["Output", "Condensed"],
    CellMargins->{{41, Inherited}, {3, 2}}],
  
  Cell[StyleData["Output", "Printout"],
    CellMargins->{{39, 0}, {6, 4}},
    FontSize->9]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Message"],
    PageWidth->Infinity,
    CellMargins->{{42, Inherited}, {Inherited, Inherited}},
    Evaluatable->False,
    CellGroupingRules->"OutputGrouping",
    PageBreakWithin->False,
    GroupPageBreakWithin->False,
    GeneratedCell->True,
    CellAutoOverwrite->True,
    ShowCellLabel->False,
    CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}},
    DefaultFormatType->DefaultOutputFormatType,
    LineSpacing->{1, 2},
    AutoItalicWords->{},
    FormatType->InputForm,
    CounterIncrements->"Message",
    AspectRatioFixed->True,
    StyleMenuListing->None,
    FontFamily->"Courier",
    FontSize->12,
    FontColor->RGBColor[1, 0, 0]],
  
  Cell[StyleData["Message", "Presentation"],
    CellMargins->{{72, Inherited}, {Inherited, Inherited}},
    LineSpacing->{1, 0}],
  
  Cell[StyleData["Message", "Condensed"],
    CellMargins->{{41, Inherited}, {Inherited, Inherited}}],
  
  Cell[StyleData["Message", "Printout"],
    CellMargins->{{39, Inherited}, {Inherited, Inherited}},
    FontSize->8,
    FontColor->GrayLevel[0]]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Print"],
    PageWidth->Infinity,
    CellMargins->{{42, Inherited}, {Inherited, Inherited}},
    Evaluatable->False,
    CellGroupingRules->"OutputGrouping",
    PageBreakWithin->False,
    GroupPageBreakWithin->False,
    GeneratedCell->True,
    CellAutoOverwrite->True,
    ShowCellLabel->False,
    CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}},
    DefaultFormatType->DefaultOutputFormatType,
    LineSpacing->{1, 2},
    AutoItalicWords->{},
    FormatType->InputForm,
    CounterIncrements->"Print",
    AspectRatioFixed->True,
    StyleMenuListing->None,
    FontFamily->"Courier",
    FontSize->12],
  
  Cell[StyleData["Print", "Presentation"],
    CellMargins->{{72, Inherited}, {Inherited, Inherited}},
    LineSpacing->{1, 0}],
  
  Cell[StyleData["Print", "Condensed"],
    CellMargins->{{41, Inherited}, {Inherited, Inherited}}],
  
  Cell[StyleData["Print", "Printout"],
    CellMargins->{{39, Inherited}, {Inherited, Inherited}},
    FontSize->8]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Graphics"],
    PageWidth->Infinity,
    CellMargins->{{7, Inherited}, {Inherited, Inherited}},
    Evaluatable->False,
    CellGroupingRules->"GraphicsGrouping",
    CellHorizontalScrolling->True,
    PageBreakWithin->False,
    GroupPageBreakWithin->False,
    GeneratedCell->True,
    CellAutoOverwrite->True,
    ShowCellLabel->False,
    DefaultFormatType->DefaultOutputFormatType,
    LineSpacing->{1, 2},
    FormatType->InputForm,
    CounterIncrements->"Graphics",
    AspectRatioFixed->True,
    ImageSize->{282, 287},
    ImageMargins->{{34, Inherited}, {Inherited, 0}},
    StyleMenuListing->None,
    FontFamily->"Courier",
    FontSize->12],
  
  Cell[StyleData["Graphics", "Presentation"],
    ImageMargins->{{62, Inherited}, {Inherited, 0}}],
  
  Cell[StyleData["Graphics", "Condensed"],
    ImageMargins->{{38, Inherited}, {Inherited, 0}},
    Magnification->0.6],
  
  Cell[StyleData["Graphics", "Printout"],
    ImageMargins->{{30, Inherited}, {Inherited, 0}},
    FontSize->9,
    Magnification->0.8]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["CellLabel"],
    StyleMenuListing->None,
    FontFamily->"Helvetica",
    FontSize->9,
    FontColor->RGBColor[0, 0, 1]],
  
  Cell[StyleData["CellLabel", "Presentation"],
    FontSize->12],
  
  Cell[StyleData["CellLabel", "Condensed"],
    FontSize->9],
  
  Cell[StyleData["CellLabel", "Printout"],
    FontFamily->"Courier",
    FontSize->8,
    FontSlant->"Italic",
    FontColor->GrayLevel[0]]
  }, Closed]]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Formulas and Programming", "Section"],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["InlineFormula"],
    CellMargins->{{10, 4}, {0, 8}},
    CellHorizontalScrolling->True,
    ScriptLevel->1,
    SingleLetterItalics->True],
  
  Cell[StyleData["InlineFormula", "Presentation"],
    CellMargins->{{24, 10}, {10, 10}},
    LineSpacing->{1, 5}],
  
  Cell[StyleData["InlineFormula", "Condensed"],
    CellMargins->{{8, 10}, {6, 6}},
    LineSpacing->{1, 1}],
  
  Cell[StyleData["InlineFormula", "Printout"],
    CellMargins->{{2, 0}, {6, 6}}]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["DisplayFormula"],
    CellMargins->{{42, Inherited}, {Inherited, Inherited}},
    CellHorizontalScrolling->True,
    DefaultFormatType->DefaultInputFormatType,
    ScriptLevel->0,
    SingleLetterItalics->True,
    UnderoverscriptBoxOptions->{LimitsPositioning->True}],
  
  Cell[StyleData["DisplayFormula", "Presentation"],
    LineSpacing->{1, 5}],
  
  Cell[StyleData["DisplayFormula", "Condensed"],
    LineSpacing->{1, 1}],
  
  Cell[StyleData["DisplayFormula", "Printout"]]
  }, Closed]]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Styles for Headers and Footers", "Section"],
  
  Cell[StyleData["Header"],
    CellMargins->{{7, 0}, {4, 1}},
    Evaluatable->False,
    PageBreakWithin->Automatic,
    LineSpacing->{1, 2},
    AspectRatioFixed->True,
    StyleMenuListing->None,
    FontFamily->"Times",
    FontSize->10,
    FontSlant->"Italic"],
  
  Cell[StyleData["Footer"],
    CellMargins->{{7, 0}, {0, 4}},
    Evaluatable->False,
    PageBreakWithin->Automatic,
    TextAlignment->Center,
    LineSpacing->{1, 2},
    AspectRatioFixed->True,
    StyleMenuListing->None,
    FontFamily->"Times",
    FontSize->12,
    FontSlant->"Italic"],
  
  Cell[StyleData["PageNumber"],
    CellMargins->{{0, 0}, {4, 1}},
    StyleMenuListing->None,
    FontFamily->"Times",
    FontSize->10]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Palette Styles", "Section"],
  
  Cell["\<\
The cells below define styles that define standard \
ButtonFunctions, for use in palette buttons.\
\>", "Text"],
  
  Cell[StyleData["Paste"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`NotebookApply[ 
          FrontEnd`InputNotebook[ ], #, After]}]&)}],
  
  Cell[StyleData["Evaluate"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`NotebookApply[ 
          FrontEnd`InputNotebook[ ], #, All], 
        SelectionEvaluate[ 
          FrontEnd`InputNotebook[ ], All]}]&)}],
  
  Cell[StyleData["EvaluateCell"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`NotebookApply[ 
          FrontEnd`InputNotebook[ ], #, All], 
        FrontEnd`SelectionMove[ 
          FrontEnd`InputNotebook[ ], All, Cell, 1], 
        FrontEnd`SelectionEvaluateCreateCell[ 
          FrontEnd`InputNotebook[ ], All]}]&)}],
  
  Cell[StyleData["CopyEvaluate"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`SelectionCreateCell[ 
          FrontEnd`InputNotebook[ ], All], 
        FrontEnd`NotebookApply[ 
          FrontEnd`InputNotebook[ ], #, All], 
        FrontEnd`SelectionEvaluate[ 
          FrontEnd`InputNotebook[ ], All]}]&)}],
  
  Cell[StyleData["CopyEvaluateCell"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`SelectionCreateCell[ 
          FrontEnd`InputNotebook[ ], All], 
        FrontEnd`NotebookApply[ 
          FrontEnd`InputNotebook[ ], #, All], 
        FrontEnd`SelectionEvaluateCreateCell[ 
          FrontEnd`InputNotebook[ ], All]}]&)}]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Hyperlink Styles", "Section"],
  
  Cell["\<\
The cells below define styles useful for making hypertext \
ButtonBoxes.  The \"Hyperlink\" style is for links within the same Notebook, \
or between Notebooks.\
\>", "Text"],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Hyperlink"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    FontColor->RGBColor[0, 0, 1],
    FontVariations->{"Underline"->True},
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`NotebookLocate[ #2]}]&),
    Active->True,
    ButtonNote->ButtonData}],
  
  Cell[StyleData["Hyperlink", "Presentation"]],
  
  Cell[StyleData["Hyperlink", "Condensed"]],
  
  Cell[StyleData["Hyperlink", "Printout"],
    FontColor->GrayLevel[0],
    FontVariations->{"Underline"->False}]
  }, Closed]],
  
  Cell["\<\
The following styles are for linking automatically to the on-line \
help system.\
\>", "Text"],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["MainBookLink"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    FontColor->RGBColor[0, 0, 1],
    FontVariations->{"Underline"->True},
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`HelpBrowserLookup[ "MainBook", #]}]&),
    Active->True,
    ButtonFrame->"None"}],
  
  Cell[StyleData["MainBookLink", "Presentation"]],
  
  Cell[StyleData["MainBookLink", "Condensed"]],
  
  Cell[StyleData["MainBookLink", "Printout"],
    FontColor->GrayLevel[0],
    FontVariations->{"Underline"->False}]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["AddOnsLink"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    FontFamily->"Courier",
    FontColor->RGBColor[0, 0, 1],
    FontVariations->{"Underline"->True},
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`HelpBrowserLookup[ "AddOns", #]}]&),
    Active->True,
    ButtonFrame->"None"}],
  
  Cell[StyleData["AddOnsLink", "Presentation"]],
  
  Cell[StyleData["AddOnsLink", "Condensed"]],
  
  Cell[StyleData["AddOnLink", "Printout"],
    FontColor->GrayLevel[0],
    FontVariations->{"Underline"->False}]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["RefGuideLink"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    FontFamily->"Courier",
    FontColor->RGBColor[0, 0, 1],
    FontVariations->{"Underline"->True},
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`HelpBrowserLookup[ "RefGuideLink", #]}]&),
    Active->True,
    ButtonFrame->"None"}],
  
  Cell[StyleData["RefGuideLink", "Presentation"]],
  
  Cell[StyleData["RefGuideLink", "Condensed"]],
  
  Cell[StyleData["RefGuideLink", "Printout"],
    FontColor->GrayLevel[0],
    FontVariations->{"Underline"->False}]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["GettingStartedLink"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    FontColor->RGBColor[0, 0, 1],
    FontVariations->{"Underline"->True},
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`HelpBrowserLookup[ "GettingStarted", #]}]&),
    Active->True,
    ButtonFrame->"None"}],
  
  Cell[StyleData["GettingStartedLink", "Presentation"]],
  
  Cell[StyleData["GettingStartedLink", "Condensed"]],
  
  Cell[StyleData["GettingStartedLink", "Printout"],
    FontColor->GrayLevel[0],
    FontVariations->{"Underline"->False}]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["OtherInformationLink"],
    StyleMenuListing->None,
    ButtonStyleMenuListing->Automatic,
    FontColor->RGBColor[0, 0, 1],
    FontVariations->{"Underline"->True},
    ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ {
        FrontEnd`HelpBrowserLookup[ "OtherInformation", #]}]&),
    Active->True,
    ButtonFrame->"None"}],
  
  Cell[StyleData["OtherInformationLink", "Presentation"]],
  
  Cell[StyleData["OtherInformationLink", "Condensed"]],
  
  Cell[StyleData["OtherInformationLink", "Printout"],
    FontColor->GrayLevel[0],
    FontVariations->{"Underline"->False}]
  }, Closed]]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["Placeholder Styles", "Section"],
  
  Cell["\<\
The cells below define styles useful for making placeholder \
objects in palette templates.\
\>", "Text"],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["Placeholder"],
    Editable->False,
    Selectable->False,
    StyleBoxAutoDelete->True,
    Placeholder->True,
    StyleMenuListing->None],
  
  Cell[StyleData["Placeholder", "Presentation"]],
  
  Cell[StyleData["Placeholder", "Condensed"]],
  
  Cell[StyleData["Placeholder", "Printout"]]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell[StyleData["SelectionPlaceholder"],
    Editable->False,
    Selectable->False,
    StyleBoxAutoDelete->True,
    Placeholder->PrimaryPlaceholder,
    StyleMenuListing->None,
    DrawHighlighted->True],
  
  Cell[StyleData["SelectionPlaceholder", "Presentation"]],
  
  Cell[StyleData["SelectionPlaceholder", "Condensed"]],
  
  Cell[StyleData["SelectionPlaceholder", "Printout"]]
  }, Closed]]
  }, Closed]],
  
  Cell[CellGroupData[{
  
  Cell["FormatType Styles", "Section"],
  
  Cell["\<\
The cells below define styles that are mixed in with the styles \
of most cells.  If a cell's FormatType matches the name of one of the styles \
defined below, then that style is applied between the cell's style and its \
own options. This is particularly true of Input and Output.\
\>", "Text"],
  
  Cell[StyleData["CellExpression"],
    PageWidth->Infinity,
    CellMargins->{{6, Inherited}, {Inherited, Inherited}},
    ShowCellLabel->False,
    ShowSpecialCharacters->False,
    AllowInlineCells->False,
    AutoItalicWords->{},
    StyleMenuListing->None,
    FontFamily->"Courier",
    FontSize->12,
    Background->GrayLevel[1]],
  
  Cell[StyleData["InputForm"],
    AllowInlineCells->False,
    StyleMenuListing->None,
    FontFamily->"Courier"],
  
  Cell[StyleData["OutputForm"],
    PageWidth->Infinity,
    TextAlignment->Left,
    LineSpacing->{0.6, 1},
    StyleMenuListing->None,
    FontFamily->"Courier"],
  
  Cell[StyleData["StandardForm"],
    LineSpacing->{1.25, 0},
    StyleMenuListing->None,
    FontFamily->"Courier"],
  
  Cell[StyleData["TraditionalForm"],
    LineSpacing->{1.25, 0},
    SingleLetterItalics->True,
    TraditionalFunctionNotation->True,
    DelimiterMatching->None,
    StyleMenuListing->None],
  
  Cell["\<\
The style defined below is mixed in to any cell that is in an \
inline cell within another.\
\>", "Text"],
  
  Cell[StyleData["InlineCell"],
    TextAlignment->Left,
    ScriptLevel->1,
    StyleMenuListing->None],
  
  Cell[StyleData["InlineCellEditing"],
    StyleMenuListing->None,
    Background->RGBColor[1, 0.749996, 0.8]]
  }, Closed]]
  }, Open  ]]
  }],
MacintoshSystemPageSetup->"\<\
AVU/IFiQKFGHe]?E0cKmd0<gZ80000000GRL`0;aJfP0AP1Y06`0I@1^0643=_g@
0cNXX0000001N9bP0_5[J?ooooonnoOnn_Kko@<foM3no_oooooooooooooooooo
ooooooooo_kno_oooooooooooooooooo\>"
]


(***********************************************************************
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[CellGroupData[{
Cell[1739, 51, 1103, 35, 124, "Title"],
Cell[2845, 88, 495, 19, 129, "Input",
  InitializationCell->True]
}, Closed]],
Cell[3355, 110, 696, 16, 146, "Text",
  Evaluatable->False],
Cell[4054, 128, 692, 22, 104, "Section",
  Evaluatable->False],
Cell[4749, 152, 130, 3, 47, "Section",
  Evaluatable->False],

Cell[CellGroupData[{
Cell[4904, 159, 234, 11, 132, "Input"],
Cell[5141, 172, 751, 18, 24, "Print"]
}, Open  ]],
Cell[5907, 193, 107, 2, 47, "Section",
  Evaluatable->False],

Cell[CellGroupData[{
Cell[6039, 199, 145, 4, 42, "Input"],
Cell[6187, 205, 22052, 584, 183, 5113, 370, "GraphicsData", "PostScript", \
"Graphics"]
}, Open  ]],
Cell[28254, 792, 154, 4, 66, "Section",
  Evaluatable->False],

Cell[CellGroupData[{
Cell[28433, 800, 598, 15, 162, "Input"],
Cell[29034, 817, 70, 1, 26, "Output"],
Cell[29107, 820, 342, 10, 26, "Output"],
Cell[29452, 832, 25115, 680, 183, 6594, 447, "GraphicsData", "PostScript", \
"Graphics"]
}, Open  ]],
Cell[54582, 1515, 238, 5, 85, "Section",
  Evaluatable->False],

Cell[CellGroupData[{
Cell[54845, 1524, 120, 5, 57, "Input"],
Cell[54968, 1531, 130, 2, 26, "Output"],
Cell[55101, 1535, 75, 1, 26, "Output"],
Cell[55179, 1538, 67, 1, 26, "Output"]
}, Open  ]],
Cell[55261, 1542, 133, 3, 47, "Section",
  Evaluatable->False],

Cell[CellGroupData[{
Cell[55419, 1549, 585, 16, 222, "Input"],
Cell[56007, 1567, 23963, 694, 183, 7154, 482, "GraphicsData", "PostScript", \
"Graphics"]
}, Open  ]],
Cell[79985, 2264, 234, 5, 85, "Section",
  Evaluatable->False]
}
]
*)




(***********************************************************************
End of Mathematica Notebook file.
***********************************************************************)