{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 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 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 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Output" -1 2 1 
{CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 
-1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 "
" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 0 }0 0 0 -1 -1 -1 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 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 
{CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 
0 0 0 0 0 -1 0 }{PSTYLE "Maple Plot" 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 13 "with(linalg);" }}
{PARA 7 "" 1 "" {TEXT -1 80 "Warning, the protected names norm and tra
ce have been redefined and unprotected\n" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#7^r%.BlockDiagonalG%,GramSchmidtG%,JordanBlockG%)LUdecompG%)QRde
compG%*WronskianG%'addcolG%'addrowG%$adjG%(adjointG%&angleG%(augmentG%
(backsubG%%bandG%&basisG%'bezoutG%,blockmatrixG%(charmatG%)charpolyG%)
choleskyG%$colG%'coldimG%)colspaceG%(colspanG%*companionG%'concatG%%co
ndG%)copyintoG%*crossprodG%%curlG%)definiteG%(delcolsG%(delrowsG%$detG
%%diagG%(divergeG%(dotprodG%*eigenvalsG%,eigenvaluesG%-eigenvectorsG%+
eigenvectsG%,entermatrixG%&equalG%,exponentialG%'extendG%,ffgausselimG
%*fibonacciG%+forwardsubG%*frobeniusG%*gausselimG%*gaussjordG%(geneqns
G%*genmatrixG%%gradG%)hadamardG%(hermiteG%(hessianG%(hilbertG%+htransp
oseG%)ihermiteG%*indexfuncG%*innerprodG%)intbasisG%(inverseG%'ismithG%
*issimilarG%'iszeroG%)jacobianG%'jordanG%'kernelG%*laplacianG%*leastsq
rsG%)linsolveG%'mataddG%'matrixG%&minorG%(minpolyG%'mulcolG%'mulrowG%)
multiplyG%%normG%*normalizeG%*nullspaceG%'orthogG%*permanentG%&pivotG%
*potentialG%+randmatrixG%+randvectorG%%rankG%(ratformG%$rowG%'rowdimG%
)rowspaceG%(rowspanG%%rrefG%*scalarmulG%-singularvalsG%&smithG%,stackm
atrixG%*submatrixG%*subvectorG%)sumbasisG%(swapcolG%(swaprowG%*sylvest
erG%)toeplitzG%&traceG%*transposeG%,vandermondeG%*vecpotentG%(vectdimG
%'vectorG%*wronskianG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "wi
th(plots);" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoo
rds has been redefined\n" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#7Z%(animat
eG%*animate3dG%-animatecurveG%&arrowG%-changecoordsG%,complexplotG%.co
mplexplot3dG%*conformalG%,conformal3dG%,contourplotG%.contourplot3dG%*
coordplotG%,coordplot3dG%-cylinderplotG%,densityplotG%(displayG%*displ
ay3dG%*fieldplotG%,fieldplot3dG%)gradplotG%+gradplot3dG%,graphplot3dG%
-implicitplotG%/implicitplot3dG%(inequalG%,interactiveG%-listcontplotG
%/listcontplot3dG%0listdensityplotG%)listplotG%+listplot3dG%+loglogplo
tG%(logplotG%+matrixplotG%(odeplotG%'paretoG%,plotcompareG%*pointplotG
%,pointplot3dG%*polarplotG%,polygonplotG%.polygonplot3dG%4polyhedra_su
pportedG%.polyhedraplotG%'replotG%*rootlocusG%,semilogplotG%+setoption
sG%-setoptions3dG%+spacecurveG%1sparsematrixplotG%+sphereplotG%)surfda
taG%)textplotG%+textplot3dG%)tubeplotG" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 10 "y0:= 12.9;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y0G$
\"$H\"!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "y1:= 17.1;" 
}}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y1G$\"$r\"!\"\"" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 10 "y2:= 23.2;" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%#y2G$\"$K#!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "
y3:= 31.4;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y3G$\"$9$!\"\"" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "y4:= 38.6;" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#>%#y4G$\"$'Q!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 10 "y5:= 50.2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y5G$
\"$-&!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "y6:= 63.0;" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y6G$\"$I'!\"\"" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 10 "y7:= 76.2;" }}{PARA 11 "" 1 "" {XPPMATH 20 
"6#>%#y7G$\"$i(!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "y8:
= 92.0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y8G$\"$?*!\"\"" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "y9:= 106.0;" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#>%#y9G$\"%g5!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 12 "y10:= 123.2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$y1
0G$\"%K7!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "y11:= 132.
2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$y11G$\"%A8!\"\"" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "y12:= 151.3;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$y12G$\"%8:!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 12 "y13:= 179.3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$y1
3G$\"%$z\"!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "y14:= 20
3.3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$y14G$\"%L?!\"\"" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "y15:= 226.5;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$y15G$\"%lA!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 12 "y16:= 248.7;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$y1
6G$\"%([#!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "y17:= 284
.1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$y17G$\"%TG!\"\"" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 175 "A:= matrix(16,2,[y0,-y0^2,y1,-y1^2
,y2,-y2^2,y3,-y3^2,y4,-y4^2,y5,-y5^2,y6,-y6^2,y7,-y7^2,y8,-y8^2,y9,-y9
^2,y10,-y10^2,y11,-y11^2,y12,-y12^2,y13,-y13^2,y14,-y14^2,y15,-y15^2])
;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'matrixG6#727$$\"$H\"!\"
\"$!&Tm\"!\"#7$$\"$r\"F,$!&T#HF/7$$\"$K#F,$!&CQ&F/7$$\"$9$F,$!&'f)*F/7
$$\"$'QF,$!''**[\"F/7$$\"$-&F,$!'/?DF/7$$\"$I'F,$!'+pRF/7$$\"$i(F,$!'W
1eF/7$$\"$?*F,$!'+k%)F/7$$\"%g5F,$!(+O7\"F/7$$\"%K7F,$!(Cy^\"F/7$$\"%A
8F,$!(%oZ<F/7$$\"%8:F,$!(p\"*G#F/7$$\"%$z\"F,$!(\\[@$F/7$$\"%L?F,$!(*3
LTF/7$$\"%lAF,$!(D-8&F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 128 
"d:= matrix(16,1,[y1-y0,y2-y1,y3-y2,y4-y3,y5-y4,y6-y5,y7-y6,y8-y7,y9-y
8,y10-y9,y11-y10,y12-y11,y13-y12,y14-y13,y15-y14,y16-y15]);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%\"dG-%'matrixG6#727#$\"#U!\"\"7#$\"#hF,7#$
\"##)F,7#$\"#sF,7#$\"$;\"F,7#$\"$G\"F,7#$\"$K\"F,7#$\"$e\"F,7#$\"$S\"F
,7#$\"$s\"F,7#$\"#!*F,7#$\"$\">F,7#$\"$!GF,7#$\"$S#F,7#$\"$K#F,7#$\"$A
#F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "B1:= evalm((transpos
e(A) &* A)^(-1));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B1G-%'matrixG6
#7$7$$\"+I[=)Q&!#9$\"+!y![DH!#;7$F-$\"+e$Hyt\"!#=" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 36 "B2:= evalm(B1 &* transpose(A) &* d);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B2G-%'matrixG6#7$7#$\"+3tB:B!#57#$
\"+N3fWe!#8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "a:= B2[1,1];
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$\"+3tB:B!#5" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "b:= B2[2,1];" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"bG$\"+N3fWe!#8" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 12 "e:= exp(-a);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"e
G$\"+\"pQK$z!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "E:= matr
ix(16,1,(i,j)-> e^(i-1));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"EG-%'
matrixG6#727#$\"\"\"\"\"!7#$\"+\"pQK$z!#57#$\"+8wi$H'F07#$\"+3])G*\\F0
7#$\"+`[(4'RF07#$\"+'*eLUJF07#$\"+r+*G\\#F07#$\"+'>pw(>F07#$\"+z@$*o:F
07#$\"+Y8nW7F07#$\"+#)[Fu)*!#67#$\"+az\\LyFL7#$\"+04]9iFL7#$\"+.>6I\\F
L7#$\"+]a<6RFL7#$\"+S)GG5$FL" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 137 "f:= matrix(16,1,[a/y0-b,a/y1-b,a/y2-b,a/y3-b,a/y4-b,a/y5-b,a/y6
-b,a/y7-b,a/y8-b,a/y9-b,a/y10-b,a/y11-b,a/y12-b,a/y13-b,a/y14-b,a/y15-
b]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG-%'matrixG6#727#$\"+&p6j
t\"!#67#$\"+QS\\&H\"F,7#$\"+s?,&R*!#77#$\"+S\"3*)y'F37#$\"+I]c8aF37#$
\"+EucFSF37#$\"+q2_!4$F37#$\"+)35RX#F37#$\"+3K5K>F37#$\"+cqs*f\"F37#$
\"+y>z%H\"F37#$\"+o]&o;\"F37#$\"+bYqd%*!#87#$\"+&\\a!oqFR7#$\"+&3*oVbF
R7#$\"+Nu?xVFR" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "F:= evalm
((transpose(E) &* E)^(-1));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FG-
%'matrixG6#7#7#$\"+B&>'3P!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 39 "C:= evalm(F &* transpose(E) &* f)[1,1];" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"CG$\"+Cjku:!#6" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 4 "a/b;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+MMLhR!\"(
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "C/b;" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#$\"+(G%>%p#!\")" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 159 "p1:=pointplot(\{[0,y0],[1,y1],[2,y2],[3,y3],[4,y4],[
5,y5],[6,y6],[7,y7],[8,y8],[9,y9],[10,y10],[11,y11],[12,y12],[13,y13],
[14,y14],[15,y15],[16,y16],[17,y17]\}):" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 36 "p2:=plot(a/(C*exp(-a*t)+b),t=0..20):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "display(p1,p2);" }}{PARA 13 "" 1 "
" {GLPLOT2D 377 377 377 {PLOTDATA 2 "6&-%'POINTSG647$$\"\"!F($\"$H\"!
\"\"7$$\"\"\"F($\"$r\"F+7$$\"\"#F($\"$K#F+7$$\"\"$F($\"$9$F+7$$\"\"%F(
$\"$'QF+7$$\"\"&F($\"$-&F+7$$\"\"'F($\"$I'F+7$$\"\"(F($\"$i(F+7$$\"\")
F($\"$?*F+7$$\"\"*F($\"%g5F+7$$\"#5F($\"%K7F+7$$\"#6F($\"%A8F+7$$\"#7F
($\"%8:F+7$$\"#8F($\"%$z\"F+7$$\"#9F($\"%L?F+7$$\"#:F($\"%lAF+7$$\"#;F
($\"%([#F+7$$\"#<F($\"%TGF+-%'CURVESG6$7S7$F'$\"3!)HBM+:q<9!#;7$$\"39L
LLL3VfV!#=$\"3.)>zR4CBc\"Fbq7$$\"3%pmm;H[D:)Ffq$\"3miR3S*y&*p\"Fbq7$$
\"3MLLLe0$=C\"!#<$\"3\"HM%evSon=Fbq7$$\"3iLLL3RBr;Far$\"35TL+M1z_?Fbq7
$$\"3kmm;zjf)4#Far$\"3sVX>OB9aAFbq7$$\"3ULL$e4;[\\#Far$\"3PAX?))>FdCFb
q7$$\"3!)****\\i'y]!HFar$\"3ss=<vD_&o#Fbq7$$\"3oLL$ezs$HLFar$\"3yu4\"e
\"p8UHFbq7$$\"3=++]7iI_PFar$\"3xm4.P4??KFbq7$$\"3Onmm;_M(=%Far$\"3dcO!
e+D5`$Fbq7$$\"3$QLL$3y_qXFar$\"3x!o&\\yC&p#QFbq7$$\"3]+++]1!>+&Far$\"3
uC_Md5U'=%Fbq7$$\"3J+++]Z/NaFar$\"3Rbw=;x*pd%Fbq7$$\"3<+++]$fC&eFar$\"
3*\\QQ&*=')H)\\Fbq7$$\"3qLL$ez6:B'Far$\"3U/8Oi8+y`Fbq7$$\"30nmm;=C#o'F
ar$\"3Zz$>/q<<)eFbq7$$\"3Nnmmm#pS1(Far$\"3k6:I%)[OQjFbq7$$\"3<++]i`A3v
Far$\"3y')*3.a$=0pFbq7$$\"3Rmmmm(y8!zFar$\"3.t*)zbYjRuFbq7$$\"3K,+]i.t
K$)Far$\"3x&Hr8Hm>1)Fbq7$$\"3!3++v3zMu)Far$\"3(*[JIH@%)*o)Fbq7$$\"3Yom
m\"H_?<*Far$\"3vaK?$=Q;Q*Fbq7$$\"3,nm;zihl&*Far$\"3Adff])e\\+\"!#:7$$
\"3;LLL3#G,***Far$\"34uV7g'R/3\"Fhx7$$\"3WLLezw5V5Fbq$\"3dV&Rki*[i6Fhx
7$$\"3.++v$Q#\\\"3\"Fbq$\"3C4E)*puzO7Fhx7$$\"3\\LL$e\"*[H7\"Fbq$\"3&fJ
!>Kx()>8Fhx7$$\"3-+++qvxl6Fbq$\"3e\\:\\s<a39Fhx7$$\"31++]_qn27Fbq$\"3s
)yJIxvx\\\"Fhx7$$\"36++Dcp@[7Fbq$\"3U>L`$>\\he\"Fhx7$$\"3+++]2'HKH\"Fb
q$\"3fm\\0Z+@'o\"Fhx7$$\"3`mmmwanL8Fbq$\"3:O*)HXbYx<Fhx7$$\"34+++v+'oP
\"Fbq$\"3y\\;=u@'e(=Fhx7$$\"3CLLeR<*fT\"Fbq$\"3#=10Yz([l>Fhx7$$\"3B+++
&)Hxe9Fbq$\"319D$)o.`j?Fhx7$$\"3gmm\"H!o-*\\\"Fbq$\"3X?--C%>a:#Fhx7$$
\"39++DTO5T:Fbq$\"34N/&p'*f1D#Fhx7$$\"3emmmT9C#e\"Fbq$\"3!G0`3JkDM#Fhx
7$$\"3\"****\\i!*3`i\"Fbq$\"3=n(Gm$f2PCFhx7$$\"3_LLL$*zym;Fbq$\"3:D#G*
f$yg_#Fhx7$$\"3fLL$3N1#4<Fbq$\"3gbV@FKp9EFhx7$$\"3!pm;HYt7v\"Fbq$\"3'o
?\"*[\\o)*p#Fhx7$$\"3@+++q(G**y\"Fbq$\"3'\\aYAmLbx#Fhx7$$\"3'pmmT6KU$=
Fbq$\"3]W7/AZ'*eGFhx7$$\"3dLLL`v&Q(=Fbq$\"3'*[u@*e]/$HFhx7$$\"30++DOl5
;>Fbq$\"3G**oS=-G.IFhx7$$\"3A++v.Uac>Fbq$\"3&>x;wyI'pIFhx7$$\"#?F($\"3
N&Rr-.Cs8$Fhx-%'COLOURG6&%$RGBG$FenF+F'F'-%+AXESLABELSG6$Q\"t6\"Q!F_al
-%%VIEWG6$;F'Fb`l%(DEFAULTG" 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 26 "g:= t-> a/(C*exp(-a*t)+b);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"gGf*6#%\"tG6\"6$%)operatorG%&arrowGF(*&%\"aG\"\"\",
&*&%\"CGF.-%$expG6#,$*&F-F.9$F.!\"\"F.F.%\"bGF.F8F(F(F(" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "g(16);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#$\"+)**p<Q#!\"(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "g(1
7);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+]Ko&f#!\"(" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "39 0 0" 0 }{VIEWOPTS 1 
1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }