<?xml version="1.0" encoding="UTF-8"?>
<Worksheet><Version major="6" minor="1"/><View-Properties><Zoom percentage="100"/></View-Properties><Styles><Layout alignment="left" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Heading 3" rightmargin="0.0" spaceabove="0.0" spacebelow="0.0"/><Layout alignment="left" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Heading 2" rightmargin="0.0" spaceabove="8.0" spacebelow="2.0"/><Layout alignment="left" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Heading 1" rightmargin="0.0" spaceabove="8.0" spacebelow="4.0"/><Layout alignment="left" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Normal" rightmargin="0.0" spaceabove="0.0" spacebelow="0.0"/><Layout alignment="centred" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Normal257" rightmargin="0.0" spaceabove="0.0" spacebelow="0.0"/><Layout alignment="left" bullet="indent" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="List Item" rightmargin="0.0" spaceabove="3.0" spacebelow="3.0"/><Font background="[0,0,0]" bold="true" executable="true" family="Monospaced" foreground="[255,0,0]" name="Maple Input"/><Font background="[0,0,0]" family="Times New Roman" name="2D Comment" underline="false"/><Font background="[0,0,0]" bold="false" family="Times New Roman" foreground="[0,128,128]" italic="false" name="Hyperlink" size="12" subscript="false" superscript="false" underline="true"/><Font background="[0,0,0]" bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Normal257" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" italic="true" name="_cstyle259"/><Font background="[0,0,0]" italic="true" name="_cstyle258"/><Font background="[0,0,0]" italic="true" name="_cstyle257"/><Font background="[0,0,0]" italic="true" name="_cstyle256"/><Font background="[0,0,0]" bold="true" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="true" name="Heading 3" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" bold="true" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Heading 2" readonly="false" size="14" underline="false"/><Font background="[0,0,0]" bold="true" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Heading 1" readonly="false" size="18" underline="false"/><Font background="[0,0,0]" bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="List Item" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Normal" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" family="Times New Roman" name="Page Number" underline="false"/><Font background="[0,0,0]" italic="true" name="_cstyle261"/><Font background="[0,0,0]" italic="true" name="_cstyle260"/></Styles><Page-Numbers enabled="false" first-number="1" first-numbered-page="1" horizontal-location="right" style="Page Number" vertical-location="bottom"/><Group><Input><Text-field layout="Normal257" style="Normal257"/><Text-field layout="Normal257" style="Normal257">ORDINARY DIFFERENTIAL EQUATIONS POWERTOOL</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal257" style="Normal257">Lesson 6 -- Bifurcations</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal257" style="Hyperlink"><Hyperlink executable="false" hyperlink="true" linktarget="http://www.math.sc.edu/~meade/" style="Hyperlink">Prof. Douglas B. Meade</Hyperlink></Text-field><Text-field layout="Normal257" style="Hyperlink"><Hyperlink executable="false" hyperlink="true" linktarget="http://www.math.sc.edu/~IMI/" style="Hyperlink">Industrial Mathematics Institute</Hyperlink></Text-field><Text-field layout="Normal257" style="Hyperlink"><Hyperlink executable="false" hyperlink="true" linktarget="http://www.math.sc.edu/" style="Hyperlink">Department of Mathematics</Hyperlink></Text-field><Text-field layout="Normal257" style="Hyperlink"><Hyperlink executable="false" hyperlink="true" linktarget="http://www.sc.edu/" style="Hyperlink">University of South Carolina</Hyperlink></Text-field><Text-field layout="Normal257" style="Normal257">Columbia, SC 29208
</Text-field><Text-field layout="Normal257" style="Normal257">URL:   <Hyperlink executable="false" hyperlink="true" linktarget="http://www.math.sc.edu/~meade/" style="Hyperlink">http://www.math.sc.edu/~meade/</Hyperlink></Text-field><Text-field layout="Normal257" style="Normal257">E-mail: <Hyperlink executable="false" hyperlink="true" linktarget="mailto:meade@math.sc.edu" style="Hyperlink">meade@math.sc.edu</Hyperlink> </Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal257" style="Normal257"><Font encoding="ISO8859-1">Copyright \251  2001  by Douglas B. Meade</Font></Text-field><Text-field layout="Normal257" style="Normal257">All rights reserved</Text-field><Text-field layout="Normal257" style="Normal257"/><Text-field layout="Normal257" style="Normal257">-------------------------------------------------------------------</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">Outline of Lesson 6</Text-field></Title><Group><Input><Text-field layout="List Item" style="List Item"><Hyperlink executable="false" hyperlink="true" linktarget="Wks:#6.A" style="Hyperlink">6.A</Hyperlink> Graphical Approaches to Bifurcation</Text-field><Text-field layout="List Item" style="List Item">                 <Hyperlink executable="false" hyperlink="true" linktarget="Wks:#6.A-1" style="Hyperlink">6.A-1</Hyperlink> Animated Direction Fields and Solution Curves</Text-field><Text-field layout="List Item" style="List Item">                 <Hyperlink executable="false" hyperlink="true" linktarget="Wks:#6.A-2" style="Hyperlink">6.A-2</Hyperlink> Bifurcation Diagram</Text-field><Text-field layout="List Item" style="List Item"><Hyperlink executable="false" hyperlink="true" linktarget="Wks:#6.B" style="Hyperlink">6.B</Hyperlink> Analytic Determination of Bifurcation Points</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">Initialization</Text-field></Title><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">restart;</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">with( DEtools ):</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">with( plots ):</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group></Section><Section collapsed="true"><Title><Text-field bookmark="6.A" layout="Heading 1" style="Heading 1">6.A Graphical Approaches to Bifurcation</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">The solution of a differential equation that contains a parameter will depend in some intrinsic way on the value of this parameter.  As the parameter varies, the nature of the solution may indeed vary also.  For example, the number, location, and stability of equilibrium solutions may change with changing values of the parameter.  Such changes in the nature and behavior of solutions changes are called <Font bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" size="12" style="_cstyle256" underline="false">bifurcations</Font>, and the location of such points in a space of parameter and dependent variable are called <Font bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" size="12" style="_cstyle257" underline="false">bifurcation</Font> <Font bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" size="12" style="_cstyle258" underline="false">points</Font>.</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">By way of clarification of these ideas, consider the one-parameter family of functions</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">f := y^2 - 2*y + mu;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">in the differential equation</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">ode := diff( y(t), t ) = eval( f, y=y(t) );</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Section collapsed="true"><Title><Text-field bookmark="6.A-1" layout="Heading 2" style="Heading 2">6.A-1 Animated Direction Fields and Solution Curves</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">For each of the following values of the parameter <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation>,</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">PARAM := [ seq( i/2, i=-8..8 ) ];</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">the differential equation</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal257" style="Normal257"><Equation input-equation="diff(y(t),t) = y(t)^2-2*y(t)+mu;" style="2D Comment">NiMvLSUlZGlmZkc2JC0lInlHNiMlInRHRiosKCokRiciIiMiIiIqJkYtRi5GJ0YuISIiJSNtdUdGLg==</Equation> </Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">has a solution <Equation input-equation="y(t);" style="2D Comment">NiMtJSJ5RzYjJSJ0Rw==</Equation>, and perhaps some equilibrium solutions.  If a phase portrait is generated for each value of the parameter listed above, an animation can be constructed of the transition that occurs as the parameter changes.  The impact of this animation will be enhanced if all equilibria for each value of the parameter are included in the list of initial conditions.  This is accomplished by the following Maple calculation.</Text-field><Text-field layout="Normal" style="Normal">  </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">IC := { seq( [0,i], i=-5..5 ) }:</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">for mu in PARAM do</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">  yROOT := solve( f=0, y );</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">  yROOT2 := remove( has, {yROOT}, I );</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">  IC := IC union { seq( [0,y0], y0 = yROOT2 ) };</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">od:</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">unassign( 'mu' ):</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">The complete set of initial conditions is now</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">IC;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Section><Title><Text-field layout="Heading 3" style="Heading 3">Maple Question</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">Note that the IC are being kept as a <Hyperlink executable="false" hyperlink="true" linktarget="Help:set" style="Hyperlink">set</Hyperlink>, not a <Hyperlink executable="false" hyperlink="true" linktarget="Help:list" style="Hyperlink">list</Hyperlink>.  Why is this important? (Consult the on-line help for information about sets and lists.)</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group></Section><Group><Input><Text-field layout="Normal" style="Normal">The first frame of the animation is</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">DEplot( eval(ode,mu=PARAM[1]), {y(t)}, t=0..5, y=-10..10, IC, arrows=MEDIUM );</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">It shows two equilimbium solutions, the upper one being unstable, and the lower one, stable.</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">Since there are 17 frames in the full animation it may take a considerable amount of time to complete the execution of the next command that generates the full animation.</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">PLOTseq := seq( DEplot( ode, {y(t)}, t=0..5, y=-10..10, IC,</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">                arrows=MEDIUM ), mu=PARAM ):</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">display( PLOTseq, insequence=true );</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">As the parameter <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation> varies, the phase portrait for the corresponding differential equation exhibits two equilibrium solutions that merge into one, that then seems to disappear entirely.  There is a transition from two equilibria, to one, to none.  This is the type behavior that the term <Font bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" size="12" style="_cstyle259" underline="false">bifurcation</Font> designates.</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">Hence, this animation shows there is at least one bifurcation somewhere in this range of parameters.  To identify the values of the parameter where the bifurcations occur, one typically examines a <Font bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" size="12" style="_cstyle260" underline="false">bifurcation</Font> <Font bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" size="12" style="_cstyle261" underline="false">diagram</Font> (see below).</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group></Section><Section collapsed="true"><Title><Text-field bookmark="6.A-2" layout="Heading 2" style="Heading 2">6.A-2 Bifurcation Diagram</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">Continuing the previous example, recall that the right-hand side of the ODE</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">ode;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">is the function</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">f;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">where <Equation input-equation="mu" style="2D Comment">NiMlI211Rw==</Equation> is the parameter.  The equilibrium solutions <Equation input-equation="y = c;" style="2D Comment">NiMvJSJ5RyUiY0c=</Equation> (<Equation input-equation="c;" style="2D Comment">NiMlImNH</Equation> constant) are solutions of the equation <Equation input-equation="f(y,mu) = 0;" style="2D Comment">NiMvLSUiZkc2JCUieUclI211RyIiIQ==</Equation>.  In general, these solutions will depend on the parameter <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation>, so the equation <Equation input-equation="f(y,mu) = 0;" style="2D Comment">NiMvLSUiZkc2JCUieUclI211RyIiIQ==</Equation> defines the equilibrium solutions <Equation input-equation="y(mu);" style="2D Comment">NiMtJSJ5RzYjJSNtdUc=</Equation> implicitly.  The constant <Equation input-equation="alpha;" style="2D Comment">NiMlJmFscGhhRw==</Equation> will depend on the parameter <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation>!</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">A bifurcation diagram displays the equilibria of the ODE as a function of the parameter, that is, it contains a graph of <Equation input-equation="y(mu);" style="2D Comment">NiMtJSJ5RzYjJSNtdUc=</Equation> vs. <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation>.  Hence, the bifurcation diagram is obtained by graphing <Equation input-equation="y;" style="2D Comment">NiMlInlH</Equation> as a function of <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation> as determined implicitly by the equation <Equation input-equation="f(y,u) = 0;" style="2D Comment">NiMvLSUiZkc2JCUieUclInVHIiIh</Equation>.</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">In Maple, such a plot, here called Figure 6.1, can be obtained with</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">implicitplot( f=0, mu=-8..8, y=-4..4, style=POINT, view=[ -8..2, -4..4 ], title="Figure 6.1" );</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">For values of <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation> less than 1, there are two equilibrium solutions.  (For example, if <Equation input-equation="mu = -2;" style="2D Comment">NiMvJSNtdUcsJCIiIyEiIg==</Equation>, there are two intersections of the vertical line <Equation input-equation="mu = -2;" style="2D Comment">NiMvJSNtdUcsJCIiIyEiIg==</Equation> with the curve containing the equilibrium values.)  At <Equation input-equation="mu = 1;" style="2D Comment">NiMvJSNtdUciIiI=</Equation>, the two branches of the relation shown in Figure 6.1 come together at a single point.  Thus for <Equation input-equation="mu = 1;" style="2D Comment">NiMvJSNtdUciIiI=</Equation>, there is a single equilibrium solution, and clearly, for value of <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation> greater than 1, there are no equilibrium solutions.  Hence, the bifurcation value for this ODE is <Equation input-equation="mu=1" style="2D Comment">NiMvJSNtdUciIiI=</Equation>.</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">For a second example, consider the one-parameter family of ODEs determined by</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">f := y^3 - mu*y:
ode := diff( y(t), t ) = eval( f, y=y(t) );</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">where again, <Equation input-equation="mu;" style="2D Comment">NiMlI211Rw==</Equation> is the parameter.</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">The bifurcation diagram for this example has the name "pitchfork".</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">implicitplot( f=0, mu=-4..4, y=-2..2, style=POINT, axes=BOXED, title="Pitchfork Bifurcation" );</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group></Section></Section><Section collapsed="true"><Title><Text-field bookmark="6.B" layout="Heading 1" style="Heading 1">6.B Analytic Determination of Bifurcation Points</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">Not every equilibrium solution is a bifurcation point. For a given value of the parameter <Equation input-equation="mu" style="2D Comment">NiMlI211Rw==</Equation>, a necessary condition for an equilibrium solution to be a bifurcation point is</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal257" style="Normal257"><Equation input-equation="diff(f(y,mu),y) = 0;" style="2D Comment">NiMvLSUlZGlmZkc2JC0lImZHNiQlInlHJSNtdUdGKiIiIQ==</Equation>. </Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">Thus, equilibrium points for the ODE <Equation input-equation="diff(y(t),t) = f(y(t),mu);" style="2D Comment">NiMvLSUlZGlmZkc2JC0lInlHNiMlInRHRiotJSJmRzYkRiclI211Rw==</Equation> must satisfy the equation <Equation input-equation="f(y,mu) = 0;" style="2D Comment">NiMvLSUiZkc2JCUieUclI211RyIiIQ==</Equation>.  If an equilibrium point satisfies the additional condition  <Equation input-equation="diff(f(y,mu),y) = 0;" style="2D Comment">NiMvLSUlZGlmZkc2JC0lImZHNiQlInlHJSNtdUdGKiIiIQ==</Equation>, then the equilibrium point might also be a bifurcation point.</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">The bifurcation points generated by the function</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">f := y*(1-y)^2 + mu;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">are found by solving the equations</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">bif_eq1 := f = 0;
bif_eq2 := diff( f, y ) = 0;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">Maple gives </Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">bif_sol := solve( { bif_eq1, bif_eq2 }, { mu, y } );</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">as the solutions, which are then expressed as the points<Font bold="false" executable="false" foreground="[0,0,0]" italic="false" size="12" style="2D Comment"> </Font><Equation input-equation="``(mu,y);" style="2D Comment">NiMtJSFHNiQlI211RyUieUc=</Equation> via</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">bif_pt := seq( eval([mu,y],BP), BP=[bif_sol] );</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">The bifurcation diagram corresponding to the ODE</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">dy/dt = f;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">is given in Figure 6.2.</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">bif_diag := implicitplot( f=0, mu=-2..2, y=-2..4, style=POINT ):</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">bif_pt_P := plot( [bif_pt], style=POINT, color=BLUE,</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">                  symbol=CROSS, symbolsize=16 ):</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font italic="false" size="12" underline="false">display( bif_diag, bif_pt_P, axes=BOXED, title="Figure 6.2" );</Font></Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">The two potential bifurcation points are marked with blue crosses in Figure 6.2.</Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group></Section><Group><Input><Text-field layout="Normal" style="Normal">[Back to <Hyperlink executable="false" hyperlink="true" linktarget="Wks:Lesson00.mw" style="Hyperlink">ODE Powertool Table of Contents</Hyperlink>]</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"/></Input></Group><Text-field/><Text-field/><Text-field/><Text-field/><Text-field/></Worksheet>