{VERSION 5 0 "IBM INTEL NT" "5.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "a:=[1,1,1];" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "b:=[5,2,3];" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 11 "c:=[2,7,8];" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "polygon
plot3d([a,b,c],color=wheat,labels=[x,y,z],axes=normal);\n" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "t:=[8,-1,6];" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 26 "ta:=a+t; tb:=b+t; tc:=c+t;" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
137 "display(polygonplot3d([a,b,c],color=wheat,labels=[x,y,z],axes=nor
mal),polygonplot3d([ta,tb,tc],color=khaki,labels=[x,y,z],axes=normal))
;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "n:=50;" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "for i from 1 by 1 to n do" }}{PARA 
0 "> " 0 "" {MPLTEXT 1 0 79 "p3[i]:=polygonplot3d([i*a,i*b,i*c],color=
turquoise,labels=[x,y,z],axes=normal):" }}{PARA 0 "> " 0 "" {MPLTEXT 
1 0 3 "od:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "display(seq(p
3[i],i=1..n));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "because2:
=seq(p3[i],i=1..n):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "disp
lay([because2],insequence=true);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "ryan:=Pi/6;" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "barf:=matrix([[cos(ryan),sin(ryan),
0],[-sin(ryan),cos(ryan),0],[0,0,1]]);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 38 "gross:=matrix([[a[1]],[a[2]],[a[3]]]);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "why:=matrix([[b[1]],[b[2]],[b[3]]])
;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "tv:=matrix([[c[1]],[c[
2]],[c[3]]]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "trista:=mu
ltiply(barf,gross);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "real
ity:=multiply(barf,why);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 
"sick:=multiply(barf,tv);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
42 "ap:=[trista[1,1],trista[2,1],trista[3,1]];" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 45 "bp:=[reality[1,1],reality[2,1],reality[3,1]];
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "cp:=[sick[1,1],sick[2,1
],sick[3,1]];" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "polygonplo
t3d([ap,bp,cp],labels=[x,y,z],axes=normal);" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 112 "dis
play(polygonplot3d([a,b,c],labels=[x,y,z],axes=normal),polygonplot3d([
ap,bp,cp],labels=[x,y,z],axes=normal));" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 9 "begpt:=0;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
12 "endpt:=2*Pi;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 25 "for i from 0 by 1 to n do" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 33 "   ryan:=begpt+i*(endpt-begpt)/n:" }}{PARA 0 "> " 0 "
" {MPLTEXT 1 0 76 "   barf:=matrix([[cos(ryan),sin(ryan),0],[-sin(ryan
),cos(ryan),0],[0,0,1]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "   gro
ss:=matrix([[a[1]],[a[2]],[a[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 
39 "   why:=matrix([[b[1]],[b[2]],[b[3]]]):" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 38 "   tv:=matrix([[c[1]],[c[2]],[c[3]]]):" }}{PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 32 "   trista:=multiply(barf,gross):" }}{PARA 0 ">
 " 0 "" {MPLTEXT 1 0 31 "   reality:=multiply(barf,why):" }}{PARA 0 ">
 " 0 "" {MPLTEXT 1 0 27 "   sick:=multiply(barf,tv):" }}{PARA 0 "> " 
0 "" {MPLTEXT 1 0 45 "   ap:=[trista[1,1],trista[2,1],trista[3,1]]:" }
}{PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "   bp:=[reality[1,1],reality[2,1],
reality[3,1]]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "   cp:=[sick[1,1]
,sick[2,1],sick[3,1]]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "   p[i]:=
polygonplot3d([ap,bp,cp],color=sienna,labels=[x,y,z],axes=normal):" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 26 "display(seq(p[i],i=1..n));" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 26 "because:=seq(p[i],i=0..n):" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 35 "display([because],insequence=true);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "for i
 from 0 by 1 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "   ryan:=be
gpt+i*(endpt-begpt)/n:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 76 "   barf:=
matrix([[cos(ryan),sin(ryan),0],[-sin(ryan),cos(ryan),0],[0,0,1]]):" }
}{PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "   gross:=matrix([[a[1]-8],[a[2]-8
],[a[3]-8]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "   why:=matrix([[b
[1]-8],[b[2]-8],[b[3]-8]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "   t
v:=matrix([[c[1]-8],[c[2]-8],[c[3]-8]]):" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 32 "   trista:=multiply(barf,gross):" }}{PARA 0 "> " 0 "
" {MPLTEXT 1 0 31 "   reality:=multiply(barf,why):" }}{PARA 0 "> " 0 "
" {MPLTEXT 1 0 27 "   sick:=multiply(barf,tv):" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 51 "   ap:=[trista[1,1]+8,trista[2,1]+8,trista[3,1]+8]:" 
}}{PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "   bp:=[reality[1,1]+8,reality[2,
1]+8,reality[3,1]+8]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "   cp:=[si
ck[1,1]+8,sick[2,1]+8,sick[3,1]+8]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 
73 "   p2[i]:=polygonplot3d([ap,bp,cp],color=tan,labels=[x,y,z],axes=n
ormal):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 27 "display(seq(p2[i],i=1..n));" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 46 "display([seq(p2[i],i=1..n),seq(p[i],i=1..
n)]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 71 "matrix([[1,0,0],[0
,cos(alpha),sin(alpha)],[0,-sin(alpha),cos(alpha)]]);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 71 "matrix([[cos(theta),0,-sin(theta)],
[0,1,0],[sin(theta),0,cos(theta)]]);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 25 "for i from 0 by 1 to n do" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 33 "   ryan:=begpt+i*(endpt-begpt)/n:" }}{PARA 0 "> " 0 "
" {MPLTEXT 1 0 76 "   barf:=matrix([[cos(ryan),0,-sin(ryan)],[0,1,0],[
sin(ryan),0,cos(ryan)]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "   gro
ss:=matrix([[a[1]],[a[2]],[a[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 
39 "   why:=matrix([[b[1]],[b[2]],[b[3]]]):" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 38 "   tv:=matrix([[c[1]],[c[2]],[c[3]]]):" }}{PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 32 "   trista:=multiply(barf,gross):" }}{PARA 0 ">
 " 0 "" {MPLTEXT 1 0 31 "   reality:=multiply(barf,why):" }}{PARA 0 ">
 " 0 "" {MPLTEXT 1 0 27 "   sick:=multiply(barf,tv):" }}{PARA 0 "> " 
0 "" {MPLTEXT 1 0 45 "   ap:=[trista[1,1],trista[2,1],trista[3,1]]:" }
}{PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "   bp:=[reality[1,1],reality[2,1],
reality[3,1]]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "   cp:=[sick[1,1]
,sick[2,1],sick[3,1]]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 79 "   p3[i]:
=polygonplot3d([ap,bp,cp],color=turquoise,labels=[x,y,z],axes=normal):
" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 46 "display([seq(p[i],i=1..n),seq(p3[i],i=1..n)]);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "because3:=seq(p3[i],i=0..n):
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "display([because3],inse
quence=true);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "display([b
ecause3,because],insequence=true);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 24 "begpt:=0; endpt:=3/2*Pi;" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 22 "begpt2:=0; endpt2:=Pi;" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 26 "begpt3:=0; endpt3:=5/4*Pi;" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "fo
r i from 0 by 1 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "   ryan:
=begpt+i*(endpt-begpt)/n:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 76 "   bar
f:=matrix([[cos(ryan),sin(ryan),0],[-sin(ryan),cos(ryan),0],[0,0,1]]):
" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "   gross:=matrix([[a[1]],[a[2]]
,[a[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "   why:=matrix([[b[1]
],[b[2]],[b[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "   tv:=matrix
([[c[1]],[c[2]],[c[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "   tri
sta:=multiply(barf,gross):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "   re
ality:=multiply(barf,why):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "   si
ck:=multiply(barf,tv):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "   ap:=[t
rista[1,1],trista[2,1],trista[3,1]]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 
0 48 "   bp:=[reality[1,1],reality[2,1],reality[3,1]]:" }}{PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 39 "   cp:=[sick[1,1],sick[2,1],sick[3,1]]:" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "   p4[i]:=polygonplot3d([ap,bp,cp],
color=sienna,axes=normal):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "for i from 0 by 1 to n do
" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "   ryan:=begpt2+i*(endpt2-begpt
2)/n:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 76 "   barf:=matrix([[cos(ryan
),0,-sin(ryan)],[0,1,0],[sin(ryan),0,cos(ryan)]]):" }}{PARA 0 "> " 0 "
" {MPLTEXT 1 0 44 "   gross:=matrix([[ap[1]],[ap[2]],[ap[3]]]):" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "   why:=matrix([[bp[1]],[bp[2]],[bp
[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "   tv:=matrix([[cp[1]],[
cp[2]],[cp[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "   trista:=mul
tiply(barf,gross):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "   reality:=m
ultiply(barf,why):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "   sick:=mult
iply(barf,tv):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "   ap2:=[trista[1
,1],trista[2,1],trista[3,1]]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "  \+
 bp2:=[reality[1,1],reality[2,1],reality[3,1]]:" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 40 "   cp2:=[sick[1,1],sick[2,1],sick[3,1]]:" }}{PARA 0 "
> " 0 "" {MPLTEXT 1 0 64 "   p5[i]:=polygonplot3d([ap2,bp2,cp2],color=
sienna,axes=normal):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "for i from 0 by 1 to n do" }
}{PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "   alpha:=begpt3+i*(endpt3-begpt3)
/n:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "   barf:=matrix([[1,0,0],[0,
cos(alpha),sin(alpha)],[0,-sin(alpha),cos(alpha)]]);" }}{PARA 0 "> " 
0 "" {MPLTEXT 1 0 47 "   gross:=matrix([[ap2[1]],[ap2[2]],[ap2[3]]]):
" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "   why:=matrix([[bp2[1]],[bp2[2
]],[bp2[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "   tv:=matrix([[c
p2[1]],[cp2[2]],[cp2[3]]]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "   t
rista:=multiply(barf,gross):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "   \+
reality:=multiply(barf,why):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "   \+
sick:=multiply(barf,tv):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "   ap3:
=[trista[1,1],trista[2,1],trista[3,1]]:" }}{PARA 0 "> " 0 "" {MPLTEXT 
1 0 49 "   bp3:=[reality[1,1],reality[2,1],reality[3,1]]:" }}{PARA 0 "
> " 0 "" {MPLTEXT 1 0 40 "   cp3:=[sick[1,1],sick[2,1],sick[3,1]]:" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 64 "   p6[i]:=polygonplot3d([ap3,bp3,cp
3],color=sienna,axes=normal):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 28 "because4:=seq(p4[i],i=0..n):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 28 "because5:=seq(p5[i],i=0..n):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "because6:=seq(p6[i],i=0..n):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "display([because4,because5,b
ecause6],insequence=true);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
78 "barf1:=matrix([[cos(endpt),sin(endpt),0],[-sin(endpt),cos(endpt),0
],[0,0,1]]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 83 "barf2:=matr
ix([[cos(endpt2),0,-sin(endpt2)],[0,1,0],[sin(endpt2),0,cos(endpt2)]])
;:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "barf3:=matrix([[1,0,0
],[0,cos(endpt3),sin(endpt3)],[0,-sin(endpt3),cos(endpt3)]]);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "bigbarf:=multiply(barf3,barf
2,barf1);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "gross:=matrix([[a[1]],[a[2]],[a[3]]
]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "why:=matrix([[b[1]],
[b[2]],[b[3]]]);" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 35 "tv:=matrix([[c[1]],[c[2]],[c[3]]]);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "trista2:=multiply(bigbarf,gr
oss);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "reality2:=multiply
(bigbarf,why);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "sick2:=mu
ltiply(bigbarf,tv);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "ap4:
=[trista2[1,1],trista2[2,1],trista2[3,1]];" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 49 "bp4:=[reality2[1,1],reality2[2,1],reality2[3,1]];" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "cp4:=[sick2[1,1],sick2[2,
1],sick2[3,1]];" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 72 "love:=po
lygonplot3d([ap4,bp4,cp4],labels=[x,y,z],axes=normal,color=red):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "display(love);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "display([because4,because5,because6
,love],insequence=true);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "
" }}}}{MARK "89" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 
1 2 33 1 1 }