{VERSION 2 3 "APPLE_PPC_MAC" "2.3" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 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 }{PSTYLE "" 0 256 1 
{CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 
0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 256 "" 0 "" {TEXT -1 34 "Drawing Geometric Object
s in Maple" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 
-1 188 "Maple uses several procedures to specify geometric objects.  T
he cell below illustrates some of them.  You may want to look at the M
aple worksheet on color to see how colors are specified." }}{PARA 0 "
" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 440 "with(plots):\nwith(plottools):\n\nobject
1 := rectangle([0, 0], [1, 1], color=COLOR(RGB, 1, 0, 0)):\nobject2 :=
 line([1, 1], [2, 0], color=COLOR(RGB, 0, 0, 1)):\nobject3 := polygon(
[[2,0], [3,1], [4, 0]], color=COLOR(RGB, 0, 1, 0)):\nobject4 := disk([
2, 2], 1, color=COLOR(RGB, 1, 0, 1)):\nobject5 := ellipse([4,4], 2, 1,
 color=COLOR(RGB, 0, 0, 0)):\n\ndisplay([object1, object2, object3, ob
ject4, object5],\n  scaling=constrained, style=patchnogrid);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 34 }
{VIEWOPTS 1 1 0 1 1 1803 }