{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 "" 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 "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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 37 "rHA:=vector([0.585,0,-0.076]);#meters" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$rHAGK%'vectorG6#7%$\"$&e!\"$\"\"!$!
#wF+Q(pprint06\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "rA:=vec
tor([15,-11.25,-11]);#inches" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#rAG
K%'vectorG6#7%\"#:$!%D6!\"#!#6Q(pprint06\"" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 103 "This position vector is in inches, which is ok since we \+
will divide by it's magnitude (also in inches)." }}{PARA 0 "" 0 "" 
{TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "eA:=evalm(r
A/norm(rA,2));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#eAGK%'vectorG6#7%
$\"+X#*>+p!#5$!+M%\\^<&F+$!+8h9g]F+Q(pprint06\"" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 17 "FA:=evalm(20*eA);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%#FAGK%'vectorG6#7%$\"+\\)R+Q\"!\")$!+())H].\"F+$!+B#H
?,\"F+Q(pprint06\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "M:=cr
ossprod(rHA,FA);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MGK%'vectorG6#
7%$!+TrAmy!#5$\"+q1ar[!\"*$!+R[#\\0'F.Q(pprint06\"" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "4 0 0" 89 }{VIEWOPTS 1 1 0 3 2 
1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }