{VERSION 5 0 "SGI MIPS UNIX" "5.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 }
{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 
0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading 1" 0 3 1 
{CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 1 }1 0 0 0 8 4 0 0 
0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 
0 0 0 0 0 0 0 0 0 0 0 0 1 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "M
aple Plot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 
}3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {SECT 1 {PARA 3 "" 0 "" {TEXT -1 19 "Iteration plot code" }}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 361 "iterplot := proc(f::procedu
re,x0::numeric,n::nonnegint)\n# graph the points x[0]=x0, x[1]=f(x0), \+
x[2]=f(f(x0)), ..., x[n]=(f@@n)(x0)\nlocal x,i,y,opts;\n   x := array(
0..n);\n   x[0] := evalf(x0);\n   for i to n do x[i] := evalf(f(x[i-1]
)); od;\n   y := [seq([i,x[i]], i=0..n)];\n   opts := args[4..nargs];
\n   plots[pointplot](y,color='red',symbol='circle',opts);\nend:" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{SECT 1 {PARA 3 "" 0 "
" {TEXT -1 16 "Cobweb plot code" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 638 "cobweb:=proc(g::procedure,r::realcons..realcons,\n           \+
  x0::numeric,n::posint)\nlocal m,p1,p2,P,x1,x2,i,x,opts;\n\nopts := [
args[5..nargs]];\nif hasoption(opts,'skip'='nonnegint','m','opts') the
n else m := 0 fi;\nif m>n then ERROR(\"m (no of states skipped) should
 be less than n\") fi;\nP:=array(1..4*(n-m)+2);\n\nx1:=evalf(x0);\nfor
 i from 1 to m do x1 := evalf(g(x1)); od;\nP[1]:=x1; P[2]:=0.0;\nfor i
 from 1 to n-m do\n    x2:=evalf(g(x1));\n    P[4*i-1]:=x1; P[4*i]:=x2
; P[4*i+1]:=x2; P[4*i+2]:=x2;\n    x1:=x2;\nod;\n\np1:=plots[pointplot
](P,style='line',color='red',op(opts)):\np2:=plot(\{g(x),x\},x=r,color
='blue'):\nplots[display](\{p1,p2\});\n\nend:" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 0 "" }}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 8 "Example
s" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "f := x -> a*x*(1-x);\n
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operatorG%&a
rrowGF(*(%\"aG\"\"\"9$F.,&F.F.F/!\"\"F.F(F(F(" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 10 "a := 1.5;\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>
%\"aG$\"#:!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "iterplot
(f,0.01,50);\n" }}{PARA 13 "" 1 "" {GLPLOT2D 350 350 350 {PLOTDATA 2 "
6%-%'POINTSG6U7$$\"\"!F($\"\"\"!\"#7$$F*F($\"%&[\"!\"&7$$\"\"#F($\"+D;
U%>#!#67$$\"\"$F($\"+W,S>KF67$$\"\"%F($\"+d@jtYF67$$\"\"&F($\"+tc!Go'F
67$$\"\"'F($\"+N,Ja$*F67$$\"\"(F($\"+V=*=F\"!#57$$\"\")F($\"+N9=l;FP7$
$\"\"*F($\"+qx%=3#FP7$$\"#5F($\"+M\"eEZ#FP7$$\"#6F($\"+k9)=z#FP7$$\"#7
F($\"+!)=j=IFP7$$\"#8F($\"+cq7hJFP7$$\"#9F($\"+W>yUKFP7$$\"#:F($\"+1x#
oG$FP7$$\"#;F($\"+/hv4LFP7$$\"#<F($\"+O8Y@LFP7$$\"#=F($\"+$>wtK$FP7$$
\"#>F($\"+S%\\.L$FP7$$\"#?F($\"+^+%=L$FP7$$\"#@F($\"+djeKLFP7$$\"#AF($
\"+i(fHL$FP7$$\"#BF($\"+Fl9LLFP7$$\"#CF($\"+D*RKL$FP7$$\"#DF($\"+GmGLL
FP7$$\"#EF($\"+!)*4LL$FP7$$\"#FF($\"+d;KLLFP7$$\"#GF($\"+&\\FLL$FP7$$
\"#HF($\"+9/LLLFP7$$\"#IF($\"+u=LLLFP7$$\"#JF($\"+/ELLLFP7$$\"#KF($\"+
pHLLLFP7$$\"#LF($\"+^JLLLFP7$$\"#MF($\"+UKLLLFP7$$\"#NF($\"+)GLLL$FP7$
$\"#OF($\"+6LLLLFP7$$\"#PF($\"+ALLLLFP7$$\"#QF($\"+GLLLLFP7$$\"#RF($\"
+JLLLLFP7$$\"#SF($\"+KLLLLFP7$$\"#TF($\"+LLLLLFP7$$\"#UF($\"+MLLLLFP7$
$\"#VF(Fhx7$$\"#WF(Fhx7$$\"#XF(Fhx7$$\"#YF(Fhx7$$\"#ZF(Fhx7$$\"#[F(Fhx
7$$\"#\\F(Fhx7$$\"#]F(Fhx-%'SYMBOLG6#%'CIRCLEG-%'COLOURG6&%$RGBG$\"*++
++\"!\")F'F'" 1 2 4 1 10 0 2 6 1 4 2 1.000000 45.000000 45.000000 0 0 
"Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "cobweb(f,0..1,
0.1,50);\n" }}{PARA 13 "" 1 "" {GLPLOT2D 350 350 350 {PLOTDATA 2 "6'-%
'CURVESG6%7aq7$$\"\"\"!\"\"$\"\"!F,7$F($\"$N\"!\"$7$F.F.7$F.$\"(D;v\"!
\"(7$F3F37$F3$\"+z*3s;#!#57$F8F87$F8$\"+aUHYDF:7$F=F=7$F=$\"+<#**o%GF:
7$FAFA7$FA$\"+`NiaIF:7$FEFE7$FE$\"+slK#=$F:7$FIFI7$FI$\"+'\\4WD$F:7$FM
FM7$FM$\"+pq$HH$F:7$FQFQ7$FQ$\"+B/*GJ$F:7$FUFU7$FU$\"+\">\\IK$F:7$FYFY
7$FY$\"+(Rv\"GLF:7$FgnFgn7$Fgn$\"+v.vILF:7$F[oF[o7$F[o$\"+`3/KLF:7$F_o
F_o7$F_o$\"+VooKLF:7$FcoFco7$Fco$\"+D+,LLF:7$FgoFgo7$Fgo$\"+k;<LLF:7$F
[pF[p7$F[p$\"+&\\_KL$F:7$F_pF_p7$F_p$\"+8HHLLF:7$FcpFcp7$Fcp$\"+BJJLLF
:7$FgpFgp7$Fgp$\"+GKKLLF:7$F[qF[q7$F[q$\"+\"GGLL$F:7$F_qF_q7$F_q$\"+23
LLLF:7$FcqFcq7$Fcq$\"+q?LLLF:7$FgqFgq7$Fgq$\"+-FLLLF:7$F[rF[r7$F[r$\"+
=ILLLF:7$F_rF_r7$F_r$\"+wJLLLF:7$FcrFcr7$Fcr$\"+bKLLLF:7$FgrFgr7$Fgr$
\"+%HLLL$F:7$F[sF[s7$F[s$\"+9LLLLF:7$F_sF_s7$F_s$\"+CLLLLF:7$FcsFcs7$F
cs$\"+HLLLLF:7$FgsFgs7$Fgs$\"+JLLLLF:7$F[tF[t7$F[t$\"+KLLLLF:7$F_tF_t7
$F_t$\"+LLLLLF:7$FctFct7$Fct$\"+MLLLLF:7$FgtFgtFitFitFitFitFitFitFitFi
tFitFitFitFitFitFitFitFitFitFitFitFitFitFitFitFitFitFitFitFit-%'COLOUR
G6&%$RGBG$\"*++++\"!\")F+F+-%&STYLEG6#%%LINEG-F$6$7S7$F+F+7$$\"3dmmm;a
rz@!#>Fju7$$\"3[LL$e9ui2%F\\vF^v7$$\"3nmmm\"z_\"4iF\\vFav7$$\"3[mmmT&p
hN)F\\vFdv7$$\"3BLLe*=)H\\5!#=Fgv7$$\"3fmm\"z/3uC\"FivF[w7$$\"3%)***\\
7LRDX\"FivF^w7$$\"3]mm\"zR'ok;FivFaw7$$\"3v***\\i5`h(=FivFdw7$$\"3WLLL
3En$4#FivFgw7$$\"3pmm;/RE&G#FivFjw7$$\"3\")*****\\K]4]#FivF]x7$$\"3$**
****\\PAvr#FivF`x7$$\"3)******\\nHi#HFivFcx7$$\"3jmm\"z*ev:JFivFfx7$$
\"3?LLL347TLFivFix7$$\"3+LLLLY.KNFivF\\y7$$\"3v***\\7o7Tv$FivF_y7$$\"3
&GLLLQ*o]RFivFby7$$\"3@++D\"=lj;%FivFey7$$\"31++vV&R<P%FivFhy7$$\"3WLL
$e9Ege%FivF[z7$$\"3GLLeR\"3Gy%FivF^z7$$\"3cmm;/T1&*\\FivFaz7$$\"3%em;z
RQb@&FivFdz7$$\"3[***\\(=>Y2aFivFgz7$$\"39mm;zXu9cFivFjz7$$\"3k******
\\y))GeFivF][l7$$\"3'*)***\\i_QQgFivF`[l7$$\"3@***\\7y%3TiFivFc[l7$$\"
35****\\P![hY'FivFf[l7$$\"3jKLL$Qx$omFivFi[l7$$\"3!)*****\\P+V)oFivF\\
\\l7$$\"3?mm\"zpe*zqFivF_\\l7$$\"3%)*****\\#\\'QH(FivFb\\l7$$\"3GKLe9S
8&\\(FivFe\\l7$$\"3R***\\i?=bq(FivFh\\l7$$\"3\"HLL$3s?6zFivF[]l7$$\"3a
***\\7`Wl7)FivF^]l7$$\"3#pmmm'*RRL)FivFa]l7$$\"3Qmm;a<.Y&)FivFd]l7$$\"
3<LLe9tOc()FivFg]l7$$\"3t******\\Qk\\*)FivFj]l7$$\"3CLL$3dg6<*FivF]^l7
$$\"3HmmmmxGp$*FivF`^l7$$\"3A++D\"oK0e*FivFc^l7$$\"3A++v=5s#y*FivFf^l7
$$F)F,Fi^l-F[u6&F]uF+F+F^u-F$6$7SFhu7$Fju$\"3u%=Nbt0$)>$F\\v7$F^v$\"3^
g,2b5<leF\\v7$Fav$\"3Spgk6bUN()F\\v7$Fdv$\"3V$QOr2(o[6Fiv7$Fgv$\"3qqbx
!G$z39Fiv7$F[w$\"3O4R<Y!3xj\"Fiv7$F^w$\"32q2b?%GB'=Fiv7$Faw$\"3![ojjZ_
83#Fiv7$Fdw$\"3(3Fhw3PiG#Fiv7$Fgw$\"3T/s'Q;*)H[#Fiv7$Fjw$\"3mQp\\*=JXk
#Fiv7$F]x$\"3')eBG3E@8GFiv7$F`x$\"3Dahq$QW&oHFiv7$Fcx$\"3i3C(e\\@\\5$F
iv7$Ffx$\"3'fikXiVu@$Fiv7$Fix$\"3ewY)Q-=sL$Fiv7$F\\y$\"3cz+M_;wEMFiv7$
F_y$\"3J!pY$=Z;<NFiv7$Fby$\"3L$fiW3U[e$Fiv7$Fey$\"3*z9X$[zvXOFiv7$Fhy$
\"3I\")o')>Lz!p$Fiv7$F[z$\"3gf*4s%QHCPFiv7$F^z$\"3X7`OaT#Hu$Fiv7$Faz$
\"3G[)RbM'**\\PFiv7$Fdz$\"3YFN&)z9.VPFiv7$Fgz$\"3w&G:x@'4DPFiv7$Fjz$\"
3')zxNlLJ$p$Fiv7$F][l$\"3zc$=)R<%pk$Fiv7$F`[l$\"30@M*pSj#)e$Fiv7$Fc[l$
\"3sYC'[Gc*=NFiv7$Ff[l$\"3cN-#)*[hvU$Fiv7$Fi[l$\"39ts,OvZKLFiv7$F\\\\l
$\"3$*Gi^9=T<KFiv7$F_\\l$\"3%47WAxl55$Fiv7$Fb\\l$\"3,7#yebF2'HFiv7$Fe
\\l$\"3l*Q!RPf9;GFiv7$Fh\\l$\"3unuM&oD?l#Fiv7$F[]l$\"3Y1A_))3tyCFiv7$F
^]l$\"3!yg;T*yq$G#Fiv7$Fa]l$\"3W*R*zWms#3#Fiv7$Fd]l$\"3;^iw>)[Q'=Fiv7$
Fg]l$\"3s*\\*o*obMj\"Fiv7$Fj]l$\"3'pdB(=q/59Fiv7$F]^l$\"3C,)[Q#H@S6Fiv
7$F`^l$\"38Bb3=m)R'))F\\v7$Fc^l$\"3eD5+M03GgF\\v7$Ff^l$\"3]S/@&[p$)=$F
\\v7$Fi^lF+Fj^l-%+AXESLABELSG6$Q\"x6\"Q!Fahl-%%VIEWG6$;F+Fi^l%(DEFAULT
G" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "
Curve 2" "Curve 3" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "a := \+
3.0;\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$\"#I!\"\"" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "iterplot(f,0.1,50);\n" }}{PARA 13 "
" 1 "" {GLPLOT2D 350 350 350 {PLOTDATA 2 "6%-%'POINTSG6U7$$\"\"!F($\"
\"\"!\"\"7$$F*F($\"$q#!\"$7$$\"\"#F($\"(+I\"f!\"(7$$\"\"$F($\"++$H*\\s
!#57$$\"\"%F($\"+WaM\")fF<7$$\"\"&F($\"+N$)36sF<7$$\"\"'F($\"+6lKLgF<7
$$\"\"(F($\"+&*3nzrF<7$$\"\")F($\"+N/rugF<7$$\"\"*F($\"+U#*\\`rF<7$$\"
#5F($\"+1Bt3hF<7$$\"#6F($\"+.Q@JrF<7$$\"#7F($\"+=$yt8'F<7$$\"#8F($\"+n
6\">6(F<7$$\"#9F($\"+n$\\>;'F<7$$\"#:F($\"++@'\\4(F<7$$\"#;F($\"+S,M$=
'F<7$$\"#<F($\"+M=\"*zqF<7$$\"#=F($\"+G+>-iF<7$$\"#>F($\"+R<UmqF<7$$\"
#?F($\"+g.(*=iF<7$$\"#@F($\"+yLBaqF<7$$\"#AF($\"+nv.MiF<7$$\"#BF($\"+&
QXJ/(F<7$$\"#CF($\"+#3nwC'F<7$$\"#DF($\"+d!)*H.(F<7$$\"#EF($\"+qc2giF<
7$$\"#FF($\"+#ziO-(F<7$$\"#GF($\"+smVriF<7$$\"#HF($\"+QY.:qF<7$$\"#IF(
$\"+@1*=G'F<7$$\"#JF($\"+Ip-2qF<7$$\"#KF($\"+rGb\"H'F<7$$\"#LF($\"+`tc
**pF<7$$\"#MF($\"+@\">0I'F<7$$\"#NF($\"+/]f#*pF<7$$\"#OF($\"+W&p)3jF<7
$$\"#PF($\"+a\"eg)pF<7$$\"#QF($\"+->n;jF<7$$\"#RF($\"+KD\"*zpF<7$$\"#S
F($\"+6R)RK'F<7$$\"#TF($\"+!)*>T(pF<7$$\"#UF($\"+\"4b3L'F<7$$\"#VF($\"
+<ukopF<7$$\"#WF($\"+/#GtL'F<7$$\"#XF($\"+#)fYjpF<7$$\"#YF($\"+-/WVjF<
7$$\"#ZF($\"+n.bepF<7$$\"#[F($\"+QTA\\jF<7$$\"#\\F($\"+m#yQ&pF<7$$\"#]
F($\"+<zqajF<-%'SYMBOLG6#%'CIRCLEG-%'COLOURG6&%$RGBG$\"*++++\"!\")F'F'
" 1 2 4 1 10 0 2 6 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "cobweb(f,0..1,0.1,50); # a
lternating decay to a steady state\n" }}{PARA 13 "" 1 "" {GLPLOT2D 
350 350 350 {PLOTDATA 2 "6'-%'CURVESG6%7aq7$$\"\"\"!\"\"$\"\"!F,7$F($
\"$q#!\"$7$F.F.7$F.$\"(+I\"f!\"(7$F3F37$F3$\"++$H*\\s!#57$F8F87$F8$\"+
WaM\")fF:7$F=F=7$F=$\"+N$)36sF:7$FAFA7$FA$\"+6lKLgF:7$FEFE7$FE$\"+&*3n
zrF:7$FIFI7$FI$\"+N/rugF:7$FMFM7$FM$\"+U#*\\`rF:7$FQFQ7$FQ$\"+1Bt3hF:7
$FUFU7$FU$\"+.Q@JrF:7$FYFY7$FY$\"+=$yt8'F:7$FgnFgn7$Fgn$\"+n6\">6(F:7$
F[oF[o7$F[o$\"+n$\\>;'F:7$F_oF_o7$F_o$\"++@'\\4(F:7$FcoFco7$Fco$\"+S,M
$='F:7$FgoFgo7$Fgo$\"+M=\"*zqF:7$F[pF[p7$F[p$\"+G+>-iF:7$F_pF_p7$F_p$
\"+R<UmqF:7$FcpFcp7$Fcp$\"+g.(*=iF:7$FgpFgp7$Fgp$\"+yLBaqF:7$F[qF[q7$F
[q$\"+nv.MiF:7$F_qF_q7$F_q$\"+&QXJ/(F:7$FcqFcq7$Fcq$\"+#3nwC'F:7$FgqFg
q7$Fgq$\"+d!)*H.(F:7$F[rF[r7$F[r$\"+qc2giF:7$F_rF_r7$F_r$\"+#ziO-(F:7$
FcrFcr7$Fcr$\"+smVriF:7$FgrFgr7$Fgr$\"+QY.:qF:7$F[sF[s7$F[s$\"+@1*=G'F
:7$F_sF_s7$F_s$\"+Ip-2qF:7$FcsFcs7$Fcs$\"+rGb\"H'F:7$FgsFgs7$Fgs$\"+`t
c**pF:7$F[tF[t7$F[t$\"+@\">0I'F:7$F_tF_t7$F_t$\"+/]f#*pF:7$FctFct7$Fct
$\"+W&p)3jF:7$FgtFgt7$Fgt$\"+a\"eg)pF:7$F[uF[u7$F[u$\"+->n;jF:7$F_uF_u
7$F_u$\"+KD\"*zpF:7$FcuFcu7$Fcu$\"+6R)RK'F:7$FguFgu7$Fgu$\"+!)*>T(pF:7
$F[vF[v7$F[v$\"+\"4b3L'F:7$F_vF_v7$F_v$\"+<ukopF:7$FcvFcv7$Fcv$\"+/#Gt
L'F:7$FgvFgv7$Fgv$\"+#)fYjpF:7$F[wF[w7$F[w$\"+-/WVjF:7$F_wF_w7$F_w$\"+
n.bepF:7$FcwFcw7$Fcw$\"+QTA\\jF:7$FgwFgw7$Fgw$\"+m#yQ&pF:7$F[xF[x7$F[x
$\"+<zqajF:7$F_xF_x-%'COLOURG6&%$RGBG$\"*++++\"!\")F+F+-%&STYLEG6#%%LI
NEG-F$6$7S7$F+F+7$$\"3dmmm;arz@!#>Fby7$$\"3[LL$e9ui2%FdyFfy7$$\"3nmmm
\"z_\"4iFdyFiy7$$\"3[mmmT&phN)FdyF\\z7$$\"3BLLe*=)H\\5!#=F_z7$$\"3fmm
\"z/3uC\"FazFcz7$$\"3%)***\\7LRDX\"FazFfz7$$\"3]mm\"zR'ok;FazFiz7$$\"3
v***\\i5`h(=FazF\\[l7$$\"3WLLL3En$4#FazF_[l7$$\"3pmm;/RE&G#FazFb[l7$$
\"3\")*****\\K]4]#FazFe[l7$$\"3$******\\PAvr#FazFh[l7$$\"3)******\\nHi
#HFazF[\\l7$$\"3jmm\"z*ev:JFazF^\\l7$$\"3?LLL347TLFazFa\\l7$$\"3+LLLLY
.KNFazFd\\l7$$\"3v***\\7o7Tv$FazFg\\l7$$\"3&GLLLQ*o]RFazFj\\l7$$\"3@++
D\"=lj;%FazF]]l7$$\"31++vV&R<P%FazF`]l7$$\"3WLL$e9Ege%FazFc]l7$$\"3GLL
eR\"3Gy%FazFf]l7$$\"3cmm;/T1&*\\FazFi]l7$$\"3%em;zRQb@&FazF\\^l7$$\"3[
***\\(=>Y2aFazF_^l7$$\"39mm;zXu9cFazFb^l7$$\"3k******\\y))GeFazFe^l7$$
\"3'*)***\\i_QQgFazFh^l7$$\"3@***\\7y%3TiFazF[_l7$$\"35****\\P![hY'Faz
F^_l7$$\"3jKLL$Qx$omFazFa_l7$$\"3!)*****\\P+V)oFazFd_l7$$\"3?mm\"zpe*z
qFazFg_l7$$\"3%)*****\\#\\'QH(FazFj_l7$$\"3GKLe9S8&\\(FazF]`l7$$\"3R**
*\\i?=bq(FazF``l7$$\"3\"HLL$3s?6zFazFc`l7$$\"3a***\\7`Wl7)FazFf`l7$$\"
3#pmmm'*RRL)FazFi`l7$$\"3Qmm;a<.Y&)FazF\\al7$$\"3<LLe9tOc()FazF_al7$$
\"3t******\\Qk\\*)FazFbal7$$\"3CLL$3dg6<*FazFeal7$$\"3HmmmmxGp$*FazFha
l7$$\"3A++D\"oK0e*FazF[bl7$$\"3A++v=5s#y*FazF^bl7$$F)F,Fabl-Fcx6&FexF+
F+Ffx-F$6$7SF`y7$Fby$\"3[p.2r9h'R'Fdy7$Ffy$\"35KS,6U.t6Faz7$Fiy$\"3)Q@
HB5&3Z<Faz7$F\\z$\"3'owsU:utH#Faz7$F_z$\"3ST6bhle<GFaz7$Fcz$\"3s=yM#4;
aF$Faz7$Ffz$\"3;S:5TolCPFaz7$Fiz$\"3ipts_\\qiTFaz7$F\\[l$\"3uTDKvTZsXF
az7$F_[l$\"3$)3WtF$yf'\\Faz7$Fb[l$\"3JxQ**yB1*G&Faz7$Fe[l$\"3s<Zc;_UEc
Faz7$Fh[l$\"3]3BTn()3PfFaz7$F[\\l$\"3C<[u\"*H%)4iFaz7$F^\\l$\"3#>DH\"
\\s)[V'Faz7$Fa\\l$\"3<`$px/OWn'Faz7$Fd\\l$\"38f,o/L_`oFaz7$Fg\\l$\"3i!
Q$pO%HV.(Faz7$Fj\\l$\"3n'=D*oToprFaz7$F]]l$\"3)fH!p'*e^\"H(Faz7$F`]l$
\"3hiPtRme\"Q(Faz7$Fc]l$\"3>>*>Wp(e[uFaz7$Ff]l$\"3!\\iI(3$[e[(Faz7$Fi]
l$\"3c'pz5p#***\\(Faz7$F\\^l$\"3$\\02(fH1'[(Faz7$F_^l$\"3_r0VNC>]uFaz7
$Fb^l$\"3vfbrIni'Q(Faz7$Fe^l$\"3e8njzM)QH(Faz7$Fh^l$\"36Uo)R\"o_wrFaz7
$F[_l$\"3V$*[spD\"z.(Faz7$F^_l$\"37r/kzH7boFaz7$Fa_l$\"3HYX.s]&\\m'Faz
7$Fd_l$\"3'yXK!HO#[V'Faz7$Fg_l$\"3*=C)[W:8-iFaz7$Fj_l$\"3-Ckv6^X@fFaz7
$F]`l$\"3Iz2yu=HKcFaz7$F``l$\"3\\N\\pq80/`Faz7$Fc`l$\"3$HTWqxhu&\\Faz7
$Ff`l$\"3f:KB)y:uc%Faz7$Fi`l$\"3!*)z)f*G`a;%Faz7$F\\al$\"3K-D`RwpFPFaz
7$F_al$\"3X***y$z8\"pE$Faz7$Fbal$\"3#R:Zu.%4?GFaz7$Feal$\"3[-wpZeU!G#F
az7$Fhal$\"3i/rhBtzs<Faz7$F[bl$\"370-!o5;c?\"Faz7$F^bl$\"3+\")3Uq*QnP'
Fdy7$FablF+Fbbl-%+AXESLABELSG6$Q\"x6\"Q!Fi[m-%%VIEWG6$;F+Fabl%(DEFAULT
G" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "
Curve 2" "Curve 3" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "a := \+
3.3;\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$\"#L!\"\"" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "iterplot(f,0.1,50);\n" }}{PARA 13 "
" 1 "" {GLPLOT2D 350 350 350 {PLOTDATA 2 "6%-%'POINTSG6U7$$\"\"!F($\"
\"\"!\"\"7$$F*F($\"$(H!\"$7$$\"\"#F($\"(.,*o!\"(7$$\"\"$F($\"+9&y52(!#
57$$\"\"%F($\"+^\"4X$oF<7$$\"\"&F($\"+Q,TRrF<7$$\"\"'F($\"+3]cRnF<7$$
\"\"(F($\"+%[\"R^sF<7$$\"\")F($\"+3!3td'F<7$$\"\"*F($\"+>G**GuF<7$$\"#
5F($\"+\")z*HI'F<7$$\"#6F($\"+nZs*o(F<7$$\"#7F($\"+BcdieF<7$$\"#8F($\"
+*)yY/!)F<7$$\"#9F($\"+#*p9r_F<7$$\"#:F($\"+q\"QdA)F<7$$\"#;F($\"+vBA;
[F<7$$\"#<F($\"+5X&)Q#)F<7$$\"#=F($\"+#3T#)y%F<7$$\"#>F($\"+$>-_B)F<7$
$\"#?F($\"+NS/'z%F<7$$\"#@F($\"+^EFO#)F<7$$\"#AF($\"+zzv$z%F<7$$\"#BF(
$\"+&>jfB)F<7$$\"#CF($\"+E*=Wz%F<7$$\"#DF($\"+@I0O#)F<7$$\"#EF($\"+zqA
%z%F<7$$\"#FF($\"+wp-O#)F<7$$\"#GF($\"+0FG%z%F<7$$\"#HF($\"+KX.O#)F<7$
$\"#IF($\"+olE%z%F<7$$\"#JF($\"+PB.O#)F<7$$\"#KF($\"+b7F%z%F<7$$\"#LF(
$\"+vH.O#)F<7$$\"#MF($\"+$*)pUz%F<7$$\"#NF($\"+#zKgB)F<7$$\"#OF($\"+$G
qUz%F<7$$\"#PF($\"+UG.O#)F<7$$\"#QF($\"+x,F%z%F<7$$\"#RF($\"+FG.O#)F<7
$$\"#SF($\"+4-F%z%F<7$$\"#TF($\"+MG.O#)F<7$$\"#UF($\"+%>qUz%F<7$$\"#VF
($\"+JG.O#)F<7$$\"#WF($\"++-F%z%F<7$$\"#XF($\"+KG.O#)F<7$$\"#YF($\"+*>
qUz%F<7$$\"#ZF(Fcx7$$\"#[F(Fhx7$$\"#\\F(F]y7$$\"#]F(Fby-%'SYMBOLG6#%'C
IRCLEG-%'COLOURG6&%$RGBG$\"*++++\"!\")F'F'" 1 2 4 1 10 0 2 6 1 4 2 
1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 23 "cobweb(f,0..1,0.1,50);\n" }}{PARA 13 "" 1 "" 
{GLPLOT2D 350 350 350 {PLOTDATA 2 "6'-%'CURVESG6%7aq7$$\"\"\"!\"\"$\"
\"!F,7$F($\"$(H!\"$7$F.F.7$F.$\"(.,*o!\"(7$F3F37$F3$\"+9&y52(!#57$F8F8
7$F8$\"+^\"4X$oF:7$F=F=7$F=$\"+Q,TRrF:7$FAFA7$FA$\"+3]cRnF:7$FEFE7$FE$
\"+%[\"R^sF:7$FIFI7$FI$\"+3!3td'F:7$FMFM7$FM$\"+>G**GuF:7$FQFQ7$FQ$\"+
\")z*HI'F:7$FUFU7$FU$\"+nZs*o(F:7$FYFY7$FY$\"+BcdieF:7$FgnFgn7$Fgn$\"+
*)yY/!)F:7$F[oF[o7$F[o$\"+#*p9r_F:7$F_oF_o7$F_o$\"+q\"QdA)F:7$FcoFco7$
Fco$\"+vBA;[F:7$FgoFgo7$Fgo$\"+5X&)Q#)F:7$F[pF[p7$F[p$\"+#3T#)y%F:7$F_
pF_p7$F_p$\"+$>-_B)F:7$FcpFcp7$Fcp$\"+NS/'z%F:7$FgpFgp7$Fgp$\"+^EFO#)F
:7$F[qF[q7$F[q$\"+zzv$z%F:7$F_qF_q7$F_q$\"+&>jfB)F:7$FcqFcq7$Fcq$\"+E*
=Wz%F:7$FgqFgq7$Fgq$\"+@I0O#)F:7$F[rF[r7$F[r$\"+zqA%z%F:7$F_rF_r7$F_r$
\"+wp-O#)F:7$FcrFcr7$Fcr$\"+0FG%z%F:7$FgrFgr7$Fgr$\"+KX.O#)F:7$F[sF[s7
$F[s$\"+olE%z%F:7$F_sF_s7$F_s$\"+PB.O#)F:7$FcsFcs7$Fcs$\"+b7F%z%F:7$Fg
sFgs7$Fgs$\"+vH.O#)F:7$F[tF[t7$F[t$\"+$*)pUz%F:7$F_tF_t7$F_t$\"+#zKgB)
F:7$FctFct7$Fct$\"+$GqUz%F:7$FgtFgt7$Fgt$\"+UG.O#)F:7$F[uF[u7$F[u$\"+x
,F%z%F:7$F_uF_u7$F_u$\"+FG.O#)F:7$FcuFcu7$Fcu$\"+4-F%z%F:7$FguFgu7$Fgu
$\"+MG.O#)F:7$F[vF[v7$F[v$\"+%>qUz%F:7$F_vF_v7$F_v$\"+JG.O#)F:7$FcvFcv
7$Fcv$\"++-F%z%F:7$FgvFgv7$Fgv$\"+KG.O#)F:7$F[wF[w7$F[w$\"+*>qUz%F:7$F
_wF_w7$F_wF[vF]vF^vFavFbvFevFfvFiv-%'COLOURG6&%$RGBG$\"*++++\"!\")F+F+
-%&STYLEG6#%%LINEG-F$6$7S7$F+F+7$$\"3dmmm;arz@!#>Fcx7$$\"3[LL$e9ui2%Fe
xFgx7$$\"3nmmm\"z_\"4iFexFjx7$$\"3[mmmT&phN)FexF]y7$$\"3BLLe*=)H\\5!#=
F`y7$$\"3fmm\"z/3uC\"FbyFdy7$$\"3%)***\\7LRDX\"FbyFgy7$$\"3]mm\"zR'ok;
FbyFjy7$$\"3v***\\i5`h(=FbyF]z7$$\"3WLLL3En$4#FbyF`z7$$\"3pmm;/RE&G#Fb
yFcz7$$\"3\")*****\\K]4]#FbyFfz7$$\"3$******\\PAvr#FbyFiz7$$\"3)******
\\nHi#HFbyF\\[l7$$\"3jmm\"z*ev:JFbyF_[l7$$\"3?LLL347TLFbyFb[l7$$\"3+LL
LLY.KNFbyFe[l7$$\"3v***\\7o7Tv$FbyFh[l7$$\"3&GLLLQ*o]RFbyF[\\l7$$\"3@+
+D\"=lj;%FbyF^\\l7$$\"31++vV&R<P%FbyFa\\l7$$\"3WLL$e9Ege%FbyFd\\l7$$\"
3GLLeR\"3Gy%FbyFg\\l7$$\"3cmm;/T1&*\\FbyFj\\l7$$\"3%em;zRQb@&FbyF]]l7$
$\"3[***\\(=>Y2aFbyF`]l7$$\"39mm;zXu9cFbyFc]l7$$\"3k******\\y))GeFbyFf
]l7$$\"3'*)***\\i_QQgFbyFi]l7$$\"3@***\\7y%3TiFbyF\\^l7$$\"35****\\P![
hY'FbyF_^l7$$\"3jKLL$Qx$omFbyFb^l7$$\"3!)*****\\P+V)oFbyFe^l7$$\"3?mm
\"zpe*zqFbyFh^l7$$\"3%)*****\\#\\'QH(FbyF[_l7$$\"3GKLe9S8&\\(FbyF^_l7$
$\"3R***\\i?=bq(FbyFa_l7$$\"3\"HLL$3s?6zFbyFd_l7$$\"3a***\\7`Wl7)FbyFg
_l7$$\"3#pmmm'*RRL)FbyFj_l7$$\"3Qmm;a<.Y&)FbyF]`l7$$\"3<LLe9tOc()FbyF`
`l7$$\"3t******\\Qk\\*)FbyFc`l7$$\"3CLL$3dg6<*FbyFf`l7$$\"3HmmmmxGp$*F
byFi`l7$$\"3A++D\"oK0e*FbyF\\al7$$\"3A++v=5s#y*FbyF_al7$$F)F,Fbal-Fdw6
&FfwF+F+Fgw-F$6$7SFax7$Fcx$\"3%oSx\"=EFOqFex7$Fgx$\"3GNa6KwL!H\"Fby7$F
jx$\"3VN@c7Oz@>Fby7$F]y$\"3ZV+qp:6FDFby7$F`y$\"3Ebiq<_M*4$Fby7$Fdy$\"3
J+Ee,x&Hg$Fby7$Fgy$\"3%Qp6__Ar4%Fby7$Fjy$\"3d1,+[a(*yXFby7$F]z$\"3e&za
Gf@(H]Fby7$F`z$\"3L\\y]ghdiaFby7$Fcz$\"3GkK*ohoz\"eFby7$Ffz$\"3$*)=@#Q
x1*='Fby7$Fiz$\"3pQN:WwzIlFby7$F\\[l$\"33*H>4HF3$oFby7$F_[l$\"3)e<US(f
PyqFby7$Fb[l$\"3;)GYDlz=M(Fby7$Fe[l$\"3\\u\"[^jv)QvFby7$Fh[l$\"3M>FO!Q
ixt(Fby7$F[\\l$\"3+0x\"ee_m)yFby7$F^\\l$\"3CD$fj[n1-)Fby7$Fa\\l$\"3wQr
q.`u>\")Fby7$Fd\\l$\"3)3\">'QYYM>)Fby7$Fg\\l$\"3G'o.'RJVM#)Fby7$Fj\\l$
\"3!fm(=g>**\\#)Fby7$F]]l$\"33gxnb#pYB)Fby7$F`]l$\"3MFO(*y;@&>)Fby7$Fc
]l$\"3%[6(y.%*GD\")Fby7$Ff]l$\"3Q$Q+w#=FB!)Fby7$Fi]l$\"3)f_&Q&\\zT*yFb
y7$F\\^l$\"3W\"Q(pEQqTxFby7$F_^l$\"37<Xgx_jSvFby7$Fb^l$\"3O,!Q#z0XJtFb
y7$Fe^l$\"3&QqN>*fIyqFby7$Fh^l$\"3>mq$*)pWB#oFby7$F[_l$\"3Kl?$Hi+O^'Fb
y7$F^_l$\"3Mc)eA1@b>'Fby7$Fa_l$\"3[HWw2lXMeFby7$Fd_l$\"3La)[Z&z?`aFby7
$Fg_l$\"3fPl0nt:C]Fby7$Fj_l$\"3hy'e&=')*>e%Fby7$F]`l$\"3X_d[.uY+TFby7$
F``l$\"3]**oJ<Dg$f$Fby7$Fc`l$\"34p=>TM5-JFby7$Ff`l$\"3GitYK%o%3DFby7$F
i`l$\"3)\\\")yf0x+&>Fby7$F\\al$\"3cD-[<x<E8Fby7$F_al$\"3boHYnGT9qFex7$
FbalF+Fcal-%+AXESLABELSG6$Q\"x6\"Q!Fjjl-%%VIEWG6$;F+Fbal%(DEFAULTG" 1 
2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve
 2" "Curve 3" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "cobweb(f,0
..1,0.1,50,skip=25); # show the 2-cycle\n" }}{PARA 13 "" 1 "" 
{GLPLOT2D 350 350 350 {PLOTDATA 2 "6'-%'CURVESG6$7S7$$\"\"!F)F(7$$\"3d
mmm;arz@!#>F+7$$\"3[LL$e9ui2%F-F/7$$\"3nmmm\"z_\"4iF-F27$$\"3[mmmT&phN
)F-F57$$\"3BLLe*=)H\\5!#=F87$$\"3fmm\"z/3uC\"F:F<7$$\"3%)***\\7LRDX\"F
:F?7$$\"3]mm\"zR'ok;F:FB7$$\"3v***\\i5`h(=F:FE7$$\"3WLLL3En$4#F:FH7$$
\"3pmm;/RE&G#F:FK7$$\"3\")*****\\K]4]#F:FN7$$\"3$******\\PAvr#F:FQ7$$
\"3)******\\nHi#HF:FT7$$\"3jmm\"z*ev:JF:FW7$$\"3?LLL347TLF:FZ7$$\"3+LL
LLY.KNF:Fgn7$$\"3v***\\7o7Tv$F:Fjn7$$\"3&GLLLQ*o]RF:F]o7$$\"3@++D\"=lj
;%F:F`o7$$\"31++vV&R<P%F:Fco7$$\"3WLL$e9Ege%F:Ffo7$$\"3GLLeR\"3Gy%F:Fi
o7$$\"3cmm;/T1&*\\F:F\\p7$$\"3%em;zRQb@&F:F_p7$$\"3[***\\(=>Y2aF:Fbp7$
$\"39mm;zXu9cF:Fep7$$\"3k******\\y))GeF:Fhp7$$\"3'*)***\\i_QQgF:F[q7$$
\"3@***\\7y%3TiF:F^q7$$\"35****\\P![hY'F:Faq7$$\"3jKLL$Qx$omF:Fdq7$$\"
3!)*****\\P+V)oF:Fgq7$$\"3?mm\"zpe*zqF:Fjq7$$\"3%)*****\\#\\'QH(F:F]r7
$$\"3GKLe9S8&\\(F:F`r7$$\"3R***\\i?=bq(F:Fcr7$$\"3\"HLL$3s?6zF:Ffr7$$
\"3a***\\7`Wl7)F:Fir7$$\"3#pmmm'*RRL)F:F\\s7$$\"3Qmm;a<.Y&)F:F_s7$$\"3
<LLe9tOc()F:Fbs7$$\"3t******\\Qk\\*)F:Fes7$$\"3CLL$3dg6<*F:Fhs7$$\"3Hm
mmmxGp$*F:F[t7$$\"3A++D\"oK0e*F:F^t7$$\"3A++v=5s#y*F:Fat7$$\"\"\"F)Fdt
-%'COLOURG6&%$RGBGF(F($\"*++++\"!\")-F$6$7SF'7$F+$\"3%oSx\"=EFOqF-7$F/
$\"3GNa6KwL!H\"F:7$F2$\"3VN@c7Oz@>F:7$F5$\"3ZV+qp:6FDF:7$F8$\"3Ebiq<_M
*4$F:7$F<$\"3J+Ee,x&Hg$F:7$F?$\"3%Qp6__Ar4%F:7$FB$\"3d1,+[a(*yXF:7$FE$
\"3e&zaGf@(H]F:7$FH$\"3L\\y]ghdiaF:7$FK$\"3GkK*ohoz\"eF:7$FN$\"3$*)=@#
Qx1*='F:7$FQ$\"3pQN:WwzIlF:7$FT$\"33*H>4HF3$oF:7$FW$\"3)e<US(fPyqF:7$F
Z$\"3;)GYDlz=M(F:7$Fgn$\"3\\u\"[^jv)QvF:7$Fjn$\"3M>FO!Qixt(F:7$F]o$\"3
+0x\"ee_m)yF:7$F`o$\"3CD$fj[n1-)F:7$Fco$\"3wQrq.`u>\")F:7$Ffo$\"3)3\">
'QYYM>)F:7$Fio$\"3G'o.'RJVM#)F:7$F\\p$\"3!fm(=g>**\\#)F:7$F_p$\"33gxnb
#pYB)F:7$Fbp$\"3MFO(*y;@&>)F:7$Fep$\"3%[6(y.%*GD\")F:7$Fhp$\"3Q$Q+w#=F
B!)F:7$F[q$\"3)f_&Q&\\zT*yF:7$F^q$\"3W\"Q(pEQqTxF:7$Faq$\"37<Xgx_jSvF:
7$Fdq$\"3O,!Q#z0XJtF:7$Fgq$\"3&QqN>*fIyqF:7$Fjq$\"3>mq$*)pWB#oF:7$F]r$
\"3Kl?$Hi+O^'F:7$F`r$\"3Mc)eA1@b>'F:7$Fcr$\"3[HWw2lXMeF:7$Ffr$\"3La)[Z
&z?`aF:7$Fir$\"3fPl0nt:C]F:7$F\\s$\"3hy'e&=')*>e%F:7$F_s$\"3X_d[.uY+TF
:7$Fbs$\"3]**oJ<Dg$f$F:7$Fes$\"34p=>TM5-JF:7$Fhs$\"3GitYK%o%3DF:7$F[t$
\"3)\\\")yf0x+&>F:7$F^t$\"3cD-[<x<E8F:7$Fat$\"3boHYnGT9qF-7$FdtF(Fft-F
$6%7U7$$\"+@I0O#)!#5F(7$Fb^l$\"+zqA%z%Fd^l7$Ff^lFf^l7$Ff^l$\"+wp-O#)Fd
^l7$Fj^lFj^l7$Fj^l$\"+0FG%z%Fd^l7$F^_lF^_l7$F^_l$\"+KX.O#)Fd^l7$Fb_lFb
_l7$Fb_l$\"+olE%z%Fd^l7$Ff_lFf_l7$Ff_l$\"+PB.O#)Fd^l7$Fj_lFj_l7$Fj_l$
\"+b7F%z%Fd^l7$F^`lF^`l7$F^`l$\"+vH.O#)Fd^l7$Fb`lFb`l7$Fb`l$\"+$*)pUz%
Fd^l7$Ff`lFf`l7$Ff`l$\"+#zKgB)Fd^l7$Fj`lFj`l7$Fj`l$\"+$GqUz%Fd^l7$F^al
F^al7$F^al$\"+UG.O#)Fd^l7$FbalFbal7$Fbal$\"+x,F%z%Fd^l7$FfalFfal7$Ffal
$\"+FG.O#)Fd^l7$FjalFjal7$Fjal$\"+4-F%z%Fd^l7$F^blF^bl7$F^bl$\"+MG.O#)
Fd^l7$FbblFbbl7$Fbbl$\"+%>qUz%Fd^l7$FfblFfbl7$Ffbl$\"+JG.O#)Fd^l7$Fjbl
Fjbl7$Fjbl$\"++-F%z%Fd^l7$F^clF^cl7$F^cl$\"+KG.O#)Fd^l7$FbclFbcl7$Fbcl
$\"+*>qUz%Fd^l7$FfclFfcl7$FfclFbblFdblFeblFhblFiblF\\clF]clF`cl-Fgt6&F
itFjtF(F(-%&STYLEG6#%%LINEG-%+AXESLABELSG6$Q\"x6\"Q!Fddl-%%VIEWG6$;F(F
dt%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 
"Curve 1" "Curve 2" "Curve 3" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 11 "a := 3.9; \n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$\"#R!\"\"
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "cobweb(f,0..1,0.1,50);
\n" }}{PARA 13 "" 1 "" {GLPLOT2D 350 350 350 {PLOTDATA 2 "6'-%'CURVESG
6%7aq7$$\"\"\"!\"\"$\"\"!F,7$F($\"$^$!\"$7$F.F.7$F.$\"(hT)))!\"(7$F3F3
7$F3$\"+(R%=mQ!#57$F8F87$F8$\"+^-k[#*F:7$F=F=7$F=$\"+Z=85FF:7$FAFA7$FA
$\"+'\\O]q(F:7$FEFE7$FE$\"+YKG'*oF:7$FIFI7$FI$\"+UGgZ$)F:7$FMFM7$FM$\"
+Kl[z`F:7$FQFQ7$FQ$\"+(3OQp*F:7$FUFU7$FU$\"+(3#[d6F:7$FYFY7$FY$\"+u=n
\"*RF:7$FgnFgn7$Fgn$\"+8qZ`$*F:7$F[oF[o7$F[o$\"+!yA%eBF:7$F_oF_o7$F_o$
\"+=sgGqF:7$FcoFco7$Fco$\"+uN0X\")F:7$FgoFgo7$Fgo$\"+F)oB*eF:7$F[pF[p7
$F[p$\"+uVVR%*F:7$F_pF_p7$F_p$\"+^Zlj?F:7$FcpFcp7$Fcp$\"+m=P(Q'F:7$Fgp
Fgp7$Fgp$\"+IxK***)F:7$F[qF[q7$F[q$\"+1t47NF:7$F_qF_q7$F_q$\"+rnf')))F
:7$FcqFcq7$Fcq$\"+hD!)eQF:7$FgqFgq7$Fgq$\"+z14U#*F:7$F[rF[r7$F[r$\"+-+
#=t#F:7$F_rF_r7$F_r$\"+0-fVxF:7$FcrFcr7$Fcr$\"+()zN9oF:7$FgrFgr7$Fgr$
\"+()4;m%)F:7$F[sF[s7$F[s$\"+DRVk]F:7$F_sF_s7$F_s$\"+E3Q[(*F:7$FcsFcs7
$Fcs$\"+s,Bm&*!#67$FgsFgs7$Fgs$\"+/+$RP$F:7$F\\tF\\t7$F\\t$\"+'e*z=()F
:7$F`tF`t7$F`t$\"+gl]cVF:7$FdtFdt7$Fdt$\"+8t])e*F:7$FhtFht7$Fht$\"+\\U
yQ:F:7$F\\uF\\u7$F\\u$\"+bVzx]F:7$F`uF`u7$F`u$\"+L(Rwu*F:7$FduFdu7$Fdu
$\"+mhn$f*Fis7$FhuFhu7$Fhu$\"+yIe#Q$F:7$F\\vF\\v7$F\\v$\"+s`uH()F:7$F`
vF`v7$F`v$\"+*y4ZK%F:7$FdvFdv7$Fdv$\"+BM:s&*F:7$FhvFhv7$Fhv$\"++6@(f\"
F:7$F\\wF\\w7$F\\w$\"+/3?M_F:7$F`wF`w7$F`w$\"+'\\3'G(*F:7$FdwFdw7$Fdw$
\"+g?qH5F:7$FhwFhw7$Fhw$\"+kjK-OF:7$F\\xF\\x7$F\\x$\"+z#Q\"))*)F:7$F`x
F`x-%'COLOURG6&%$RGBG$\"*++++\"!\")F+F+-%&STYLEG6#%%LINEG-F$6$7S7$F+F+
7$$\"3dmmm;arz@!#>Fcy7$$\"3[LL$e9ui2%FeyFgy7$$\"3nmmm\"z_\"4iFeyFjy7$$
\"3[mmmT&phN)FeyF]z7$$\"3BLLe*=)H\\5!#=F`z7$$\"3fmm\"z/3uC\"FbzFdz7$$
\"3%)***\\7LRDX\"FbzFgz7$$\"3]mm\"zR'ok;FbzFjz7$$\"3v***\\i5`h(=FbzF][
l7$$\"3WLLL3En$4#FbzF`[l7$$\"3pmm;/RE&G#FbzFc[l7$$\"3\")*****\\K]4]#Fb
zFf[l7$$\"3$******\\PAvr#FbzFi[l7$$\"3)******\\nHi#HFbzF\\\\l7$$\"3jmm
\"z*ev:JFbzF_\\l7$$\"3?LLL347TLFbzFb\\l7$$\"3+LLLLY.KNFbzFe\\l7$$\"3v*
**\\7o7Tv$FbzFh\\l7$$\"3&GLLLQ*o]RFbzF[]l7$$\"3@++D\"=lj;%FbzF^]l7$$\"
31++vV&R<P%FbzFa]l7$$\"3WLL$e9Ege%FbzFd]l7$$\"3GLLeR\"3Gy%FbzFg]l7$$\"
3cmm;/T1&*\\FbzFj]l7$$\"3%em;zRQb@&FbzF]^l7$$\"3[***\\(=>Y2aFbzF`^l7$$
\"39mm;zXu9cFbzFc^l7$$\"3k******\\y))GeFbzFf^l7$$\"3'*)***\\i_QQgFbzFi
^l7$$\"3@***\\7y%3TiFbzF\\_l7$$\"35****\\P![hY'FbzF__l7$$\"3jKLL$Qx$om
FbzFb_l7$$\"3!)*****\\P+V)oFbzFe_l7$$\"3?mm\"zpe*zqFbzFh_l7$$\"3%)****
*\\#\\'QH(FbzF[`l7$$\"3GKLe9S8&\\(FbzF^`l7$$\"3R***\\i?=bq(FbzFa`l7$$
\"3\"HLL$3s?6zFbzFd`l7$$\"3a***\\7`Wl7)FbzFg`l7$$\"3#pmmm'*RRL)FbzFj`l
7$$\"3Qmm;a<.Y&)FbzF]al7$$\"3<LLe9tOc()FbzF`al7$$\"3t******\\Qk\\*)Fbz
Fcal7$$\"3CLL$3dg6<*FbzFfal7$$\"3HmmmmxGp$*FbzFial7$$\"3A++D\"oK0e*Fbz
F\\bl7$$\"3A++v=5s#y*FbzF_bl7$$F)F,Fbbl-Fdx6&FfxF+F+Fgx-F$6$7SFay7$Fcy
$\"3>![\"R7\\f:$)Fey7$Fgy$\"3kT#=VZW\\_\"Fbz7$Fjy$\"3Eyz-L1@rAFbz7$F]z
$\"3m'fa0S'e')HFbz7$F`z$\"3a$[;+`iGm$Fbz7$Fdz$\"3hk@0?4/eUFbz7$Fgz$\"3
K-?V$*Q0U[Fbz7$Fjz$\"3^!eX&Qk^6aFbz7$F][l$\"3Q/$>zU;U%fFbz7$F`[l$\"3VJ
Z0E=xbkFbz7$Fc[l$\"3SS?p#4\"yvoFbz7$Ff[l$\"3gLT`\"y_VJ(Fbz7$Fi[l$\"3<+
gj(R:#=xFbz7$F\\\\l$\"3ui#o#*)ezs!)Fbz7$F_\\l$\"3;F!oQU``O)Fbz7$Fb\\l$
\"3Cf,5ioww')Fbz7$Fe\\l$\"3V2U3'H!e4*)Fbz7$Fh\\l$\"3q&R,xEGY9*Fbz7$F[]
l$\"3zUFg>%*e?$*Fbz7$F^]l$\"3)[Q(pl1(*y%*Fbz7$Fa]l$\"3/\"*QlJE1'f*Fbz7
$Fd]l$\"3S&*eu-S;$o*Fbz7$Fg]l$\"3E6)\\8!GgJ(*Fbz7$Fj]l$\"3l0OS)\\!**\\
(*Fbz7$F]^l$\"3_r\">w%=)=t*Fbz7$F`^l$\"3KU(fg;]_o*Fbz7$Fc^l$\"3BF-$*\\
Zh-'*Fbz7$Ff^l$\"3IEx_B&[?[*Fbz7$Fi^l$\"3'[*G=e[[H$*Fbz7$F\\_l$\"3zgBk
SjG\\\"*Fbz7$F__l$\"3N6E`t)f;\"*)Fbz7$Fb_l$\"3S5\\k$fTWm)Fbz7$Fe_l$\"3
)e>Uxrq_O)Fbz7$Fh_l$\"3y9Z$y+rF1)Fbz7$F[`l$\"37]LGX;*yp(Fbz7$F^`l$\"3l
7]@P%z>K(Fbz7$Fa`l$\"3M;M!>ym_*oFbz7$Fd`l$\"39Px:5.qWkFbz7$Fg`l$\"3[!=
.Z_Sw$fFbz7$Fj`l$\"3jQ%ykF*3:aFbz7$F]al$\"3p_ARJp+Y[Fbz7$F`al$\"3h*p#>
$z%)pC%Fbz7$Fcal$\"3***H\"o[A7mOFbz7$Ffal$\"3+$)o+-ObkHFbz7$Fial$\"3'f
B-2_OYI#Fbz7$F\\bl$\"3sm-%)Q4In:Fbz7$F_bl$\"3.Xrah1w*G)Fey7$FbblF+Fcbl
-%+AXESLABELSG6$Q\"x6\"Q!Fj[m-%%VIEWG6$;F+Fbbl%(DEFAULTG" 1 2 0 1 10 
0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curv
e 3" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "cobweb(f,0..1,0.1,1
000,skip=800);\n" }}{PARA 13 "" 1 "" {GLPLOT2D 350 350 350 {PLOTDATA 
2 "6'-%'CURVESG6$7S7$$\"\"!F)F(7$$\"3dmmm;arz@!#>F+7$$\"3[LL$e9ui2%F-F
/7$$\"3nmmm\"z_\"4iF-F27$$\"3[mmmT&phN)F-F57$$\"3BLLe*=)H\\5!#=F87$$\"
3fmm\"z/3uC\"F:F<7$$\"3%)***\\7LRDX\"F:F?7$$\"3]mm\"zR'ok;F:FB7$$\"3v*
**\\i5`h(=F:FE7$$\"3WLLL3En$4#F:FH7$$\"3pmm;/RE&G#F:FK7$$\"3\")*****\\
K]4]#F:FN7$$\"3$******\\PAvr#F:FQ7$$\"3)******\\nHi#HF:FT7$$\"3jmm\"z*
ev:JF:FW7$$\"3?LLL347TLF:FZ7$$\"3+LLLLY.KNF:Fgn7$$\"3v***\\7o7Tv$F:Fjn
7$$\"3&GLLLQ*o]RF:F]o7$$\"3@++D\"=lj;%F:F`o7$$\"31++vV&R<P%F:Fco7$$\"3
WLL$e9Ege%F:Ffo7$$\"3GLLeR\"3Gy%F:Fio7$$\"3cmm;/T1&*\\F:F\\p7$$\"3%em;
zRQb@&F:F_p7$$\"3[***\\(=>Y2aF:Fbp7$$\"39mm;zXu9cF:Fep7$$\"3k******\\y
))GeF:Fhp7$$\"3'*)***\\i_QQgF:F[q7$$\"3@***\\7y%3TiF:F^q7$$\"35****\\P
![hY'F:Faq7$$\"3jKLL$Qx$omF:Fdq7$$\"3!)*****\\P+V)oF:Fgq7$$\"3?mm\"zpe
*zqF:Fjq7$$\"3%)*****\\#\\'QH(F:F]r7$$\"3GKLe9S8&\\(F:F`r7$$\"3R***\\i
?=bq(F:Fcr7$$\"3\"HLL$3s?6zF:Ffr7$$\"3a***\\7`Wl7)F:Fir7$$\"3#pmmm'*RR
L)F:F\\s7$$\"3Qmm;a<.Y&)F:F_s7$$\"3<LLe9tOc()F:Fbs7$$\"3t******\\Qk\\*
)F:Fes7$$\"3CLL$3dg6<*F:Fhs7$$\"3HmmmmxGp$*F:F[t7$$\"3A++D\"oK0e*F:F^t
7$$\"3A++v=5s#y*F:Fat7$$\"\"\"F)Fdt-%'COLOURG6&%$RGBGF(F($\"*++++\"!\"
)-F$6$7SF'7$F+$\"3>![\"R7\\f:$)F-7$F/$\"3kT#=VZW\\_\"F:7$F2$\"3Eyz-L1@
rAF:7$F5$\"3m'fa0S'e')HF:7$F8$\"3a$[;+`iGm$F:7$F<$\"3hk@0?4/eUF:7$F?$
\"3K-?V$*Q0U[F:7$FB$\"3^!eX&Qk^6aF:7$FE$\"3Q/$>zU;U%fF:7$FH$\"3VJZ0E=x
bkF:7$FK$\"3SS?p#4\"yvoF:7$FN$\"3gLT`\"y_VJ(F:7$FQ$\"3<+gj(R:#=xF:7$FT
$\"3ui#o#*)ezs!)F:7$FW$\"3;F!oQU``O)F:7$FZ$\"3Cf,5ioww')F:7$Fgn$\"3V2U
3'H!e4*)F:7$Fjn$\"3q&R,xEGY9*F:7$F]o$\"3zUFg>%*e?$*F:7$F`o$\"3)[Q(pl1(
*y%*F:7$Fco$\"3/\"*QlJE1'f*F:7$Ffo$\"3S&*eu-S;$o*F:7$Fio$\"3E6)\\8!GgJ
(*F:7$F\\p$\"3l0OS)\\!**\\(*F:7$F_p$\"3_r\">w%=)=t*F:7$Fbp$\"3KU(fg;]_
o*F:7$Fep$\"3BF-$*\\Zh-'*F:7$Fhp$\"3IEx_B&[?[*F:7$F[q$\"3'[*G=e[[H$*F:
7$F^q$\"3zgBkSjG\\\"*F:7$Faq$\"3N6E`t)f;\"*)F:7$Fdq$\"3S5\\k$fTWm)F:7$
Fgq$\"3)e>Uxrq_O)F:7$Fjq$\"3y9Z$y+rF1)F:7$F]r$\"37]LGX;*yp(F:7$F`r$\"3
l7]@P%z>K(F:7$Fcr$\"3M;M!>ym_*oF:7$Ffr$\"39Px:5.qWkF:7$Fir$\"3[!=.Z_Sw
$fF:7$F\\s$\"3jQ%ykF*3:aF:7$F_s$\"3p_ARJp+Y[F:7$Fbs$\"3h*p#>$z%)pC%F:7
$Fes$\"3***H\"o[A7mOF:7$Fhs$\"3+$)o+-ObkHF:7$F[t$\"3'fB-2_OYI#F:7$F^t$
\"3sm-%)Q4In:F:7$Fat$\"3.Xrah1w*G)F-7$FdtF(Fft-F$6%7]dl7$$\"+\")*zDW&!
#5F(7$Fb^l$\"+czgt'*Fd^l7$Ff^lFf^l7$Ff^l$\"+$e\"QJ7Fd^l7$Fj^lFj^l7$Fj^
l$\"+R4.6UFd^l7$F^_lF^_l7$F^_l$\"+\\eB2&*Fd^l7$Fb_lFb_l7$Fb_l$\"+^<3F=
Fd^l7$Ff_lFf_l7$Ff_l$\"+;+rBeFd^l7$Fj_lFj_l7$Fj_l$\"+0dQ&[*Fd^l7$F^`lF
^`l7$F^`l$\"+!)Gr.>Fd^l7$Fb`lFb`l7$Fb`l$\"+oB26gFd^l7$Ff`lFf`l7$Ff`l$
\"+UdJ^$*Fd^l7$Fj`lFj`l7$Fj`l$\"+7+wlBFd^l7$F^alF^al7$F^al$\"+ySqVqFd^
l7$FbalFbal7$Fbal$\"+>n2@\")Fd^l7$FfalFfal7$Ffal$\"+WK'4&fFd^l7$FjalFj
al7$Fjal$\"+u3J(R*Fd^l7$F^blF^bl7$F^bl$\"+gi#)3AFd^l7$FbblFbbl7$Fbbl$
\"+qhk6nFd^l7$FfblFfbl7$Ffbl$\"+\"G/ug)Fd^l7$FjblFjbl7$Fjbl$\"+)R(yuYF
d^l7$F^clF^cl7$F^cl$\"+PBv3(*Fd^l7$FbclFbcl7$Fbcl$\"+dSy-6Fd^l7$FfclFf
cl7$Ffcl$\"+ygcEQFd^l7$FjclFjcl7$Fjcl$\"+,1*H@*Fd^l7$F^dlF^dl7$F^dl$\"
+wpxFGFd^l7$FbdlFbdl7$Fbdl$\"+&Qk(4zFd^l7$FfdlFfdl7$Ffdl$\"+xd(zW'Fd^l
7$FjdlFjdl7$Fjdl$\"+)z7B$*)Fd^l7$F^elF^el7$F^el$\"+jsR>PFd^l7$FbelFbel
7$Fbel$\"+)3A/6*Fd^l7$FfelFfel7$Ffel$\"+,ysgJFd^l7$FjelFjel7$Fjel$\"+J
.mI%)Fd^l7$F^flF^fl7$F^fl$\"+!=A*f^Fd^l7$FbflFbfl7$Fbfl$\"+4d-S(*Fd^l7
$FfflFffl7$Fffl$\"+'[4a()*!#67$FjflFjfl7$Fjfl$\"+@s1rMFd^l7$F_glF_gl7$
F_gl$\"+w@KQ))Fd^l7$FcglFcgl7$Fcgl$\"+@.C/SFd^l7$FgglFggl7$Fggl$\"+P/I
j$*Fd^l7$F[hlF[hl7$F[hl$\"+Dw-DBFd^l7$F_hlF_hl7$F_hl$\"+!*QOfpFd^l7$Fc
hlFchl7$Fchl$\"+F$[FD)Fd^l7$FghlFghl7$Fghl$\"+Y]lBcFd^l7$F[ilF[il7$F[i
l$\"+57J)f*Fd^l7$F_ilF_il7$F_il$\"+m#eO]\"Fd^l7$FcilFcil7$Fcil$\"+Z=[#
)\\Fd^l7$FgilFgil7$Fgil$\"+8.))\\(*Fd^l7$F[jlF[jl7$F[jl$\"+ZVo5&*F\\gl
7$F_jlF_jl7$F_jl$\"+S(*RcLFd^l7$FcjlFcjl7$Fcjl$\"+&\\Xkp)Fd^l7$FgjlFgj
l7$Fgjl$\"+uL:@WFd^l7$F[[mF[[m7$F[[m$\"+o_K>'*Fd^l7$F_[mF_[m7$F_[m$\"+
(G:\"G9Fd^l7$Fc[mFc[m7$Fc[m$\"+V%RUx%Fd^l7$Fg[mFg[m7$Fg[m$\"+[D7I(*Fd^
l7$F[\\mF[\\m7$F[\\m$\"+mo6C5Fd^l7$F_\\mF_\\m7$F_\\m$\"+*y<]e$Fd^l7$Fc
\\mFc\\m7$Fc\\m$\"+&)=:p*)Fd^l7$Fg\\mFg\\m7$Fg\\m$\"+#*\\(eg$Fd^l7$F[]
mF[]m7$F[]m$\"+J?+#**)Fd^l7$F_]mF_]m7$F_]m$\"+;(G\\`$Fd^l7$Fc]mFc]m7$F
c]m$\"+!z!*G\"*)Fd^l7$Fg]mFg]m7$Fg]m$\"+49#)yPFd^l7$F[^mF[^m7$F[^m$\"+
9>So\"*Fd^l7$F_^mF_^m7$F_^m$\"+Qf_tHFd^l7$Fc^mFc^m7$Fc^m$\"+BrU[\")Fd^
l7$Fg^mFg^m7$Fg^m$\"+%f)3%)eFd^l7$F[_mF[_m7$F[_m$\"+r5<X%*Fd^l7$F__mF_
_m7$F__m$\"+=rxV?Fd^l7$Fc_mFc_m7$Fc_m$\"+Y5pTjFd^l7$Fg_mFg_m7$Fg_m$\"+
/u%z/*Fd^l7$F[`mF[`m7$F[`m$\"+3v]fLFd^l7$F_`mF_`m7$F_`m$\"+4fU+()Fd^l7
$Fc`mFc`m7$Fc`m$\"+d2n4WFd^l7$Fg`mFg`m7$Fg`m$\"+R%*39'*Fd^l7$F[amF[am7
$F[am$\"+t'ppW\"Fd^l7$F_amF_am7$F_am$\"+V/jE[Fd^l7$FcamFcam7$Fcam$\"+q
xFQ(*Fd^l7$FgamFgam7$Fgam$\"+>F-S**F\\gl7$F[bmF[bm7$F[bm$\"+fIF\"\\$Fd
^l7$F_bmF_bm7$F_bm$\"+x(fA'))Fd^l7$FcbmFcbm7$Fcbm$\"+s-NKRFd^l7$FgbmFg
bm7$Fgbm$\"+#Q[aI*Fd^l7$F[cmF[cm7$F[cm$\"+]Xh?DFd^l7$F_cmF_cm7$F_cm$\"
+QE`_tFd^l7$FccmFccm7$Fccm$\"+t,e\"f(Fd^l7$FgcmFgcm7$Fgcm$\"+gxkIrFd^l
7$F[dmF[dm7$F[dm$\"+ZE`zzFd^l7$F_dmF_dm7$F_dm$\"+H-t(G'Fd^l7$FcdmFcdm7
$Fcdm$\"+LGG.\"*Fd^l7$FgdmFgdm7$Fgdm$\"+(H(f$=$Fd^l7$F[emF[em7$F[em$\"
+xcEj%)Fd^l7$F_emF_em7$F_em$\"+K%eA2&Fd^l7$FcemFcem7$Fcem$\"+)pjzu*Fd^
l7$FgemFgem7$Fgem$\"+<)y;e*F\\gl7$F[fmF[fm7$F[fm$\"+?8!)yLFd^l7$F_fmF_
fm7$F_fm$\"+*yo\\s)Fd^l7$FcfmFcfm7$Fcfm$\"+MpfQVFd^l7$FgfmFgfm7$Fgfm$
\"+KHRz&*Fd^l7$F[gmF[gm7$F[gm$\"+YDPr:Fd^l7$F_gmF_gm7$F_gm$\"+v.Ol^Fd^
l7$FcgmFcgm7$Fcgm$\"+=eLR(*Fd^l7$FggmFggm7$Fggm$\"+;W\"4!**F\\gl7$F[hm
F[hm7$F[hm$\"+2q/zMFd^l7$F_hmF_hm7$F_hm$\"+zP\"y%))Fd^l7$FchmFchm7$Fch
m$\"+e$)yvRFd^l7$FghmFghm7$Fghm$\"+-j)3M*Fd^l7$F[imF[im7$F[im$\"+%Q:6S
#Fd^l7$F_imF_im7$F_im$\"+9:'e6(Fd^l7$FcimFcim7$Fcim$\"+?2-/!)Fd^l7$Fgi
mFgim7$Fgim$\"+6_eIiFd^l7$F[jmF[jm7$F[jm$\"+9uSf\"*Fd^l7$F_jmF_jm7$F_j
m$\"+'oQF+$Fd^l7$FcjmFcjm7$Fcjm$\"+G%pU>)Fd^l7$FgjmFgjm7$Fgjm$\"++2pqd
Fd^l7$F[[nF[[n7$F[[n$\"+!)RN=&*Fd^l7$F_[nF_[n7$F_[n$\"+^h%zy\"Fd^l7$Fc
[nFc[n7$Fc[n$\"+GpDEdFd^l7$Fg[nFg[n7$Fg[n$\"+T[HW&*Fd^l7$F[\\nF[\\n7$F
[\\n$\"+:*fip\"Fd^l7$F_\\nF_\\n7$F_\\n$\"+lvE$\\&Fd^l7$Fc\\nFc\\n7$Fc
\\n$\"+rz5b'*Fd^l7$Fg\\nFg\\n7$Fg\\n$\"+9#)o)H\"Fd^l7$F[]nF[]n7$F[]n$
\"+:N62WFd^l7$F_]nF_]n7$F_]n$\"+\"R4Hh*Fd^l7$Fc]nFc]n7$Fc]n$\"+5h@^9Fd
^l7$Fg]nFg]n7$Fg]n$\"+K=RQ[Fd^l7$F[^nF[^n7$F[^n$\"+!H9)R(*Fd^l7$F_^nF_
^n7$F_^n$\"+NfA$))*F\\gl7$Fc^nFc^n7$Fc^n$\"+6L^tMFd^l7$Fg^nFg^n7$Fg^n$
\"+qpBT))Fd^l7$F[_nF[_n7$F[_n$\"+I/^&*RFd^l7$F__nF__n7$F__n$\"+w-\\c$*
Fd^l7$Fc_nFc_n7$Fc_n$\"+mq=[BFd^l7$Fg_nFg_n7$Fg_n$\"+$Qwu+(Fd^l7$F[`nF
[`n7$F[`n$\"+U]Jy\")Fd^l7$F_`nF_`n7$F_`n$\"+iAM5eFd^l7$Fc`nFc`n7$Fc`n$
\"+7Z!R\\*Fd^l7$Fg`nFg`n7$Fg`n$\"+s*zQ(=Fd^l7$F[anF[an7$F[an$\"+$pv'Qf
Fd^l7$F_anF_an7$F_an$\"+(HmjS*Fd^l7$FcanFcan7$Fcan$\"+i]tx@Fd^l7$FganF
gan7$Fgan$\"+U+eVmFd^l7$F[bnF[bn7$F[bn$\"+59Z'p)Fd^l7$F_bnF_bn7$F_bn$
\"+b'y5U%Fd^l7$FcbnFcbn7$Fcbn$\"+F:H>'*Fd^l7$FgbnFgbn7$Fgbn$\"+eoBG9Fd
^l7$F[cnF[cn7$F[cn$\"+U\"yXx%Fd^l7$F_cnF_cn7$F_cn$\"+V@=I(*Fd^l7$FccnF
ccn7$Fccn$\"+*)p*Q-\"Fd^l7$FgcnFgcn7$Fgcn$\"+!*eL%e$Fd^l7$F[dnF[dn7$F[
dn$\"+*4*Ro*)Fd^l7$F_dnF_dn7$F_dn$\"+^`?3OFd^l7$FcdnFcdn7$Fcdn$\"+')R`
%**)Fd^l7$FgdnFgdn7$Fgdn$\"+7B/FNFd^l7$F[enF[en7$F[en$\"+0V&Q!*)Fd^l7$
F_enF_en7$F_en$\"+6%pj!QFd^l7$FcenFcen7$Fcen$\"+XfM%>*Fd^l7$FgenFgen7$
Fgen$\"+<-\"*))GFd^l7$F[fnF[fn7$F[fn$\"+vp)=,)Fd^l7$F_fnF_fn7$F_fn$\"+
r$H@@'Fd^l7$FcfnFcfn7$Fcfn$\"+K&*)p<*Fd^l7$FgfnFgfn7$Fgfn$\"+&zvb%HFd^
l7$F[gnF[gn7$F[gn$\"+iI%R5)Fd^l7$F_gnF_gn7$F_gn$\"+7'fD*fFd^l7$FcgnFcg
n7$Fcgn$\"+9>yl$*Fd^l7$FggnFggn7$Fggn$\"+H)zlJ#Fd^l7$F[hnF[hn7$F[hn$\"
+7*4<%pFd^l7$F_hnF_hn7$F_hn$\"+Augz#)Fd^l7$FchnFchn7$Fchn$\"+7$G_b&Fd^
l7$FghnFghn7$Fghn$\"+&Rr(H'*Fd^l7$F[inF[in7$F[in$\"+kXV!R\"Fd^l7$F_inF
_in7$F_in$\"+sXqoYFd^l7$FcinFcin7$Fcin$\"+-\\>2(*Fd^l7$FginFgin7$Fgin$
\"++L]36Fd^l7$F[jnF[jn7$F[jn$\"+R)QR%QFd^l7$F_jnF_jn7$F_jn$\"+5QxG#*Fd
^l7$FcjnFcjn7$Fcjn$\"+0T\"ex#Fd^l7$FgjnFgjn7$Fgjn$\"+r)o1#yFd^l7$F[[oF
[[o7$F[[o$\"+yD4ZmFd^l7$F_[oF_[o7$F_[o$\"+aN'>p)Fd^l7$Fc[oFc[o7$Fc[o$
\"+&*z1MWFd^l7$Fg[oFg[o7$Fg[o$\"+w64D'*Fd^l7$F[\\oF[\\o7$F[\\o$\"+HtK2
9Fd^l7$F_\\oF_\\o7$F_\\o$\"+,U:;ZFd^l7$Fc\\oFc\\o7$Fc\\o$\"+2$y&=(*Fd^
l7$Fg\\oFg\\o7$Fg\\o$\"+<tlm5Fd^l7$F[]oF[]o7$F[]o$\"+#)zB;PFd^l7$F_]oF
_]o7$F_]o$\"+#[is5*Fd^l7$Fc]oFc]o7$Fc]o$\"+8S&3<$Fd^l7$Fg]oFg]o7$Fg]o$
\"+Lx9X%)Fd^l7$F[^oF[^o7$F[^o$\"+oK2@^Fd^l7$F_^oF_^o7$F_^o$\"+&4$GW(*F
d^l7$Fc^oFc^o7$Fc^o$\"+mQ$zr*F\\gl7$Fg^oFg^o7$Fg^o$\"+x]o@MFd^l7$F[_oF
[_o7$F[_o$\"+\"ez%y()Fd^l7$F__oF__o7$F__o$\"+-f+#=%Fd^l7$Fc_oFc_o7$Fc_
o$\"+2a/*[*Fd^l7$Fg_oFg_o7$Fg_o$\"+?Q!4*=Fd^l7$F[`oF[`o7$F[`o$\"+oJ2!)
fFd^l7$F_`oF_`o7$F_`o$\"+q!)Qv$*Fd^l7$Fc`oFc`o-Fgt6&FitFjtF(F(-%&STYLE
G6#%%LINEG-%+AXESLABELSG6$Q\"x6\"Q!F`ao-%%VIEWG6$;F(Fdt%(DEFAULTG" 1 
2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve
 2" "Curve 3" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 97 "The above is a p
icture of chaos.  To see it more clearly, we run an iteration plot sta
rting with " }{XPPEDIT 18 0 "x[0] = .10000;" "6#/&%\"xG6#\"\"!-%&Float
G6$\"&++\"!\"&" }{TEXT -1 17 " in red and then " }{XPPEDIT 18 0 "x[0] \+
= .10001;" "6#/&%\"xG6#\"\"!-%&FloatG6$\"&,+\"!\"&" }{TEXT -1 254 " in
 blue.  Since the initial points are almost the same, the first few it
erations show the red point on top of the blue point.  But by iteratio
n 10, the points are no longer visibly the same, and after that the tw
o iterations become completely different." }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 111 "i1 := iterplot(f,0.10000,30,color='red'):\ni2 := i
terplot(f,0.10001,30,color='blue'):\nplots[display](\{i1,i2\});\n\n" }
}{PARA 13 "" 1 "" {GLPLOT2D 350 350 350 {PLOTDATA 2 "6$-%'POINTSG6C7$$
\"\"!F($\"&++\"!\"&7$$\"\"\"F($\"++++5N!#57$$\"\"#F($\"++5;%)))F17$$\"
\"$F($\"+(R%=mQF17$$\"\"%F($\"+^-k[#*F17$$\"\"&F($\"+Z=85FF17$$\"\"'F(
$\"+'\\O]q(F17$$\"\"(F($\"+YKG'*oF17$$\"\")F($\"+UGgZ$)F17$$\"\"*F($\"
+Kl[z`F17$$\"#5F($\"+(3OQp*F17$$\"#6F($\"+(3#[d6F17$$\"#7F($\"+u=n\"*R
F17$$\"#8F($\"+8qZ`$*F17$$\"#9F($\"+!yA%eBF17$$\"#:F($\"+=sgGqF17$$\"#
;F($\"+uN0X\")F17$$\"#<F($\"+F)oB*eF17$$\"#=F($\"+uVVR%*F17$$\"#>F($\"
+^Zlj?F17$$\"#?F($\"+m=P(Q'F17$$\"#@F($\"+IxK***)F17$$\"#AF($\"+1t47NF
17$$\"#BF($\"+rnf')))F17$$\"#CF($\"+hD!)eQF17$$\"#DF($\"+z14U#*F17$$\"
#EF($\"+-+#=t#F17$$\"#FF($\"+0-fVxF17$$\"#GF($\"+()zN9oF17$$\"#HF($\"+
()4;m%)F17$$\"#IF($\"+DRVk]F1-%'COLOURG6&%$RGBG$\"*++++\"!\")F'F'-%'SY
MBOLG6#%'CIRCLEG-F$6C7$F'$\"&,+\"F+7$F-$\"+'*>J5NF17$F3$\"+hN_%)))F17$
F8$\"+:f3lQF17$F=$\"+4$owC*F17$FB$\"+OCN8FF17$FG$\"+QZy5xF17$FL$\"+\")
>9%)oF17$FQ$\"+4N]l$)F17$FV$\"+#f?EL&F17$Fen$\"+#y^oq*F17$Fjn$\"+eIw46
F17$F_o$\"+\\?wZQF17$Fdo$\"+/c@K#*F17$Fio$\"+ApXkFF17$F^p$\"+!R:4!yF17
$Fcp$\"+h/S!p'F17$Fhp$\"+]IfN')F17$F]q$\"+R1;&f%F17$Fbq$\"+&)43'o*F17$
Fgq$\"+^:&e=\"F17$F\\r$\"+GfQwSF17$Far$\"+[aI<%*F17$Ffr$\"+144S@F17$F[
s$\"+!ze,c'F17$F`s$\"+uFq+))F17$Fes$\"+&y;j6%F17$Fjs$\"+]0XX%*F17$F_t$
\"+p!3G/#F17$Fdt$\"+%>c%RjF17$Fit$\"+sUG]!*F1-F^u6&F`uF'F'FauFdu" 1 2 
0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2
" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "3 0 0" 0 }{VIEWOPTS 1 1 0 1 1 
1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }