{VERSION 4 0 "IBM INTEL NT" "4.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 "Warning" -1 7 1 
{CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 1 3 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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}{PARA 0 "
> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}{PARA 7 "" 1 "" {TEXT -1 
80 "Warning, the protected names norm and trace have been redefined an
d unprotected\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 280 "A:=matr
ix([[1,sin(0),cos(0)],[1,sin(4*Pi/12),cos(4*Pi/12)],[1,sin(8*Pi/12),co
s(8*Pi/12)],[1,sin(12*Pi/12),cos(12*Pi/12)],[1,sin(16*Pi/12),cos(16*Pi
/12)],[1,sin(20*Pi/12),cos(20*Pi/12)]]): B:=transpose(A): X:=matrix([[
c],[a],[b]]): Y:=matrix([[1.0],[1.6],[1.4],[0.6],[0.2],[0.8]]):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "evalm(A)*evalm(X)=evalm(Y);
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/*&-%'matrixG6#7(7%\"\"\"\"\"!F*7%
F*,$*$-%%sqrtG6#\"\"$F*#F*\"\"#F37%F*F-#!\"\"F47%F*F+F77%F*,$F.F6F67%F
*F:F3F*-F&6#7%7#%\"cG7#%\"aG7#%\"bGF*-F&6#7(7#$\"#5F77#$\"#;F77#$\"#9F
77#$\"\"'F77#$F4F77#$\"\")F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 53 "evalm(B) * evalm(A) * evalm(X) = evalm(B) * evalm(Y);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#/*(-%'matrixG6#7%7(\"\"\"F*F*F*F*F*7(\"\"!,$
*$-%%sqrtG6#\"\"$F*#F*\"\"#F-F,,$F.#!\"\"F4F57(F*F3F6F7F6F3F*-F&6#7(7%
F*F,F*7%F*F-F37%F*F-F67%F*F,F77%F*F5F67%F*F5F3F*-F&6#7%7#%\"cG7#%\"aG7
#%\"bGF**&F%F*-F&6#7(7#$\"#5F77#$\"#;F77#$\"#9F77#$\"\"'F77#$F4F77#$\"
\")F7F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "evalm(B&*A)*eval
m(X) = evalm(B&*Y);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/*&-%'matrixG6#
7%7%\"\"'\"\"!F+7%F+\"\"$F+7%F+F+F-\"\"\"-F&6#7%7#%\"cG7#%\"aG7#%\"bGF
/-F&6#7%7#$\"#c!\"\"7#,$*$-%%sqrtG6#F-F/$\"+++++5!\"*7#$\"+++++!)!#5" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "solve(\{6*c = 5.6, 3*a = \+
sqrt(3), 3*b = 0.8\}, \{c,a,b\});" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#<
%/%\"cG$\"+LLLL$*!#5/%\"aG$\"+#p-Nx&F(/%\"bG$\"+nmmmEF(" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "y=(14/15) + (sqrt(3)/3)*sin(2*Pi*t/
12) + (4/15)*cos(2*Pi*t/12);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/%\"yG
,(#\"#9\"#:\"\"\"*(#F)\"\"$F)-%%sqrtG6#F,F)-%$sinG6#,$*&%#PiGF)%\"tGF)
#F)\"\"'F)F)*&#\"\"%F(F)-%$cosGF2F)F)" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}}{MARK "7 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 
1 }{PAGENUMBERS 0 1 2 33 1 1 }