{VERSION 3 0 "APPLE_PPC_MAC" "3.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 
0 }{CSTYLE "2D Input" 2 19 "" 0 1 255 0 0 1 0 0 0 0 0 0 0 0 0 }
{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 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "with(linalg):" "6#-%%w
ithG6#%'linalgG" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "P := matri
x([[2/3, 0, 1/2], [1/3, 1/2, 1/6], [0, 1/2, 1/3]]);" "6#>%\"PG-%'matri
xG6#7%7%*&\"\"#\"\"\"\"\"$!\"\"\"\"!*&\"\"\"F,\"\"#F.7%*&\"\"\"F,\"\"$
F.*&\"\"\"F,\"\"#F.*&\"\"\"F,\"\"'F.7%F/*&\"\"\"F,\"\"#F.*&\"\"\"F,\"
\"$F." }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "evalm(P^2);" "6#-%&e
valmG6#*$%\"PG\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "x0 := \+
matrix([[1499.0/1500], [1.0/1500], [.0e-2]]);" "6#>%#x0G-%'matrixG6#7%
7#*&$\"&!*\\\"!\"\"\"\"\"\"%+:!\"\"7#*&$\"#5!\"\"F.\"%+:F07#$\"\"!!\"$
" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "x1 := evalm(`&*`(P,x0));
" "6#>%#x1G-%&evalmG6#-%#&*G6$%\"PG%#x0G" }}}{EXCHG {PARA 0 "> " 0 "" 
{XPPEDIT 19 1 "x2 := evalm(`&*`(P,x1));" "6#>%#x2G-%&evalmG6#-%#&*G6$%
\"PG%#x1G" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "x5 := evalm(P^5*
x0);" "6#>%#x5G-%&evalmG6#*&%\"PG\"\"&%#x0G\"\"\"" }}}{EXCHG {PARA 0 "
> " 0 "" {XPPEDIT 19 1 "x50 := evalm(P^50*x0);" "6#>%$x50G-%&evalmG6#*
&%\"PG\"#]%#x0G\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "x100
 := evalm(P^100*x0);" "6#>%%x100G-%&evalmG6#*&%\"PG\"$+\"%#x0G\"\"\"" 
}}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "" "6#%#%?G" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "Id:=matrix([[1, 0, 0], [0, 1, 0], [
0, 0, 1]]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A:=evalm(P-I
d);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "zero:=matrix([[0], [
0], [0]]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "augment(A,zer
o);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "rref(%);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "q := matrix([[9/23], [8/23], [6/23]
]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "evalm(P&*q);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "18" 0 }
{VIEWOPTS 1 1 0 1 1 1803 }