{VERSION 5 0 "IBM INTEL LINUX" "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 }{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 "Maple P
lot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 
0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "
" 0 "" {TEXT -1 198 "This worksheet iterates the function  f(x)=rx(1-x
).  \nIt plots the graph of the n-th iterate of  f  on the interval  [
a,b].\nSo if  n=4,  then we plot the graph of  f  composed with itself
 4 times.  " }}{PARA 0 "" 0 "" {TEXT -1 138 "It also allows plot the g
raphical representation of iterates of f^n for \nthe initial condition
  x0.  (The process  g  is the power  f^n.) " }}{PARA 0 "" 0 "" {TEXT 
-1 70 "The first n*n0 iterates of f are taken without plotting, then t
he next" }}{PARA 0 "" 0 "" {TEXT -1 182 "n1 iterates of f^n are plotte
d.  If  n0 or n1 =0 then this is not done.\n  n  iter of f plotted\n  \+
x0  initial condition\n  n0 number of iterates of  x0  taken  by f^n  \+
without plotting" }}{PARA 0 "" 0 "" {TEXT -1 63 "  n1 number of iterat
es of  x0  taken  by f^n which are plotted" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 12 "with(plots):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 70 "r  := 4.0:\nn  := 3:\nn0 := 0:\nn1 := 0:\na  := 0.0:\nb  := 1.
0:\nx0 := 0.1:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "f := x ->
 r*x*(1-x):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 94 "g := proc(x)
\n  local y,i :\n  y := x:  \n  for i from 1 to n do\n      y := f(y):
\n  od:\n  y;\nend:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 175 "pic
 := \{plot(g(x),x=a..b, resolution = 2000,thickness=3,\n      color=bl
ack,tickmarks=[2,3])\}:\npic := pic union \{plot(x,x=a..b,thickness=3,
\n      color=black,tickmarks=[2,3])\}:" }}{PARA 0 "> " 0 "" {MPLTEXT 
1 0 61 "for i from 1 to n0 do\n        x1:= g(x0):\n        x0:=x1:\no
d:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 146 "for i from 1 to n1 do\n     \+
   x1:= g(x0):\n        pic := pic union            \{plot([[x0,x0],[x
0,x1],[x1,x1]], color = blue)\}:\n        x0:=x1:\nod:" }}{PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 13 "display(pic);" }}{PARA 13 "" 1 "" {GLPLOT2D 
400 300 300 {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$$\"3gmm\"z/3uC\"F:F<7$$\"3%)***\\7LRDX\"F:F?7$$\"3^
mm\"zR'ok;F:FB7$$\"3w***\\i5`h(=F:FE7$$\"3YLLL3En$4#F:FH7$$\"3qmm;/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:Fjn7$$\"3'GLLLQ*o]RF:F]o7$$\"3A++D\"=lj;%F:F`o7$$\"
31++vV&R<P%F:Fco7$$\"3XLL$e9Ege%F:Ffo7$$\"3HLLeR\"3Gy%F:Fio7$$\"3emm;/
T1&*\\F:F\\p7$$\"3&em;zRQb@&F:F_p7$$\"3\\***\\(=>Y2aF:Fbp7$$\"39mm;zXu
9cF:Fep7$$\"3l******\\y))GeF:Fhp7$$\"3'*)***\\i_QQgF:F[q7$$\"3@***\\7y
%3TiF:F^q7$$\"36****\\P![hY'F:Faq7$$\"3jKLL$Qx$omF:Fdq7$$\"3!)*****\\P
+V)oF:Fgq7$$\"3?mm\"zpe*zqF:Fjq7$$\"3%)*****\\#\\'QH(F:F]r7$$\"3GKLe9S
8&\\(F:F`r7$$\"3R***\\i?=bq(F:Fcr7$$\"3\"HLL$3s?6zF:Ffr7$$\"3a***\\7`W
l7)F:Fir7$$\"3#pmmm'*RRL)F:F\\s7$$\"3Qmm;a<.Y&)F:F_s7$$\"3<LLe9tOc()F:
Fbs7$$\"3t******\\Qk\\*)F:Fes7$$\"3DLL$3dg6<*F:Fhs7$$\"3HmmmmxGp$*F:F[
t7$$\"3B++D\"oK0e*F:F^t7$$\"3B++v=5s#y*F:Fat7$$\"\"\"F)Fdt-%'COLOURG6&
%$RGBGF)F)F)-%*THICKNESSG6#\"\"$-F$6%7]xF'7$$\"3hmmTN@Ki8!#?$\"3P[BS#z
H@Z)F-7$$\"3@LL$3FWYs#Fdu$\"3Zvk!3k\\hk\"F:7$$\"3#)***\\iSmp3%Fdu$\"3+
/<GN$*Q)R#F:7$$\"3VmmmT&)G\\aFdu$\"3R9,5*\\xa5$F:7$$\"3/LL3x1h6oFdu$\"
3LUJ!)\\h#*oPF:7$$\"3l****\\7G$R<)Fdu$\"3WK(zkP9-R%F:7$$\"3Dmm\"z%\\DO
&*Fdu$\"3u_$>a#))yq\\F:7$$\"3HLLL3x&)*3\"F-$\"3!)eh+\"=k?^&F:7$$\"3gmm
TN@Ki8F-$\"3Xz4T#R>A['F:7$$\"3$*****\\ilyM;F-$\"3(e_[XAw8J(F:7$$\"3DLL
e*)4D2>F-$\"32tGq)[\\(4!)F:7$F+$\"3H-:Mhr3(e)F:7$$\"3IL$e*)4bQl#F-$\"3
D'*[.xodI$*F:7$$\"3-++D\"y%*z7$F-$\"3un\")oi%=8y*F:7$$\"3.LeRAY1lLF-$
\"3qGh%3%=>5**F:7$$\"3vm;ajW8-OF-$\"39E:Q62O\")**F:7$$\"3ND\"GQ#>ShOF-
$\"3aNsy&f\"p!***F:7$$\"3D$e9TQp1s$F-$\"3!e')R'[<y'***F:7$$\"3'=/,W%o$
*zPF-$\"3s+#[^i,(****F:7$$\"3Y+vo/V?RQF-$\"3WT&\\S'3_****F:7$$\"3OeR(
\\wr%)*QF-$\"3)G3!e$H3j***F:7$$\"3'pTg_ARx&RF-$\"3![C<u$>8!***F:7$$\"3
dvoa&o1q,%F-$\"38uSf?!f5)**F:7$F/$\"3EndQvf:p**F:7$$\"3xm;H2Q\\4YF-$\"
3$>m[1)=OX(*F:7$$\"32++voMrU^F-$\"3=E$*yNiUU$*F:7$$\"3PL$3-8Lfn&F-$\"3
,*z:TM51!))F:7$F2$\"3Oy7![!Grb\")F:7$$\"3$fmm\"zp!fu'F-$\"3Gl\"*>gVXMu
F:7$$\"3emmmm6m#G(F-$\"3)fV$z>#H\"pmF:7$$\"3Anm;a`T>yF-$\"3!)=[j!)))Q%
)eF:7$F5$\"3Kr,)Q%p[,^F:7$$\"3GL$3-js.*))F-$\"3EV$3Pt'4UVF:7$$\"36++v=
ddC%*F-$\"3myFD&o.vh$F:7$$\"3al;H2)y(e**F-$\"3>GLh\"pQ,%HF:7$F8$\"3Gl!
)34)e+K#F:7$$\"3&)***\\(=JN[6F:$\"3lG'4`dpsM\"F:7$F<$\"3E&og)3'HRI'F-7
$$\"3%)***\\(o3p)H\"F:$\"3#H[te__0l$F-7$$\"33LLe*ot*\\8F:$\"3,&*R]1'f^
s\"F-7$$\"3q*******4:cP\"F:$\"3*f@4bcmL.\"F-7$$\"3KmmT5lD,9F:$\"3O]J.
\\SC*>&Fdu7$$\"3x**\\i:s299F:$\"3%[q(pztt$H$Fdu7$$\"3ALL$3#z*oU\"F:$\"
3P]72'Qk\\#=Fdu7$$\"3nm;/E'=(R9F:$\"3c-'QVX0E*y!#@7$F?$\"35$)RP9T$o#=F
gbl7$$\"3,LL3F*o\"f9F:$\"3sYLAW\"Gqf$!#A7$$\"3Xmm\"H_)zl9F:$\"3U)*=on;
hrA!#B7$$\"3!****\\(=\"GCZ\"F:$\"3c,*>?!R)f4)F`cl7$$\"3OLLe9x0z9F:$\"3
$)\\]7&o'*Qr#Fgbl7$$\"3'****\\i!pJ#\\\"F:$\"33$>1U:k![)*Fgbl7$$\"3emm
\"z4wb]\"F:$\"3h?!)RJ#=q8#Fdu7$$\"3\")***\\7[%4K:F:$\"3T\">H>m;Xt&Fdu7
$$\"3/LLekGhe:F:$\"3<_FRfB[,6F-7$$\"3x***\\7j\\;h\"F:$\"3WAu3W+'4k#F-7
$FB$\"3dy95u-8'y%F-7$$\"38LL3_(>/x\"F:$\"3,x2A!)Qmm5F:7$FE$\"39\\O()pM
gJ=F:7$$\"3KL3x\")H`I>F:$\"3%)pY&f/@)yAF:7$$\"3hm;HdG\"\\)>F:$\"3Djj\\
Af9aFF:7$$\"3!**\\7Gt#HR?F:$\"3$32&>tN<^KF:7$FH$\"3,^_OZ]ejPF:7$$\"34+
+Dc#o%*=#F:$\"3\"Q7:IlQ\\o%F:7$FK$\"34A)3jwmFg&F:7$$\"3CLLe9r5$R#F:$\"
37&>#3R#\\\\f'F:7$FN$\"39c8uh#)f2vF:7$$\"3()******\\jB4EF:$\"3F!yu,J&)
=J)F:7$FQ$\"3Wges\"><z(*)F:7$$\"3o*****\\-w=#GF:$\"3CsQ:)H`2Z*F:7$FT$
\"3^G-'3$3d0)*F:7$$\"3Am\"H2B6O(HF:$\"34_(\\E5:O!**F:7$$\"3-L$eky#*4-$
F:$\"3zVYdnYen**F:7$$\"3U;HKkNoWIF:$\"30LKhTDz')**F:7$$\"3#)*\\(=UVPoI
F:$\"3'fOaw95v***F:7$$\"3`\"z>6t>-3$F:$\"3;0\\MRip****F:7$$\"3C$3_+7l?
4$F:$\"3iDg![vu(****F:7$$\"3$\\P%)*30\"R5$F:$\"3))\\aFoBv(***F:7$FW$\"
3O\"HJYaOO***F:7$$\"3u\\(=U_ER9$F:$\"3\\_i!R*))[v**F:7$$\"3SL3_]r4sJF:
$\"353[gvynX**F:7$$\"33<H#oxn-?$F:$\"3$fn\\3\"fN/**F:7$$\"3>+]7.%Q%GKF
:$\"31Ai\"Qx)p^)*F:7$$\"3Um\"HdlzZG$F:$\"3QhmdGW>8(*F:7$FZ$\"3[]$H(*o4
?`*F:7$$\"3QLL$3xxlV$F:$\"3C*Rw$Q\\'Q8*F:7$Fgn$\"3-L%p$Gb+K')F:7$$\"3m
m;HdO2VOF:$\"3$\\nMIgqq$zF:7$Fjn$\"39$)\\i8'*4ZrF:7$$\"3Im;HK5S_QF:$\"
3CtLye&*z!R'F:7$F]o$\"3dA9s8E\">g&F:7$$\"3Em;H#GF&eSF:$\"3)H#)\\y^tJs%
F:7$F`o$\"3o;r4]afcQF:7$$\"3')****\\iB0pUF:$\"3j(yz1]#RmIF:7$Fco$\"3\"
*elv(\\H<L#F:7$$\"3wm;zWG))yWF:$\"3+gk9D*R_k\"F:7$Ffo$\"3n4w'o@9'f5F:7
$$\"3mL$3F9<Wo%F:$\"3,$)*ej8rxC'F-7$Fio$\"3/kC&Q[I1*HF-7$$\"3Lm\"H28se
$[F:$\"3]@.[<pv9<F-7$$\"3$***\\(=7O*))[F:$\"3r3k-=x0vyFdu7$$\"3X;zW<\"
oa\"\\F:$\"3tD*4bNwmc%Fdu7$$\"3`L3-8,+U\\F:$\"343y(4U.::#Fdu7$$\"30]Pf
3@`o\\F:$\"3;U;L'Q0iL'Fgbl7$F\\p$\"3[-YzL(G#f:F`cl7$$\"3nTg_ZP%)3]F:$
\"3,f#)3,9[0]F`cl7$$\"3w;a)3RBE-&F:$\"3?([/Cs)HvKFgbl7$$\"3&=zWU..k.&F
:$\"3u[gB^,\"*y%)Fgbl7$$\"3&p;/wn#=]]F:$\"3'*e\\S*4,4h\"Fdu7$$\"38<HKk
>ux]F:$\"3dt?a'fmL'QFdu7$$\"3@m;/^7I0^F:$\"3nBOu%e>33(Fdu7$$\"3Zl\"zW#
)>/;&F:$\"3rd5ITiaQ;F-7$F_p$\"3\"\\:AK#>pXHF-7$$\"3ALLLe,]6`F:$\"3'*[T
6H<I!4'F-7$Fbp$\"3,*)4ZLElF5F:7$$\"3PL$e*[K56bF:$\"3\\'p`R;cfe\"F:7$Fe
p$\"3g(*=$HS7-C#F:7$$\"3*GL$e9i\"=s&F:$\"3!>\"zv!p:&)*HF:7$Fhp$\"3,h5H
L&Q\">QF:7$$\"3I***\\ibOO$fF:$\"3(QiY;Ou%fYF:7$F[q$\"3h**Q_b*)48bF:7$$
\"34**\\(=-N(RhF:$\"3]cw::2hGjF:7$F^q$\"3wGDdV$476(F:7$$\"3;**\\P4kh`j
F:$\"3Pgs!QNjZ\"zF:7$Faq$\"3U;p(4tO:i)F:7$$\"3)em;/risc'F:$\"3q!G8\"ej
(>:*F:7$Fdq$\"3F)\\&f:pXl&*F:7$$\"3:***\\78eBs'F:$\"3tH#y8(R9L(*F:7$$
\"3mlm;z)Qjx'F:$\"39uZ;m%=9')*F:7$$\"3#*)*\\7`#HL!oF:$\"3Y00cxtE5**F:7
$$\"3=KL3F'>.$oF:$\"3z\"*[48\"*o[**F:7$$\"3Vl;/,+JdoF:$\"3LW%HVBJl(**F
:7$Fgq$\"3)GA9O.hO***F:7$$\"3_\"H#=?!Hl*oF:$\"33\"Q<j&['y***F:7$$\"38#
ek`md(3pF:$\"3!Gq#)*ys$)****F:7$$\"3&Q(oa5j)4#pF:$\"39$)GlM,d****F:7$$
\"3dl\"Hd&\\@LpF:$\"3'HLq]:cq***F:7$$\"3-\\P4YAndpF:$\"3XsC()oJE&)**F:
7$$\"3XK$ek`H@)pF:$\"3,MnJ8&=W'**F:7$$\"3L*\\(=<T/JqF:$\"3u#)[^[,\\&*)
*F:7$Fjq$\"3+F\"e&\\rD!z*F:7$$\"3.L$e9\"=\"p=(F:$\"3x)fCqM?_V*F:7$F]r$
\"31bv(Gg8]\"*)F:7$$\"3im;zp%*\\%R(F:$\"3`B%))zg4jG)F:7$F`r$\"3'Qrt%)y
8)QvF:7$$\"3RmmT5hK+wF:$\"3ZSou`u9`mF:7$Fcr$\"3)Gg#>>6y*o&F:7$$\"3:m;H
2FO3yF:$\"3]CYi2l(eq%F:7$Ffr$\"3.%3S*3q8<PF:7$$\"3d*\\i!R:/lzF:$\"3vXN
o?=\"4@$F:7$$\"3Am;zpe()=!)F:$\"3B*RUOI_-s#F:7$$\"3)G$3_+-rs!)F:$\"33;
*G!=uH^AF:7$Fir$\"3V)p._Pk-\"=F:7$$\"3nK$e*[ACI#)F:$\"3\"[Fu/T%Qi5F:7$
F\\s$\"36/pz,FH\\[F-7$$\"3zm;a8H'pQ)F:$\"3<h3-hQd*o#F-7$$\"3lmmTge)*R%
)F:$\"3$[Zc2imR8\"F-7$$\"3.mT&QL(\\m%)F:$\"3r*[9E0bI(fFdu7$$\"3_m;H2)3
I\\)F:$\"3q<'G@ImcG#Fdu7$$\"3w;/,WXE1&)F:$\"3>\"\\**RK:s3\"Fdu7$$\"3,n
\"H2G?&>&)F:$\"3\"yc8U:msE$Fgbl7$$\"3dT&)3\\\"[h_)F:$\"3!=\"or0,cC6Fgb
l7$$\"39;zW<gxK&)F:$\"3A\"R!Qa\")*zs*Ffcl7$$\"3q!H2e)QSR&)F:$\"3U^YA$*
H6>>F`cl7$F_s$\"3?fmO0Kw99Fgbl7$$\"3E3FpEx<f&)F:$\"31C<=IHA-sFgbl7$$\"
3.\\(=#*pBBd)F:$\"36XdDTTx\\<Fdu7$$\"3#4zW<npae)F:$\"3pR6[[NSMKFdu7$$
\"3!G$3FWch)f)F:$\"3%['4Iac2y^Fdu7$$\"3d;HK*e2\\i)F:$\"3/7\\fW1oX5F-7$
$\"3M+]PM&*>^')F:$\"3yeW(pR66w\"F-7$$\"3vm\"zWU$y.()F:$\"3/f]5ET$=w$F-
7$Fbs$\"3J%z#=fm/GlF-7$$\"3Xm;H#e0I&))F:$\"3k*42?>M*e8F:7$Fes$\"3'[!=[
8ST3BF:7$$\"3RL$3-.B]+*F:$\"3#4h!e)R76&HF:7$$\"30nmT5ASg!*F:$\"3,B?%RB
(>bOF:7$$\"3f**\\i!R\"y:\"*F:$\"3+2m7@GP4WF:7$Fhs$\"37i+\\&G)e*>&F:7$$
\"3^m;zpBp?#*F:$\"3Vfi\"\\Z9I#fF:7$$\"3x***\\(oTAq#*F:$\"3^_KQ[_@ZmF:7
$$\"3.L$3x'fv>$*F:$\"3ACtMlfYbtF:7$F[t$\"3<*)[W-PeG!)F:7$$\"31+DJ&**)4
A%*F:$\"3EWsp=X%Ho)F:7$$\"3sK$eRA5\\Z*F:$\"3eg#e'yV]U#*F:7$$\"3[mTg_9s
F&*F:$\"33L*f)osIt'*F:7$F^t$\"3l@sUbT;P**F:7$$\"3_]PM_%pJf*F:$\"3+X@xm
'=4(**F:7$$\"3z+vVBi!eg*F:$\"3-!=Ugdk?***F:7$$\"3$fP%)*3Y77'*F:$\"3gCr
(GU4x***F:7$$\"32^7`%*HW='*F:$\"3O!o-%=-'*****F:7$$\"3?E\"y+QhZi*F:$\"
3#*>#*Q(=M()***F:7$$\"3B+]il(z5j*F:$\"3[YqI7v%R***F:7$$\"3o*\\7yI`jl*F
:$\"3mZc')z5[P**F:7$$\"3C+++]oi\"o*F:$\"3;\">&QIB1<)*F:7$$\"3B+]PMR<K(
*F:$\"3\\Y4DE$\\0O*F:7$Fat$\"3\"*R?VGY$Qd)F:7$$\"3v]iS\"*3))4)*F:$\"3)
o5ePBob*zF:7$$\"3;+D1k2/P)*F:$\"3CxKH2R#oH(F:7$$\"3f\\(=nj+U')*F:$\"3N
_#f)**o$zY'F:7$$\"37+]P40O\"*)*F:$\"3A$GW6E\"y)\\&F:7$$\"3PDJqX/%\\!**
F:$\"33u'[@r3$e\\F:7$$\"3k]7.#Q?&=**F:$\"30:c'o\\b(yVF:7$$\"3!fPf$=.5K
**F:$\"38)\\rSs>(ePF:7$$\"31+voa-oX**F:$\"3!y[7f$zw'4$F:7$$\"3@Cc,\">g
#f**F:$\"3_g*>XjM9R#F:7$$\"3Z\\PMF,%G(**F:$\"3:&*o&R!=AT;F:7$$\"3uu=nj
+U')**F:$\"3qNBnuU)fW)F-7$FdtF(FftFjt-%+AXESLABELSG6%Q\"x6\"Q!Fg`o-%%F
ONTG6#%(DEFAULTG-%*AXESTICKSG6$\"\"#F`ao-%%VIEWG6$;F($\"#5!\"\"F\\ao" 
1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Cur
ve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0
" 0 }{VIEWOPTS 1 1 0 3 2 1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }