{VERSION 6 0 "IBM INTEL NT" "6.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 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 
11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 
0 0 0 1 0 1 0 2 2 0 1 }{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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 27 "eq[1] := a + b + c + d = 1;" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"\"/,*%\"aGF'%\"bGF'%\"cGF'%\"dGF'F'" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "eq[2] := (1/3)*b + (2/3)*
c + d = 1/2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"#/,(*&\"
\"$!\"\"%\"bG\"\"\"F.*(F'F.F+F,%\"cGF.F.%\"dGF.#F.F'" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 41 "eq[3] := (1/3)^2*b + (2/3)^2*c + d = 1/3;
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"$/,(*&\"\"*!\"\"%\"bG
\"\"\"F.*(\"\"%F.F+F,%\"cGF.F.%\"dGF.#F.F'" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 41 "eq[4] := (1/3)^3*b + (2/3)^3*c + d = 1/4;" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"%/,(*&\"#F!\"\"%\"bG\"\"\"F.*(
\"\")F.F+F,%\"cGF.F.%\"dGF.#F.F'" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 37 "solve(\{seq(eq[k],k=1..4)\},\{a,b,c,d\});" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#<&/%\"cG#\"\"$\"\")/%\"bGF&/%\"aG#\"\"\"F(/%
\"dGF-" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" 
{TEXT -1 9 "Example 4" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "eq[1] := s[1]+s[2] = 1;" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"\"/,&&%\"sGF&F'&F+6#\"\"#F'F'" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "eq[2] := s[1]*t[1]+s[2]*t
[2] = evalf(1/2); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"#/,
&*&&%\"sG6#\"\"\"F.&%\"tGF-F.F.*&&F,F&F.&F0F&F.F.$\"+++++]!#5" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "eq[3] := s[1]*t[1]^2+s[2]*t[
2]^2 = evalf(1/3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"$/,
&*&&%\"sG6#\"\"\"F.)&%\"tGF-\"\"#F.F.*&&F,6#F2F.)&F1F5F2F.F.$\"+LLLLL!
#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "eq[4] := s[1]*t[1]^3+
s[2]*t[2]^3 = evalf(1/4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#
\"\"%/,&*&&%\"sG6#\"\"\"F.)&%\"tGF-\"\"$F.F.*&&F,6#\"\"#F.)&F1F5F2F.F.
$\"+++++D!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "solve( \{se
q(eq[k],k=1..4)\},\{s[1],s[2],t[1],t[2]\});" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6$<&/&%\"tG6#\"\"\"$\"+[8v')y!#5/&%\"sGF'$\"+&*******\\F+
/&F.6#\"\"#$\"+0+++]F+/&F&F3$\"+e'[K6#F+<&/F-F5/F2F//F8F)/F%F9" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "12 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }