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

                    Mathematica-Compatible Notebook

This notebook can be used on any computer system with Mathematica 3.0,
MathReader 3.0, or any compatible application. The data for the notebook 
starts with the line of stars above.

To get the notebook into a Mathematica-compatible application, do one of 
the following:

* Save the data starting with the line of stars above into a file
  with a name ending in .nb, then open the file inside the application;

* Copy the data starting with the line of stars above to the
  clipboard, then use the Paste menu command inside the application.

Data for notebooks contains only printable 7-bit ASCII and can be
sent directly in email or through ftp in text mode.  Newlines can be
CR, LF or CRLF (Unix, Macintosh or MS-DOS style).

NOTE: If you modify the data for this notebook not in a Mathematica-
compatible application, you must delete the line below containing the 
word CacheID, otherwise Mathematica-compatible applications may try to 
use invalid cache data.

For more information on notebooks and Mathematica-compatible 
applications, contact Wolfram Research:
  web: http://www.wolfram.com
  email: info@wolfram.com
  phone: +1-217-398-0700 (U.S.)

Notebook reader applications are available free of charge from 
Wolfram Research.
***********************************************************************)

(*CacheID: 232*)


(*NotebookFileLineBreakTest
NotebookFileLineBreakTest*)
(*NotebookOptionsPosition[     27041,        923]*)
(*NotebookOutlinePosition[     29059,        989]*)
(*  CellTagsIndexPosition[     28741,        975]*)
(*WindowFrame->Normal*)



Notebook[{

Cell[CellGroupData[{
Cell["\<\
A Method for Finding the Maxima, Minima and Inflection Points of a \
Function\
\>", "Subtitle",
  TextAlignment->Center,
  FontColor->RGBColor[1, 0, 0],
  Background->GrayLevel[0.900008]],

Cell[TextData[{
  "This notebook gives the user a simple method of determining the maxima, \
minima and points of inflection of a function, using ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  ".  First of all, it teaches you ",
  ButtonBox["how to define a function",
    ButtonData:>"enterfunction",
    ButtonStyle->"Hyperlink"],
  " and ",
  ButtonBox["graph",
    ButtonData:>"graph",
    ButtonStyle->"Hyperlink"],
  " it in ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " and then how to use the graph to find the turning points (extrema) of the \
function.  Second of all, this tutorial teaches you how to use the first and \
second derivative of the function to find the extrema or points of inflection \
of a function.  You will also find ",
  ButtonBox["sample problems",
    ButtonData:>"examples",
    ButtonStyle->"Hyperlink"],
  " at the bottom of this tutorial notebook, with or without using ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  ".",
  StyleBox[
  "  All the blue text in this notebook is linked to another notebook or \
another section in the notebook.",
    FontColor->RGBColor[1, 0, 0]]
}], "Text",
  TextAlignment->Left,
  CellTags->"top"],

Cell[CellGroupData[{

Cell[TextData[{
  "Enter the function you wish to examine in ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " , giving it a name (for example, the function y) and plot it."
}], "Section",
  FontSize->18,
  CellTags->"enterfunction"],

Cell[TextData[{
  "To define a function in ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " , you have to enter it as shown below.  The \"=\" sign is used to assign \
a value to any variable that you select such as x or y.  Here, I have \
assigned an equation in x to the variable y."
}], "Text",
  TextAlignment->Left,
  FontSlant->"Italic",
  Background->GrayLevel[0.900008]],

Cell[CellGroupData[{

Cell[BoxData[
    \(\(\ y\  = \ 2\ x\^3 - 3\ x\^2 - 12\ x + 5\ \ \ \)\)], "Input"],

Cell[BoxData[
    \(5 - 12\ x - 3\ x\^2 + 2\ x\^3\)], "Output"]
}, Open  ]],

Cell[TextData[{
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " always outputs functions in this way.  Polynomials are displayed with the \
constant term coming first, followed by the term in x, the term in ",
  Cell[BoxData[
      \(x\^2\)]],
  " and so on."
}], "Text",
  FontSlant->"Italic",
  Background->GrayLevel[0.900008]],

Cell["\<\
\tA plot of this function can now be obtained with the following \
Mathematica command line.\
\>", "Text"],

Cell[BoxData[
    \(Plot[y, {x, \(-3\), 3}, \ AxesLabel -> {"\<x\>", \ "\<\>"}, \ 
      PlotLabel -> \ "\<The Graph of the Function y=2 x^3 -3 x^2-12 x+5 \>"]
      \)], "Input",
  CellTags->"range"],

Cell[TextData[{
  "To understand the ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \"Plot\" command and the parameters used in ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  ", click ",
  ButtonBox["here.",
    ButtonData:>{
      URL[ "http://mathforum.org/spimsow/notebooks/Plot.nb"], None},
    ButtonStyle->"Hyperlink"],
  " "
}], "Text",
  FontSlant->"Italic",
  Background->GrayLevel[0.900008],
  CellTags->"plotlinkback"],

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.15873 0.467488 0.0113193 [
[.02381 .45499 -6 -9 ]
[.02381 .45499 6 0 ]
[.18254 .45499 -6 -9 ]
[.18254 .45499 6 0 ]
[.34127 .45499 -6 -9 ]
[.34127 .45499 6 0 ]
[.65873 .45499 -3 -9 ]
[.65873 .45499 3 0 ]
[.81746 .45499 -3 -9 ]
[.81746 .45499 3 0 ]
[.97619 .45499 -3 -9 ]
[.97619 .45499 3 0 ]
[1.025 .46749 0 -6 ]
[1.025 .46749 10 6 ]
[.4875 .01471 -18 -4.5 ]
[.4875 .01471 0 4.5 ]
[.4875 .12791 -18 -4.5 ]
[.4875 .12791 0 4.5 ]
[.4875 .2411 -18 -4.5 ]
[.4875 .2411 0 4.5 ]
[.4875 .35429 -18 -4.5 ]
[.4875 .35429 0 4.5 ]
[.4875 .58068 -12 -4.5 ]
[.4875 .58068 0 4.5 ]
[.5 .63053 -146 0 ]
[.5 .63053 146 12 ]
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 g
.25 Mabswid
[ ] 0 setdash
.02381 .46749 m
.02381 .47374 L
s
[(-3)] .02381 .45499 0 1 Mshowa
.18254 .46749 m
.18254 .47374 L
s
[(-2)] .18254 .45499 0 1 Mshowa
.34127 .46749 m
.34127 .47374 L
s
[(-1)] .34127 .45499 0 1 Mshowa
.65873 .46749 m
.65873 .47374 L
s
[(1)] .65873 .45499 0 1 Mshowa
.81746 .46749 m
.81746 .47374 L
s
[(2)] .81746 .45499 0 1 Mshowa
.97619 .46749 m
.97619 .47374 L
s
[(3)] .97619 .45499 0 1 Mshowa
.125 Mabswid
.05556 .46749 m
.05556 .47124 L
s
.0873 .46749 m
.0873 .47124 L
s
.11905 .46749 m
.11905 .47124 L
s
.15079 .46749 m
.15079 .47124 L
s
.21429 .46749 m
.21429 .47124 L
s
.24603 .46749 m
.24603 .47124 L
s
.27778 .46749 m
.27778 .47124 L
s
.30952 .46749 m
.30952 .47124 L
s
.37302 .46749 m
.37302 .47124 L
s
.40476 .46749 m
.40476 .47124 L
s
.43651 .46749 m
.43651 .47124 L
s
.46825 .46749 m
.46825 .47124 L
s
.53175 .46749 m
.53175 .47124 L
s
.56349 .46749 m
.56349 .47124 L
s
.59524 .46749 m
.59524 .47124 L
s
.62698 .46749 m
.62698 .47124 L
s
.69048 .46749 m
.69048 .47124 L
s
.72222 .46749 m
.72222 .47124 L
s
.75397 .46749 m
.75397 .47124 L
s
.78571 .46749 m
.78571 .47124 L
s
.84921 .46749 m
.84921 .47124 L
s
.88095 .46749 m
.88095 .47124 L
s
.9127 .46749 m
.9127 .47124 L
s
.94444 .46749 m
.94444 .47124 L
s
.25 Mabswid
0 .46749 m
1 .46749 L
s
gsave
1.025 .46749 -61 -10 Mabsadd m
1 1 Mabs scale
currentpoint translate
0 20 translate 1 -1 scale
gsave
0.000000 0.000000 0.000000 setrgbcolor
1.000000 setlinewidth
gsave
newpath
 61.000000 16.000000 moveto
 558.000000 16.000000 lineto
 558.000000 4.000000 lineto
 61.000000 4.000000 lineto
 61.000000 16.000000 lineto
closepath
clip newpath
63.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
0.000000 0.000000 rmoveto
63.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(x) show
69.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
0.000000 0.000000 rmoveto
1.000000 setlinewidth
grestore
grestore
%%DocumentNeededResources: font Courier
%%DocumentSuppliedResources:
%%DocumentNeededFonts: Courier
%%DocumentSuppliedFonts:
%%DocumentFonts: font Courier
grestore
.5 .01471 m
.50625 .01471 L
s
[(-40)] .4875 .01471 1 0 Mshowa
.5 .12791 m
.50625 .12791 L
s
[(-30)] .4875 .12791 1 0 Mshowa
.5 .2411 m
.50625 .2411 L
s
[(-20)] .4875 .2411 1 0 Mshowa
.5 .35429 m
.50625 .35429 L
s
[(-10)] .4875 .35429 1 0 Mshowa
.5 .58068 m
.50625 .58068 L
s
[(10)] .4875 .58068 1 0 Mshowa
.125 Mabswid
.5 .03735 m
.50375 .03735 L
s
.5 .05999 m
.50375 .05999 L
s
.5 .08263 m
.50375 .08263 L
s
.5 .10527 m
.50375 .10527 L
s
.5 .15055 m
.50375 .15055 L
s
.5 .17319 m
.50375 .17319 L
s
.5 .19582 m
.50375 .19582 L
s
.5 .21846 m
.50375 .21846 L
s
.5 .26374 m
.50375 .26374 L
s
.5 .28638 m
.50375 .28638 L
s
.5 .30902 m
.50375 .30902 L
s
.5 .33166 m
.50375 .33166 L
s
.5 .37693 m
.50375 .37693 L
s
.5 .39957 m
.50375 .39957 L
s
.5 .42221 m
.50375 .42221 L
s
.5 .44485 m
.50375 .44485 L
s
.5 .49013 m
.50375 .49013 L
s
.5 .51277 m
.50375 .51277 L
s
.5 .5354 m
.50375 .5354 L
s
.5 .55804 m
.50375 .55804 L
s
.5 .60332 m
.50375 .60332 L
s
.25 Mabswid
.5 0 m
.5 .61803 L
s
gsave
.5 .63053 -207 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
0 20 translate 1 -1 scale
gsave
0.000000 0.000000 0.000000 setrgbcolor
1.000000 setlinewidth
gsave
newpath
 61.000000 16.000000 moveto
 558.000000 16.000000 lineto
 558.000000 4.000000 lineto
 61.000000 4.000000 lineto
 61.000000 16.000000 lineto
closepath
clip newpath
63.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
0.000000 0.000000 rmoveto
63.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(The) show
87.000000 13.000000 moveto
(Graph) show
123.000000 13.000000 moveto
(of) show
141.000000 13.000000 moveto
(the) show
165.000000 13.000000 moveto
(Function) show
219.000000 13.000000 moveto
(y) show
225.000000 13.000000 moveto
%%IncludeResource: font Math1Mono
%%IncludeFont: Math1Mono
/Math1Mono findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(=) show
231.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(2) show
243.000000 13.000000 moveto
(x) show
249.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(^) show
255.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(3) show
267.000000 13.000000 moveto
%%IncludeResource: font Math1Mono
%%IncludeFont: Math1Mono
/Math1Mono findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(-) show
273.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(3) show
285.000000 13.000000 moveto
(x) show
291.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(^) show
297.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(2) show
303.000000 13.000000 moveto
%%IncludeResource: font Math1Mono
%%IncludeFont: Math1Mono
/Math1Mono findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(-) show
309.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(12) show
327.000000 13.000000 moveto
(x) show
333.000000 13.000000 moveto
%%IncludeResource: font Math1Mono
%%IncludeFont: Math1Mono
/Math1Mono findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(+) show
339.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
(5) show
351.000000 13.000000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000000 0.000000 0.000000 setrgbcolor
0.000000 0.000000 rmoveto
1.000000 setlinewidth
grestore
grestore
%%DocumentNeededResources: font Math1Mono
%%+ font Courier
%%DocumentSuppliedResources:
%%DocumentNeededFonts: Math1Mono
%%+ Courier
%%DocumentSuppliedFonts:
%%DocumentFonts: font Math1Mono
%%+ font Courier
grestore
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
.5 Mabswid
.02381 .01472 m
.06244 .16627 L
.10458 .30174 L
.14415 .40286 L
.18221 .47824 L
.20342 .51166 L
.22272 .53706 L
.24299 .55889 L
.26171 .57488 L
.28086 .58731 L
.29094 .59236 L
.30164 .59662 L
.31105 .59947 L
.31624 .6007 L
.32117 .60164 L
.32574 .60232 L
.32816 .60261 L
.33073 .60286 L
.33311 .60305 L
.33527 .60317 L
.33631 .60322 L
.33743 .60326 L
.3385 .60329 L
.33947 .60331 L
.34074 .60332 L
.34193 .60332 L
.34301 .60331 L
.34417 .60329 L
.34544 .60325 L
.34679 .6032 L
.34921 .60307 L
.35144 .60291 L
.35353 .60272 L
.3583 .60218 L
.36349 .60139 L
.36824 .60049 L
.37896 .59788 L
.39789 .59139 L
.41859 .58177 L
.45915 .55641 L
.49819 .52563 L
.53969 .48835 L
.57967 .45021 L
.61814 .41351 L
.65906 .37665 L
.69846 .34542 L
.73635 .32128 L
.7558 .31175 L
.77669 .30404 L
.78682 .30133 L
Mistroke
.79217 .30019 L
.79786 .29921 L
.80068 .29881 L
.80334 .29849 L
.80592 .29823 L
.80829 .29803 L
.81055 .29789 L
.81171 .29783 L
.81294 .29778 L
.81418 .29774 L
.81534 .29772 L
.81604 .29771 L
.81671 .2977 L
.81796 .2977 L
.81911 .29771 L
.82034 .29773 L
.8215 .29776 L
.82257 .2978 L
.82504 .29793 L
.82764 .29812 L
.83019 .29836 L
.83255 .29864 L
.83791 .29944 L
.84259 .30034 L
.84683 .30133 L
.85635 .30414 L
.86635 .30803 L
.87557 .31246 L
.89638 .32566 L
.91518 .34159 L
.93584 .36375 L
.97619 .42221 L
Mfstroke
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{288, 177.938},
  ImageMargins->{{43, 0}, {0, 0}},
  ImageRegion->{{0, 1}, {0, 1}},
  ImageCache->GraphicsData["Bitmap", "\<\
CF5dJ6E]HGAYHf4PAg9QL6QYHg<PAVmbKF5d0`40004P0000/@P10`4000010?ooodY:BZJVY_oo<`00
<ol00<bI<l`0VIVIoc/k>gYjN[Vi^OShn03ooeGooj[oo`l?3di>CYVIVOoo0?mVVLcoolbI0<`0IYVI
c3lo?ginO[fm_Oclo5D00:X00?l001<C4e9BDXb<S?o<oomVI/coc<aVol`0<`<30d92@X61PL30`000
EED0EJX0EOl0EALG5eIFEWmoOoo<c?mV<lcoVLaVc<`000L71dI6AXF5QLC4a000ZUD0ZZX0Z_l0ZQ/K
6eYJFW=cLoo<VOmV0<coI/aVVIWoo`/;2dY:BXV9RLS8b000oeD0ojX0ool0oalO7eiNGVIVI_o<I_lc
olco<laVIYWoc0l?3di>CXf=SLc<c01E05EE0:YE0?mE02<S8f9RHUUIFOo<<olcc<co0<aV<iWoVA<C
4e9BDY6ATM3@d01EEEEEEJYEEOmEEBLW9fIVITa<C?o<0?lcVLc<olaV09WoIQLG5eIFEYFEUMCDe01E
ZUEEZZYEZ_mEZR/[:fYZJSlo?onIoolcI/c<VL`coiWo<a/K6eYJFYVIVMSHf01EoeEEojYEoomEobl_
;fi^KS<c<onIc?lc<lc<I/`cc9Wo01lO7eiNGYfMWMcLg02Z05FZ0:ZZ0?nZ03<c<o?clbHV9_nIVOlc
0<c<<l`cVIW<ob<S8f9RHZ6QXN3Ph02ZEEFZEJZZEOnZECLg=nKViQTI6OnII_l0olc<0<`cIYW<c2LW
9fIVIZFUYNCTi02ZZUFZZZZZZ_nZZS/k>mWIf@`<3?nI<ol0c<bIol`c<iW<VB/[:fYZJZVYZNSXj02Z
oeFZojZZoonZoclo?lc<c?ooc?nI0?l0VLbIc<`c09W<IRl_;fi^KZf][Nc/k03o05Go0:[o0?oo0492
@[no_oooZ_mVool0I/bIVL`0oiW<<c<c<g9bL[6a/O3`l03oEEGoEJ[oEOooEDI6A[>c/oooI_mVc?l0
<lbII/`0c9W<03Lg=gIfM[Fe]OCdm03oZUGoZZ[oZP000?l08@000?l08@000?l08@000?l08@0008l0
00?o0000SP0008800ol300;o1@000ol0002>0000P`001Ol0003o008000?o00000P000ol0002>0000
60000ol0001P00Go00<0ool00_l20004o`00o`@00on>000060000ol0001V0003o`3o00<000Co003o
10000ol0002>000060000ol0001V0003o`3o00<000Co003o10000ol0002>00006@000ol0001V00;o
1002o`D000?o0000SP0001T000?o0000L`000ol0002>00006@000ol0001c0003o`0008h0000I0003
o`0007<00_n?00006P000ol0001b0003o`0008h0000J0003o`00078000?o0000SP0001X000?o0000
LP000ol0002>00006`000ol0001a0003o`0008h0000K0003o`00074000?o0000SP0001/000?o0000
L@02ohl0000K0003o`00074000?o0000SP0001`000?o0000L0000ol0002>000070000ol0001`0003
o`0008h0000L0003o`00070000?o0000SP0001`000?o0000L002ohl0000M0003o`0006l000?o0000
SP0001d000?o0000K`000ol0002>00007@000ol0001_0003o`0008h0000M0003o`0006l000?o0000
SP0001h000?o0000KP000ol0002>00007P000ol0001^00;oS`0001h000?o0000KP000ol0002>0000
7P000ol0001^0003o`0008h0000O0003o`0006d000?o0000SP0001l000?o0000G`03o`@00_l50003
o`0008h0000O0003o`00068000Co003o0P000ol000020003o`0008h0000P0003o`0005P01Ol40004
o`00o`8000?o00000P03ohh0000P0003o`0005l00_l30004o`00o`@000?o0000SP00020000?o0000
H@001?l00?l20003o`00008000?o0000SP00020000?o0000GP03o`@00_l50003o`0008h0000Q0003
o`0006/000?o0000SP00024000?o0000J`02ohl0000Q0003o`0006/000?o0000SP00024000?o0000
J`000ol0002>00008P000ol0001Z0003o`0008h0000R0003o`0006X000?o0000SP00028000?o0000
JP000ol0002>00008P000ol0001Z00;oS`0002<000?o0000J@000ol0002>00008`000ol0001Y0003
o`0008h0000S0003o`0006T000?o0000SP0002@000?o0000J0000ol0002>000090000ol0001X0003
o`0008h0000T0003o`0006P00_n?00009@000ol0001W0003o`0008h0000U0003o`0006L000?o0000
SP0002D000?o0000I`000ol0002>00009@000ol0001W0003o`0008h0000V0003o`0006H00_n?0000
9P000ol0001V0003o`0008h0000V0003o`0006H000?o0000SP0002L000?o0000I@000ol0002>0000
9`000ol0001G00Co0`02o`D000?o0000SP0002L000?o0000F0000ol000020004o`00o`@000?o0000
SP0002L000?o0000D@05o`<000Go0000o`020003o`0000800on>0000:0000ol0001I0004o`00o`80
00?o00000P000ol0002>0000:0000ol0001F0004o`00o`8000Co003o10000ol0002>0000:0000ol0
001G00;o1002o`D000?o0000SP0002T000?o0000H`000ol0002>0000:@000ol0001S0003o`0008h0
000Y0003o`0006<00_n?0000:P000ol0001R0003o`0008h0000Z0003o`00068000?o0000SP0002X0
00?o0000HP000ol0002>0000:P000ol0001R0003o`0008h0000[0003o`0006400_n?0000:`000ol0
001Q0003o`0008h0000[0003o`00064000?o0000SP0002`000?o0000H0000ol0001700_o?00002`0
00?o0000H0000ol0001400?o2`04ocP0000/0003o`00060000?o0000@@03oa800_lf0000;@000ol0
001O00;o?`03oaL00olc0000;@000ol0001O0003o`0003`00_lM00;o<@0002d000?o0000G`000ol0
000i00?o8@02obl0000^0003o`0005h000?o0000=`02obH000?o0000;00002h000?o0000GP000ol0
000f0003o`0002L00_l/0000;`000ol0001M0003o`0003@00_l/0003o`0002T0000_0003o`0005d0
0_ld0003o`0002d000?o0000:00002l000?o0000G@000ol0000a00;o<@000ol0000W0000<0000ol0
001L0003o`00030000?o0000<P000ol0000V0000<0000ol0001>00?o1002o`D000?o0000;P02ocD0
00?o00009P00034000?o0000CP000ol000020004o`00o`@000?o0000;@000ol0000f0003o`0002D0
000a0003o`0004L01Ol20003o`00008000Co003o1003ob`000?o0000>0000ol0000T0000<@000ol0
001>0003o`00008000Co003o10000ol0000[0003o`0003X000?o00008`00038000?o0000C@000ol0
00020004o`00o`@000?o0000:@02och000?o00008P00038000?o0000C002o`D00_l50003o`0002P0
00?o0000?`000ol0000Q0000<`000ol0001I0003o`0002L000?o0000@0000ol0000Q0000<`000ol0
001I0003o`0002H000?o0000@P000ol0000P0000<`000ol0001I00;o9@02odH000?o00007`0003@0
00?o0000F0000ol0000S0003o`0004L000?o00007P0003@000?o0000F0000ol0000R0003o`0004P0
00?o00007P0003D000?o0000E`000ol0000Q0003o`0004X000?o00007@0003D000?o0000E`000ol0
000O00;oCP000ol0000L0000=@000ol0001G00;o7`000ol0001>0003o`0001`0000f0003o`0005H0
00?o00007@000ol0001@0003o`0001/0000f0003o`0005H000?o000070000ol0001B0003o`0001X0
000g0003o`0005D000?o00006`000ol0001D0003o`0001T0000g0003o`0005D000?o00006P000ol0
001E0003o`0001T0000h0003o`0005@000?o00006@000ol0001G0003o`0001P0000h0003o`0005@0
0_lI0003o`0005T000?o00005`0001T00olM0003o`0000D01?lS00?o90000ol0000G0003o`0000T0
0olT00Co9003oaT0000L0003o`0001X000?o00001P000ol0000T0003o`0002<000?o00005P000ol0
000;0003o`0002@000?o00009`000ol0000F00004`05o`@000?o00006`06o`<000?o00007005o`80
00?o00008`000ol0000E0003o`0000`000?o00009@000ol0000V0003o`0001H0000J00;o7P000ol0
00070003o`00028000?o00008`000ol0000D0003o`0000d000?o00009P000ol0000S00;o6@0001`0
00?o000070000ol000030004o`00ob@000?o00008`000ol0000C0003o`0000h000?o00008`001?l0
0?lW0003o`0001H0000I00?o80000ol0000300;o9002obD00_lC0003o`0000h00_lV00;o9@03oaT0
000l0003o`00050000?o00004@000ol0001j0000?@000ol0001?0003o`00010000?o0000N`0003d0
00?o0000C`000ol0000?0003o`0007000_l00`3oo`070000?P000ol0001>0003o`0000h000?o0000
LP000ol0o`0800004P3ko`T000?o00001`0001P000?o00001@000ol000050003o`0000D000?o0000
1@000ol0000400;o1`000ol000050003o`0000D000?o000010000ol000050003o`0000D000?o0000
1@000ol000050003o`0000D000?o00001@000ol000050003o`0000@00_l70003o`0000D000?o0000
1@000ol000050003o`0000@000?o00001@000ol000050003o`0000D000?o00001@000ol000050003
o`0000D000?o00001@000ol000050003o`0000`000?o0?l0200001P000?o00009002obH000?o0000
9@000ol0000;0003o`0001L000?o000090000ol0000U0003o`0000/00_l00`3oo`070000@0000ol0
001<0003o`0000X000?o0000P@00040000?o0000C0000ol000090003o`00088000110003o`0004/0
00?o000020000ol000230000@P000ol0001:00;o1`02ohH000120003o`0004X000?o00001@000ol0
00260000@`000ol000190003o`0000@000?o0000Q`0004<000?o0000B@000ol000030003o`0008P0
00140003o`0004P000?o00000P000ol000290000A@000ol000170005o`000?l0S00004D000?o0000
A`02o`030?l008`000160003o`0004H000?o0?l0SP0004L000?o0000A@02ohl000180003o`0004<0
0_n@0000B0000ol000120003o`3o090000190003o`00040000?o00000_n?0000BP000ol0000n0005
o`000?l0T00004/000?o0000>`02o`@000?o0000SP0004`000?o0000>@000ol000040003o`0008h0
001=0003o`0003L000?o00001@000ol0002>0000CP000ol0000e0003o`0000H000?o0000SP0004l0
0_lc00;o2@02ohl0001A0003o`0002h00_l;0003o`0008h0001B0003o`0002`000?o00002`000ol0
002>0000D`000ol0000Y00;o3P000ol0002>0000E002obL00_l200?o1002o`D000?o0000SP0005H0
00?o00008`000ol000030003o`00008000Co003o10000ol0002>0000E`000ol0000P00;o1P000ol0
00020004o`00o`@00on>0000F002oad00ol80003o`00008000Co003o10000ol0002>0000FP000ol0
000H00;o2`000ol000020004o`00o`@000?o0000SP0005/00olD00?o3002o`D00_l50003o`0008h0
001N00?o3`02oad000?o0000SP0006403olO00;oS`0008l000?o0000SP0008l000?o0000SP0008l0
00?o0000SP0008l000?o0000SP000?l08@000?l08@000?l08@000?l08@0002T01?m^00?oPP0002X0
00?o0000K`000ol00021000000@0oooo0P02o`030?oo00801?l700Co0P04o`801Ol00`3oo`02o`80
0_l00`3oo`0800?o0P04o`T00ol200;o00<0ool00P04o`H00ol400Go00@0ool00_l200?o0`03o`80
1Ol200?o0P02o`030?oo00P000?o00000P04o`801?l700;o00<0ool02003o`l00ol800;o00<0ool0
2004o`P00ol300Co1`02o`030?oo00@000Co00000ol900000P001Ol0003o008000Co003o2P001Ol0
003o00<000?o00000P001?l00?l20007o`000?l0o`020003o`0000H000Go0000o`020003o`0000T0
00Ko003o0?l20004o`00o`/000?o00000`001?l00?l20004o`00o`8000Go0000o`020004o`00o`<0
00Go0000o`030003o`3o008000?o00001`000ol000090003o`0000P000?o0?l030000ol0000?0003
o`0000H000?o0?l02P000ol000090003o`0000<000?o000020000ol0o`050003o`0000@000?o0000
1P00008000Go0000o`020003o`0000Go1P000ol0o`02o`<000?o00000P04o`8000Oo0000o`3o0080
00?o00001P001Ol0003o008000?o00002@000ol000020004o`00o`801Ol70003o`0000<000Co003o
0P001?l00?l20003o`0000@000?o000010001Ol0003o00<000?o0?l00P000ol000060003o`3o00<0
1?l40003o`0000P000?o00002`000ol0000600Co1@000ol000070003o`0000X000Co00001?l30003
o`0000@000?o000020000ol0000200Go10000ol00006000000Oo0?l0o`3o008000Co003o0`000ol0
00040003o`0000D00_l60004o`00o`<000?o0?l00P000ol000060005o`000?l00P000ol000090003
o`00008000Co003o0P001Ol0003o00L00ol30004o`00o`8000Co003o0P001Ol0003o008000?o0000
10001Ol0003o00<000?o0?l00P000ol000060003o`3o00`000?o00001P000ol0o`0:00;o4002o`T0
00?o0?l030000ol000070003o`0000D000?o00001P000ol0o`050004o`0000?o2@000006o`3o0?l0
1?l300?o1`001Ol0003o00800_l00`3oo`0200?o00<0ool00ol200Co2@03o`801?l800Co0P04o`<0
0ol80003o`0000800_l0103oo`05o`<01?l00`3oo`02o`<00_l400?o00<0ool00ol700;o00<0ool0
20001?l00?l700;o00<0ool02`000ol0000?0003o`0000D00_l00`3oo`080004o`00o`T000?o0000
0P001?l00?l700;o00<0ool010001Ol0003o00/00005o`030?l001001?lD0003o`00010000?o0000
2@000ol000020003o`0000h01OlE0003o`0002L00_l?0003o`3o00<00ol?00?o3`000ol0o`0400;o
2@02o`D00_lE00Co200000D00_lX00;o4P03o`T000Co00000_lZ0003o`0000@000?o0000<P000ol0
000W0003o`0003P0003o0240003o0240003o0240003o0240003o02400000\
\>"],
  ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-3.62314, -42.7936, 
  0.0252484, 0.354057}},
  CellTags->"graph"],

Cell[BoxData[
    TagBox[\(\[SkeletonIndicator]  Graphics  \[SkeletonIndicator]\),
      False,
      Editable->False]], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Finding the Turning Points and the Point of Inflection", "Section",
  FontSize->18],

Cell[TextData[{
  "To get an explanation of the terms used in this notebook click ",
  ButtonBox["here",
    ButtonData:>{
      URL[ "http://mathforum.org/spimsow/notebooks/Terms.nb"], None},
    ButtonStyle->"Hyperlink"],
  "."
}], "Subsection",
  CellTags->"termslinkback"],

Cell[TextData[{
  "To find the extrema of the function y, using the graph plotted above click \
",
  ButtonBox["here",
    ButtonData:>{
      URL[ "http://mathforum.org/spimsow/notebooks/Method1.nb"], 
      None},
    ButtonStyle->"Hyperlink"],
  "."
}], "Subsection",
  CellTags->"method1linkback"],

Cell[TextData[{
  "To find the extrema and point of inflection of the function y using its \
first and second derivatives, click ",
  ButtonBox["here",
    ButtonData:>{
      URL[ "http://mathforum.org/spimsow/notebooks/Derivative.nb"], 
      None},
    ButtonStyle->"Hyperlink"],
  "."
}], "Subsection",
  CellTags->"Derivativelinkback"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Sample Problems", "Section",
  FontSize->18,
  CellTags->"examples"],

Cell[TextData[{
  "Find the critical points of the function f(x)=",
  Cell[BoxData[
      \(\(-7\) + 5\ x\^2 + 3\ x\^3\)]],
  ".  Determine which of these points is a maxima/minima or a point of \
inflection. ",
  ButtonBox["Answer ",
    ButtonData:>{
      URL[ "http://mathforum.org/spimsow/notebooks/Answer.nb"], None},
    ButtonStyle->"Hyperlink"]
}], "Subsubsection"],

Cell[CellGroupData[{

Cell[TextData[{
  "Find the critical points of the function f(x)=",
  Cell[BoxData[
      \(3 + 3\ x\^2 - 6\ x\^4 + 7\ x\^5\)]],
  ".  There is no need to determine what kind of critical point.  ",
  ButtonBox["Answer",
    ButtonData:>{
      URL[ "http://mathforum.org/spimsow/notebooks/Answer2.nb"], 
      None},
    ButtonStyle->"Hyperlink"]
}], "Subsubsection"],

Cell[TextData[{
  "||  ",
  ButtonBox["Spimsow Homepage",
    ButtonData:>{
      URL[ "http://mathforum.org/spimsow"], None},
    ButtonStyle->"Hyperlink"],
  "  ||  ",
  ButtonBox["Spimsow Notebooks Page",
    ButtonData:>{
      URL[ "http://mathforum.org/notebooks.html"], None},
    ButtonStyle->"Hyperlink"],
  "  ||"
}], "Text",
  TextAlignment->Center]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
FrontEndVersion->"Macintosh 3.0",
ScreenRectangle->{{0, 832}, {0, 604}},
WindowSize->{521, 505},
WindowMargins->{{96, Automatic}, {34, Automatic}},
MacintoshSystemPageSetup->"\<\
00<0001804P000000]P2:?oQon82n@960dL5:0?l0080001804P000000]P2:001
0000I00000400`<300000BL?00400@0000000000000006P801T1T00000000000
00000000000000000000000000000000\>"
]


(***********************************************************************
Cached data follows.  If you edit this Notebook file directly, not using
Mathematica, you must remove the line containing CacheID at the top of 
the file.  The cache data will then be recreated when you save this file 
from within Mathematica.
***********************************************************************)

(*CellTagsOutline
CellTagsIndex->{
  "top"->{
    Cell[1931, 59, 1201, 33, 132, "Text",
      CellTags->"top"]},
  "enterfunction"->{
    Cell[3157, 96, 242, 7, 101, "Section",
      CellTags->"enterfunction"]},
  "range"->{
    Cell[4436, 143, 200, 4, 59, "Input",
      CellTags->"range"]},
  "plotlinkback"->{
    Cell[4639, 149, 458, 16, 66, "Text",
      CellTags->"plotlinkback"]},
  "graph"->{
    Cell[5100, 167, 19424, 658, 186, 9948, 536, "GraphicsData", 
    "PostScript", "Graphics",
      CellTags->"graph"]},
  "termslinkback"->{
    Cell[24786, 838, 283, 8, 46, "Subsection",
      CellTags->"termslinkback"]},
  "method1linkback"->{
    Cell[25072, 848, 308, 10, 64, "Subsection",
      CellTags->"method1linkback"]},
  "Derivativelinkback"->{
    Cell[25383, 860, 347, 10, 64, "Subsection",
      CellTags->"Derivativelinkback"]},
  "examples"->{
    Cell[25767, 875, 74, 2, 55, "Section",
      CellTags->"examples"]}
  }
*)

(*CellTagsIndex
CellTagsIndex->{
  {"top", 27825, 943},
  {"enterfunction", 27913, 946},
  {"range", 28004, 949},
  {"plotlinkback", 28092, 952},
  {"graph", 28180, 955},
  {"termslinkback", 28323, 959},
  {"method1linkback", 28428, 962},
  {"Derivativelinkback", 28539, 965},
  {"examples", 28643, 968}
  }
*)

(*NotebookFileOutline
Notebook[{

Cell[CellGroupData[{
Cell[1731, 51, 197, 6, 105, "Subtitle"],
Cell[1931, 59, 1201, 33, 132, "Text",
  CellTags->"top"],

Cell[CellGroupData[{
Cell[3157, 96, 242, 7, 101, "Section",
  CellTags->"enterfunction"],
Cell[3402, 105, 387, 10, 84, "Text"],

Cell[CellGroupData[{
Cell[3814, 119, 82, 1, 29, "Input"],
Cell[3899, 122, 63, 1, 28, "Output"]
}, Open  ]],
Cell[3977, 126, 337, 10, 66, "Text"],
Cell[4317, 138, 116, 3, 46, "Text"],
Cell[4436, 143, 200, 4, 59, "Input",
  CellTags->"range"],
Cell[4639, 149, 458, 16, 66, "Text",
  CellTags->"plotlinkback"],
Cell[5100, 167, 19424, 658, 186, 9948, 536, "GraphicsData", 
"PostScript", "Graphics",
  CellTags->"graph"],
Cell[24527, 827, 130, 3, 26, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[24694, 835, 89, 1, 78, "Section"],
Cell[24786, 838, 283, 8, 46, "Subsection",
  CellTags->"termslinkback"],
Cell[25072, 848, 308, 10, 64, "Subsection",
  CellTags->"method1linkback"],
Cell[25383, 860, 347, 10, 64, "Subsection",
  CellTags->"Derivativelinkback"]
}, Open  ]],

Cell[CellGroupData[{
Cell[25767, 875, 74, 2, 55, "Section",
  CellTags->"examples"],
Cell[25844, 879, 381, 10, 58, "Subsubsection"],

Cell[CellGroupData[{
Cell[26250, 893, 374, 10, 58, "Subsubsection"],
Cell[26627, 905, 374, 13, 30, "Text"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)




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