{VERSION 4 0 "SUN SPARC SOLARIS" "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 "" 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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "#2004 jan 8 sfb" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "with(plots):with(plottools):
" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoords has be
en redefined\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "P:=[3,2,-
2];Q:=[1,2,3];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"PG7%\"\"$\"\"#!
\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"QG7%\"\"\"\"\"#\"\"$" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 399 "display(line([P[1],0,0],[P[
1],P[2],0],color=red),\nline([0,P[2],0],[P[1],P[2],0],color=red), \nli
ne([P[1],P[2],0],[P[1],P[2],P[3]],color=red),\nline([0,0,P[3]],[0,P[2]
,P[3]],color=green),\nline([0,P[2],P[3]],[P[1],P[2],P[3]],color=green)
,\nline([0,P[2],0],[0,P[2],P[3]],color=green),\nscaling=constrained,ax
es=normal,labels=[\"x\",\"y\",\"z\"],\ntextplot3d([P[1],P[2],P[3],\"P
\"],color=black,font=[HELVETICA,24]));" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 265 "display(arrow(P,Q,.2,.4,.2,color=red),\narrow([0,0,0
],Q-P,.2,.4,.2,color=blue),\nscaling=constrained,axes=normal,labels=[
\"x\",\"y\",\"z\"],\ntextplot3d([P[1],P[2],P[3],\"P\"],color=black,fon
t=[HELVETICA,24]),\ntextplot3d([Q[1],Q[2],Q[3],\"Q\"],color=black,font
=[HELVETICA,24]));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}
{MARK "5 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 
33 1 1 }