(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "20-May-2000 10:32:09" ("compiled on " {DSK}medley3.5>lispusers>PLOTOBJECTS.;3) " 9-Apr-2000 18:01:32" tcompl'd in "LFG 8-May-2000 ..." dated " 8-May-2000 12:15:45") (FILECREATED "20-May-2000 10:31:55" {DSK}medley3.5>lispusers>PLOTOBJECTS.;3 98205 changes to%: (VARS PLOTOBJECTSCOMS CIRCLE CROSS) previous date%: " 4-Nov-93 14:59:31" {DSK}medley3.5>lispusers>PLOTOBJECTS.;2) COPYCOMPOUND :D8 (L (1 PLOT 0 PLOTOBJECT)) N@ !`0HdA LKh]K&MdIHdJ(37 COPYPLOTOBJECT) (67 COMPOUNDDATA 25 COMPOUNDDATA 15 |COMPOUNDDATATYPE#| 5 PLOTOBJECT) () COPYCURVE :D8 (L (1 PLOT 0 PLOTOBJECT)) 9@ !`H dIH dJ(48 COPYALL 29 COPYALL) (41 CURVEDATA 22 CURVEDATA 15 |CURVEDATATYPE#| 5 PLOTOBJECT) () COPYFILLEDRECTANGLE :D8 (L (1 PLOT 0 PLOTOBJECT)) @ a`HddIHddJHddKHddLHdMHdNNIL (128 FILLEDRECTANGLEDATA 114 FILLEDRECTANGLEDATA 91 FILLEDRECTANGLEDATA 68 FILLEDRECTANGLEDATA 45 FILLEDRECTANGLEDATA 22 FILLEDRECTANGLEDATA 15 |FILLEDRECTANGLEDATATYPE#| 5 PLOTOBJECT) () COPYGENERIC :D8 (L (1 PLOT 0 PLOTOBJECT)) @ (12 HCOPYALL) (5 PLOTOBJECT) () COPYGRAPHOBJECT :D8 (L (1 PLOT 0 PLOTOBJECT)) B@ 1`HdIHdJH dK(57 COPYALL) (50 GRAPHDATA 36 GRAPHDATA 22 GRAPHDATA 15 |GRAPHDATATYPE#| 5 PLOTOBJECT) () COPYLINE :D8 (L (1 PLOT 0 PLOTOBJECT)) b@ A`HdIHddJHddKH dL(89 COPYALL) (82 LINEDATA 59 LINEDATA 36 LINEDATA 22 LINEDATA 15 |LINEDATATYPE#| 5 PLOTOBJECT) () COPYPOINT :D8 (L (1 PLOT 0 PLOTOBJECT)) 4@ !`H dIHdJ(29 COPYALL) (41 POINTDATA 22 POINTDATA 15 |POINTDATATYPE#| 5 PLOTOBJECT) () COPYPOLYGON :D8 (L (1 PLOT 0 PLOTOBJECT)) 9@ !`H dIH dJ(48 COPYALL 29 COPYALL) (41 POLYGONDATA 22 POLYGONDATA 15 |POLYGONDATATYPE#| 5 PLOTOBJECT) () COPYTEXT :D8 (L (1 PLOT 0 PLOTOBJECT)) G@ 1`H dIH dJHdK(48 COPYALL 29 COPYALL) (60 TEXTDATA 41 TEXTDATA 22 TEXTDATA 15 |TEXTDATATYPE#| 5 PLOTOBJECT) () CREATECOMPOUND :D8 (L (3 MENU 2 LABEL 1 COMPONENTS 0 COMPOUNDTYPE) F 0 COMPOUNDFNS) PgBC`dAd@ (29 CREATEPLOTOBJECT) (12 |COMPOUNDDATATYPE#| 5 COMPOUND) () CREATECURVE :D8 (L (3 MENU 2 STYLE 1 LABEL 0 POSITIONS) F 2 CURVEFNS) qRgAC`d@Bd3 `dB;0`BHdIBHdIBHdI`dkHdI (110 CREATEPLOTOBJECT) (88 |PLOT.STYLETYPE#| 42 |PLOT.STYLETYPE#| 29 |PLOT.STYLETYPE#| 12 |CURVEDATATYPE#| 5 CURVE) () CREATEFILLEDRECTANGLE :D8 (L (7 MENU 6 BORDERWIDTH 5 TEXTURE 4 LABEL 3 HEIGHT 2 WIDTH 1 BOTTOM 0 LEFT) F 2 FILLEDRECTANGLEFNS) PEgb RgDG`d@dAdBdCFkHdIdE (77 CREATEPLOTOBJECT) (23 |FILLEDRECTANGLEDATATYPE#| 15 FILLEDRECTANGLE 6 SHADE3) () CREATEGRAPH :D8 (L (4 MENU 3 STYLE 2 LABEL 1 NSAMPLES 0 GRAPHFN) F 2 GRAPHFNS) RgBD`d@A3 ldHdICd3 `dC;0`CHdICHdICHdI`dkHdI (127 CREATEPLOTOBJECT) (105 |PLOT.STYLETYPE#| 59 |PLOT.STYLETYPE#| 46 |PLOT.STYLETYPE#| 12 |GRAPHDATATYPE#| 5 GRAPH) () CREATELINE :D8 (L (4 MENU 3 STYLE 2 LABEL 1 CONSTANT 0 SLOPE) F 2 LINEFNS) RgBD`@hHdI@oHdIdACd3 `dC;0`CHdICHdICHdI`dkHdI (145 CREATEPLOTOBJECT) (123 |PLOT.STYLETYPE#| 77 |PLOT.STYLETYPE#| 64 |PLOT.STYLETYPE#| 12 |LINEDATATYPE#| 5 LINE) ( 34 0.0) CREATEPOINT :D8 (L (3 MENU 2 SYMBOL 1 LABEL 0 POSITION) F 0 STAR F 1 POINTFNS) &BPbQgAC`d@dB (35 CREATEPLOTOBJECT) (18 |POINTDATATYPE#| 11 POINT) () CREATEPOLYGON :D8 (L (3 MENU 2 STYLE 1 LABEL 0 POSITIONS) F 2 POLYGONFNS) qRgAC`d@Bd3 `dB;0`BHdIBHdIBHdI`dkHdI (110 CREATEPLOTOBJECT) (88 |PLOT.STYLETYPE#| 42 |PLOT.STYLETYPE#| 29 |PLOT.STYLETYPE#| 12 |POLYGONDATATYPE#| 5 POLYGON) () CREATETEXT :D8 (L (4 MENU 3 FONT 2 LABEL 1 TEXT 0 POSITION) F 0 TEXTFNS) %PgBD`d@dAdC (34 CREATEPLOTOBJECT) (12 |TEXTDATATYPE#| 5 TEXT) () DISTANCETOCOMPOUND :D8 (L (2 PLOT 1 STREAMPOSITION 0 COMPOUNDDATA)) ;@ HHAB IJAB JKKIY(45 DISTANCETOPLOTOBJECT 28 DISTANCETOPLOTOBJECT) (12 COMPOUNDDATA 5 PLOTOBJECT) () DISTANCETOCURVE :D8 (L (2 PLOT 1 STREAMPOSITION 0 CURVEDATA)) oA@ aHI"HIպjJ5J5ZAսjMMjMJAվjNNjNԼKKLLJHXjJHIջjKKjKNIL (13 CURVEDATA 6 PLOTOBJECT) () DISTANCETOFILLEDRECTANGLE :D8 (L (2 PLOT 1 STREAMPOSITION 0 FILLEDRECTANGLE)) N@ oAAH\H ]HH ^H H_IJNNMLdJGKOMKJ:i_OKKM_dOONJJL_dOOJNJJLNLIKOOJMdKDJNLJK8NJJL_dOOOKKM_dOOKOKKMOMO/AI_jOOjOAI_jOOjOlAI_jOOjOAI_ jO O jO NIL (69 FILLEDRECTANGLEDATA 61 FILLEDRECTANGLEDATA 51 FILLEDRECTANGLEDATA 43 FILLEDRECTANGLEDATA 34 FILLEDRECTANGLEDATA 25 FILLEDRECTANGLEDATA 5 PLOTOBJECT) ( 12 (NIL)) DISTANCETOGRAPH :D8 (L (2 PLOT 1 STREAMPOSITION 0 GRAPHOBJECT)) oA@ aHI"HIպjJ5J5ZAսjMMjMJAվjNNjNԼKKLLJHXjJHIջjKKjKNIL (13 GRAPHDATA 6 PLOTOBJECT) () DISTANCETOLINE :D8 (L (2 PLOT 1 STREAMPOSITION 0 LINEOBJECT)) AA@ d @ d  @ HKsJo IKYoJ ILH]KJLLNM_ANO__O_jOOjOOO_jOOjO (198 FIXR 118 FMINUS 91 EQP) (63 LINEDATA 56 PLOTOBJECT 38 LINEDATA 31 PLOTOBJECT 16 LINEDATA 9 PLOTOBJECT) ( 111 1.0 86 0.0) DISTANCETOPOINT :D8 (L (2 PLOT 1 STREAMPOSITION 0 POINT)) 3@ !HAչjIIjIHAպjJJjJNIL (12 POINTDATA 5 PLOTOBJECT) () DISTANCETOPOLYGON :D8 (L (2 PLOT 1 STREAMPOSITION 0 POLYGONDATA)) oA@ aHI"HIպjJ5J5ZAսjMMjMJAվjNNjNԼKKLLJHXjJHIջjKKjKNIL (13 POLYGONDATA 6 PLOTOBJECT) () DISTANCETOTEXT :D8 (L (2 PLOT 1 STREAMPOSITION 0 TEXTOBJECT)) 3@ !HAչjIIjIHAպjJJjJNIL (12 TEXTDATA 5 PLOTOBJECT) () DRAWCOMPOUNDOBJECT :D8 (L (2 PLOT 1 VIEWPORT 0 COMPOUNDOBJECT)) !@ dAB h(24 DRAWPLOTOBJECT) (12 COMPOUNDDATA 5 PLOTOBJECT) () DRAWCURVEOBJECT :D8 (L (2 PLOT 1 VIEWPORT 0 CURVEOBJECT)) A A@ Z0 KdA _O Oh_O&_OJhH M־M_M_L_LLH O'HB JLL_IOONgHOO O_(214 CLIPPED.DRAWTO 170 \INSUREWINDOW 143 MOVETO 94 DSPSCALE 50 WORLDTOSTREAM) (203 REPLACE 181 CURVEDATA 163 WINDOWINFO 156 PLOT 121 PLOT.STYLE 110 PLOT.STYLE 100 PLOT.STYLE 84 CURVEDATA 33 CURVEDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () DRAWFILLEDRECTANGLEOBJECT :D8 (L (2 PLOT 1 VIEWPORT 0 FILLEDRECTANGLEOBJECT)) AA@ ZhH Jּh____Jd_Ad AdO]Jd_Ad Ad O^JdJd_Ad AdOM_JdJd_Ad Ad ON_MO_NO_IhddHMNOOggK MNH IONLgH IOOLgH IMOLgH IMNLgH HB *JMJN JO JOO(486 \INSUREWINDOW 465 CLIPPED.DRAWTO 449 CLIPPED.DRAWTO 432 CLIPPED.DRAWTO 414 CLIPPED.DRAWTO 397 MOVETO 389 CLIPPED.BITBLT 43 DSPSCALE) (525 FILLEDRECTANGLEDATA 515 FILLEDRECTANGLEDATA 506 FILLEDRECTANGLEDATA 497 FILLEDRECTANGLEDATA 479 WINDOWINFO 472 PLOT 458 REPLACE 442 REPLACE 425 REPLACE 407 REPLACE 382 PAINT 377 TEXTURE 339 FLOATP 323 VIEWPORT 308 VIEWPORT 289 FILLEDRECTANGLEDATA 274 FILLEDRECTANGLEDATA 258 FLOATP 242 VIEWPORT 227 VIEWPORT 208 FILLEDRECTANGLEDATA 193 FILLEDRECTANGLEDATA 180 FLOATP 164 VIEWPORT 149 VIEWPORT 131 FILLEDRECTANGLEDATA 118 FLOATP 102 VIEWPORT 87 VIEWPORT 69 FILLEDRECTANGLEDATA 49 FILLEDRECTANGLEDATA 33 FILLEDRECTANGLEDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () DRAWGRAPHOBJECT :D8 (L (2 PLOT 1 VIEWPORT 0 GRAPHOBJECT)) aAA@ BdBdBdBdJJJ_hH O_O_O_h_NkkKLNkL4O"O O(Ad AdKKkM_Ad Ad O h _d_OOH OHB JOOAd AdO&O&kM_Ad Ad O _,O*O,h_*_(O"k_"O&O$_&O,&_*_IOOOgHOO O_!(598 CLIPPED.DRAWTO 527 CREATEPOSITION 409 \INSUREWINDOW 378 MOVETO 357 \NCONC2 350 CREATEPOSITION 184 DSPSCALE) (587 REPLACE 516 FLOATP 500 VIEWPORT 485 VIEWPORT 464 FLOATP 448 VIEWPORT 433 VIEWPORT 420 GRAPHDATA 402 WINDOWINFO 395 PLOT 339 FLOATP 323 VIEWPORT 308 VIEWPORT 288 FLOATP 273 VIEWPORT 258 VIEWPORT 216 PLOT.STYLE 204 PLOT.STYLE 191 PLOT.STYLE 172 GRAPHDATA 163 GRAPHDATA 154 GRAPHDATA 138 AXISINTERVAL 131 PLOTSCALE 124 PLOT 108 AXISINTERVAL 101 PLOTSCALE 94 PLOT 78 AXISINTERVAL 71 PLOTSCALE 64 PLOT 48 AXISINTERVAL 41 PLOTSCALE 34 PLOT 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () DRAWLINEOBJECT :D8 (L (2 PLOT 1 VIEWPORT 0 LINEOBJECT)) A`A@ BdBdBdBdJ_hH O_O_O_J_Jd_Jd_h___ _"OOL_$ONOOO$_&OOK_(OMOOO(_*Oh$OAd Ad_O/Ad AdO@Ad Ad OOAd _Ad AdO$Ad Ad O& _ Ad AdO(Ad Ad O* _"IO O"OgHOO HB `IdNJ_dOK_dOL_dO ]dIMdѹMdJMdѺMdKMdѻMdLMdѼHX.(115 EXTENTOFPLOTOBJECT) (245 EXTENT 225 EXTENT 211 EXTENT 190 EXTENT 176 EXTENT 156 EXTENT 142 EXTENT 121 EXTENT 54 |EXTENTTYPE#| 40 MIN.FLOAT 33 MAX.FLOAT 26 MIN.FLOAT 19 MAX.FLOAT 12 COMPOUNDDATA 5 PLOTOBJECT) () EXTENTOFCURVE :D8 (L (0 CURVEOBJECT)) @ ````hdW HA`I_dOJ_dOK_dOL_dO_OMIMYMJMNKN[NLNHXNIL (56 |EXTENTTYPE#| 40 MIN.FLOAT 33 MAX.FLOAT 26 MIN.FLOAT 19 MAX.FLOAT 12 CURVEDATA 5 PLOTOBJECT) () EXTENTOFFILLEDRECTANGLE :D8 (L (0 FILLEDRECTANGLE)) `@ dHdI@ HdHdHdI@ dHdI@ HdHdHdINIL (160 FILLEDRECTANGLEDATA 145 FILLEDRECTANGLEDATA 134 PLOTOBJECT 107 FILLEDRECTANGLEDATA 100 PLOTOBJECT 71 FILLEDRECTANGLEDATA 56 FILLEDRECTANGLEDATA 45 PLOTOBJECT 18 FILLEDRECTANGLEDATA 11 PLOTOBJECT 4 |EXTENTTYPE#|) () EXTENTOFGRAPH :D8 (L (0 GRAPHOBJECT)) 4`d`d`d`d`NIL (44 MIN.FLOAT 33 MAX.FLOAT 22 MIN.FLOAT 11 MAX.FLOAT 4 |EXTENTTYPE#|) () EXTENTOFLINE :D8 (L (0 LINEOBJECT)) 4`d`d`d`d`NIL (44 MIN.FLOAT 33 MAX.FLOAT 22 MIN.FLOAT 11 MAX.FLOAT 4 |EXTENTTYPE#|) () EXTENTOFPOINT :D8 (L (0 POINT)) B@ A`HdIHdJHdKHdLNIL (22 |EXTENTTYPE#| 12 POINTDATA 5 PLOTOBJECT) () EXTENTOFPOLYGON :D8 (L (0 POLYGONOBJECT)) @ ````hdW HA`I_dOJ_dOK_dOL_dO_OMIMYMJMNKN[NLNHXNIL (56 |EXTENTTYPE#| 40 MIN.FLOAT 33 MAX.FLOAT 26 MIN.FLOAT 19 MAX.FLOAT 12 POLYGONDATA 5 PLOTOBJECT) () EXTENTOFTEXT :D8 (L (0 TEXTOBJECT)) B@ A`HdIHdJHdKHdLNIL (22 |EXTENTTYPE#| 12 TEXTDATA 5 PLOTOBJECT) () GETCOMPOUND :D8 (L (0 PROPLST)) )`@g'HdI@g'HdINIL (28 COMPONENTS 11 COMPOUNDTYPE 4 |COMPOUNDDATATYPE#|) () GETCURVE :D8 (L (0 PROPLST)) F@g'Q`@g'dI`HdJHdKHdLdMNIL (33 |PLOT.STYLETYPE#| 21 CURVEPOINTS 14 |CURVEDATATYPE#| 5 STYLE) () GETFILLEDRECTANGLE :D8 (L (0 PROPLST)) u`@g'HdI@g'HdI@g'HdI@g'HdI@g'HdI@g'HdINIL (104 TEXTURE 87 BORDERWIDTH 68 OBJECTHEIGHT 49 OBJECTWIDTH 30 OBJECTBOTTOM 11 OBJECTLEFT 4 |FILLEDRECTANGLEDATATYPE#|) () GETGENERIC :D8 (L (0 EXPR)) @NIL NIL () GETGRAPH :D8 (L (0 PROPLST)) S@g'a`@g'dI@g'dJ`HdKHdLHdMdNNIL (46 |PLOT.STYLETYPE#| 34 NSAMPLES 21 GRAPHFN 14 |GRAPHDATATYPE#| 5 STYLE) () GETLINE :D8 (L (0 PROPLST)) g@g'q`@g'dI@g'dJ@g'dK`HdLHdMHdN_dONIL (63 |PLOT.STYLETYPE#| 49 CONSTANT 34 SLOPE 21 INFINITESLOPE? 14 |LINEDATATYPE#| 5 STYLE) () GETPOINT :D8 (L (0 PROPLST)) ;`@g'HdI@g'Hdd3@H HdI(46 EVAL) (28 SYMBOL 11 POINTPOSITION 4 |POINTDATATYPE#|) () GETPOLYGON :D8 (L (0 PROPLST)) F@g'Q`@g'dI`HdJHdKHdLdMNIL (33 |PLOT.STYLETYPE#| 21 POLYGONPOINTS 14 |POLYGONDATATYPE#| 5 STYLE) () GETTEXT :D8 (L (0 PROPLST)) :`@g'HdI@g'HdI@g'HdINIL (45 FONT 28 TEXT 11 TEXTPOSITION 4 |TEXTDATATYPE#|) () HIGHLIGHTCOMPOUND :D8 (L (2 PLOT 1 VIEWPORT 0 COMPOUNDOBJECT)) @ dB h(23 HIGHLIGHTPLOTOBJECT) (12 COMPOUNDDATA 5 PLOTOBJECT) () HIGHLIGHTCURVE :D8 (L (2 PLOT 1 VIEWPORT 0 CURVEOBJECT)) ~ AA@ ZJlLؽLK_KKH Oh_IOOMgHN O_(116 CLIPPED.DRAWTO 83 MOVETO) (108 INVERT 63 PLOT.STYLE 53 PLOT.STYLE 42 CURVEDATA 33 CURVEDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () HIGHLIGHTFILLEDRECTANGLE :D8 (L (2 PLOT 1 VIEWPORT 0 FILLEDRECTANGLE)) A A@ lJkػJJ J J_JJ _J J_IhddHLMNOggn LMH IOMKgH IOOKgH ILOKgH ILMKgH (226 CLIPPED.DRAWTO 210 CLIPPED.DRAWTO 193 CLIPPED.DRAWTO 175 CLIPPED.DRAWTO 158 MOVETO 150 CLIPPED.BITBLT) (219 INVERT 203 INVERT 186 INVERT 168 INVERT 141 INVERT 136 TEXTURE 115 FILLEDRECTANGLEDATA 107 FILLEDRECTANGLEDATA 95 FILLEDRECTANGLEDATA 87 FILLEDRECTANGLEDATA 76 FILLEDRECTANGLEDATA 67 FILLEDRECTANGLEDATA 58 FILLEDRECTANGLEDATA 49 FILLEDRECTANGLEDATA 36 FILLEDRECTANGLEDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () HIGHLIGHTGRAPH :D8 (L (2 PLOT 1 VIEWPORT 0 GRAPHOBJECT)) ~ AA@ ZJlLؽLK_KKH Oh_IOOMgHN O_(116 CLIPPED.DRAWTO 83 MOVETO) (108 INVERT 63 PLOT.STYLE 53 PLOT.STYLE 42 GRAPHDATA 33 GRAPHDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () HIGHLIGHTLINE :D8 (L (2 PLOT 1 VIEWPORT 0 LINEOBJECT)) aAqA@ Z[lؼKJ J_INOLgHM (94 CLIPPED.DRAWBETWEEN) (86 INVERT 71 LINEDATA 62 LINEDATA 53 PLOT.STYLE 41 PLOT.STYLE 33 LINEDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () HIGHLIGHTPOINT :D8 (L (2 PLOT 1 VIEWPORT 0 POINT)) p AA@ ZJK K LMl_LNl_IhddHOOMNggn (109 CLIPPED.BITBLT 58 BITMAPHEIGHT 51 BITMAPWIDTH) (100 INVERT 95 TEXTURE 42 POINTDATA 33 POINTDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () HIGHLIGHTPOLYGON :D8 (L (2 PLOT 1 VIEWPORT 0 POLYGONOBJECT)) AaA@ ZJlLؽLKK OOH OIOOMgHN h_IOOMgHN O_(139 CLIPPED.DRAWTO 112 CLIPPED.DRAWTO 85 MOVETO) (131 INVERT 104 INVERT 63 PLOT.STYLE 53 PLOT.STYLE 42 POLYGONDATA 33 POLYGONDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () HIGHLIGHTTEXTA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 STREAM F 1 BLANCREGION F 2 SI::*RESETFORMS* F 3 FONT F 4 STREAMX F 5 STREAMY F 6 TEXT F 7 STREAMSUBREGION) YghP PhSP hRcTUP VP cWhddPQQQQggn (86 CLIPPED.BITBLT 45 STRINGREGION 38 MOVETO 23 DSPFONT 11 DSPFONT) (77 INVERT 72 TEXTURE 4 DSPFONT) () HIGHLIGHTTEXT :D8 (L (2 PLOT 1 VIEWPORT 0 TEXTOBJECT) P 11 RESETSTATE P 10 SI::*RESETFORMS* P 9 LISPXHIST P 8 BLANCREGION P 7 STREAMY P 6 STREAMX P 4 FONT P 3 TEXT P 1 STREAMSUBREGION P 0 STREAM F 12 LISPXHIST) a AA@ ZJJ]M_h_W! g $(90 SI::RESETUNWIND 85 \MVLIST 80 HIGHLIGHTTEXTA0001) (75 SI::RESETUNWIND 51 TEXTDATA 42 TEXTDATA 33 TEXTDATA 25 PLOTOBJECT 16 VIEWPORT 5 VIEWPORT) () LABELGENERIC :D8 (L (1 PLOT 0 OBJECT) F 3 SMALLPLOTFONT) @A@g'JMoH A A I HhS ZIA @gJ hIA (124 DRAWPLOTOBJECT 115 PLOTOBJECTPROP 102 DRAWPLOTOBJECT 94 CREATETEXT 86 STREAMTOWORLD 80 GETPOSITION 59 PLOTPROMPT 53 CONCAT) (109 LABEL 73 WINDOWINFO 66 PLOT 35 LABEL 28 PLOTOBJECT 20 WINDOWINFO 13 PLOT 5 PLOTOBJECT) ( 47 "SELECT A POSITION FOR LABEL ") LABELPOINT :D8 (L (1 PLOT 0 POINT) F 8 SMALLPLOTFONT) @ A@@g'DH^N]H\KPMdlL _IdOMJhW [IA @gK hIA (158 DRAWPLOTOBJECT 149 PLOTOBJECTPROP 136 DRAWPLOTOBJECT 128 CREATETEXT 84 BITMAPWIDTH) (143 LABEL 109 FLOATP 93 VIEWPORT 67 POINTDATA 53 POINTDATA 43 LABEL 36 PLOTOBJECT 28 PLOTOBJECT 20 WINDOWINFO 13 PLOT 5 PLOTOBJECT) () LABELTEXT :D8 (L (1 PLOT 0 TEXTOBJECT)) oA (10 PLOTPROMPT) NIL ( 4 "Cannot label text") LOWLIGHTCOMPOUND :D8 (L (2 PLOT 1 VIEWPORT 0 COMPOUNDOBJECT)) @ dB h(23 LOWLIGHTPLOTOBJECT) (12 COMPOUNDDATA 5 PLOTOBJECT) () MOVECOMPOUND :D8 (L (3 PLOT 2 DY 1 DX 0 COMPOUNDOBJECT)) "@ dABC h(25 MOVEPLOTOBJECT) (12 COMPOUNDDATA 5 PLOTOBJECT) () MOVECURVE :D8 (L (3 PLOT 2 DY 1 DX 0 CURVEOBJECT)) +@ dHAHHBHhNIL (12 CURVEDATA 5 PLOTOBJECT) () MOVEFILLEDRECTANGLE :D8 (L (3 PLOT 2 DY 1 DX 0 FILLEDRECTANGLEOBJECT)) D@ HAHdHBHdhNIL (50 FILLEDRECTANGLEDATA 43 FILLEDRECTANGLEDATA 23 FILLEDRECTANGLEDATA 16 FILLEDRECTANGLEDATA 5 PLOTOBJECT) () MOVELINE :D8 (L (3 PLOT 2 DY 1 DX 0 LINEOBJECT)) ^@ HHdAHd)dAHdBhNIL (70 LINEDATA 54 LINEDATA 35 LINEDATA 23 LINEDATA 16 LINEDATA 5 PLOTOBJECT) () MOVEPOINT :D8 (L (3 PLOT 2 DY 1 DX 0 POINT)) !@ HAHHBHhNIL (12 POINTDATA 5 PLOTOBJECT) () MOVEPOLYGON :D8 (L (3 PLOT 2 DY 1 DX 0 POLYGONOBJECT)) +@ dHAHHBHhNIL (12 POLYGONDATA 5 PLOTOBJECT) () MOVETEXT :D8 (L (3 PLOT 2 DY 1 DX 0 TEXTOBJECT)) !@ HAHHBHhNIL (12 TEXTDATA 5 PLOTOBJECT) () PLOTCOMPOUND :D8 (L (0 ARGS)) elHo kala"IoI Hl2 NMNdaO[lK \JKLH%La"a_OOh__Nk^O&_hHkLkLah IHlLlLah (163 ADDPLOTOBJECT 142 CREATECOMPOUND 79 LENGTH 45 HELP 18 HELP) (64 PLOTOBJECT 33 PLOT) ( 39 "NOT a PLOT " 13 "Must have at least 3 args. Plot, compound type, and one component") PLOTCURVE :D8 (L (5 NODRAWFLG 4 MENU 3 STYLE 2 LABEL 1 POSITIONS 0 PLOT)) %@o@ ABCD @E (34 ADDPLOTOBJECT 27 CREATECURVE 17 HELP) (5 PLOT) ( 11 "NOT a PLOT ") PLOTFILLEDRECTANGLE :D8 (L (9 NODRAWFLG 8 MENU 7 BORDERWIDTH 6 TEXTURE 5 LABEL 4 HEIGHT 3 WIDTH 2 BOTTOM 1 LEFT 0 PLOT) F 0 SHADE3) 3 @o@ FPb ABCDEFGG @G (48 ADDPLOTOBJECT 40 CREATEFILLEDRECTANGLE 17 HELP) (5 PLOT) ( 11 "NOT a PLOT ") PLOTGRAPH :D8 (L (6 NODRAWFLG 5 MENU 4 STYLE 3 LABEL 2 NSAMPLES 1 GRAPHFN 0 PLOT)) '@o@ ABCDE @F (36 ADDPLOTOBJECT 29 CREATEGRAPH 17 HELP) (5 PLOT) ( 11 "NOT a PLOT ") PLOTLINE :D8 (L (6 NODRAWFLG 5 MENU 4 STYLE 3 LABEL 2 CONSTANT 1 SLOPE 0 PLOT)) '@o@ ABCDE @F (36 ADDPLOTOBJECT 29 CREATELINE 17 HELP) (5 PLOT) ( 11 "NOT a PLOT ") PLOTPOINT :D8 (L (5 NODRAWFLG 4 MENU 3 SYMBOL 2 LABEL 1 POSITION 0 PLOT)) %@o@ ABCD @E (34 ADDPLOTOBJECT 27 CREATEPOINT 17 HELP) (5 PLOT) ( 11 "NOT a PLOT ") PLOTPOINTS :D8 (L (5 NODRAWFLG 4 MENU 3 SYMBOL 2 LABELS 1 POSITIONS 0 PLOT)) @o@ A````IX`dJdKdLdMd@ AB2IMKX@H@ E@ H^dJNKNNdLNMNIYJCD JL Mh\IYM&(185 CREATEPOINT 133 REDRAWPLOTWINDOW 123 \APPEND2 91 ADJUSTSCALE? 17 HELP) (116 PLOT 109 PLOT 54 |EXTENTTYPE#| 42 MIN.FLOAT 37 MAX.FLOAT 32 MIN.FLOAT 27 MAX.FLOAT 5 PLOT) ( 11 "NOT a PLOT ") PLOTPOLYGON :D8 (L (5 NODRAWFLG 4 MENU 3 STYLE 2 LABEL 1 POSITIONS 0 PLOT)) %@o@ ABCD @E (34 ADDPLOTOBJECT 27 CREATEPOLYGON 17 HELP) (5 PLOT) ( 11 "NOT a PLOT ") PLOTTEXT :D8 (L (6 NODRAWFLG 5 MENU 4 FONT 3 LABEL 2 TEXT 1 POSITION 0 PLOT) F 0 SMALLPLOTFONT) -@o@ DPbABCDE @F (42 ADDPLOTOBJECT 35 CREATETEXT 17 HELP) (5 PLOT) ( 11 "NOT A PLOT ") PUTCOMPOUND :D8 (L (2 STREAM 1 PLOT 0 PLOTOBJECT)) @ oB kB oB kB HB kB oB kB HdBid oB h(125 PRIN1 109 HPRINT 90 SPACES 82 PRIN1 71 SPACES 63 PRIN2 48 SPACES 40 PRIN1 29 SPACES 21 PRIN1) (96 COMPOUNDDATA 55 COMPOUNDDATA 5 PLOTOBJECT) ( 119 "))" 76 "COMPONENTS (" 34 "COMPOUNDTYPE" 15 "(") PUTCURVE :D8 (L (2 STREAM 1 PLOT 0 PLOTOBJECT)) @ HYoB kB oB kB HB kB oB kB IIIhB kB oB h(156 PRIN1 144 SPACES 136 PRIN2 101 SPACES 93 PRIN1 81 SPACES 73 PRIN2 58 SPACES 50 PRIN1 38 SPACES 30 PRIN1) (124 PLOT.STYLE 116 PLOT.STYLE 108 PLOT.STYLE 65 CURVEDATA 16 CURVEDATA 5 PLOTOBJECT) ( 150 ")" 87 "STYLE" 44 "CURVEPOINTS" 24 "(") PUTFILLEDRECTANGLE :D8 (L (2 STREAM 1 PLOT 0 PLOTOBJECT)) D@ oB kB oB kB HdB kB oB kB HdB kB oB kB HdB kB oB kB HdB kB oB kB HB kB oB kB HB kB oB h(320 PRIN1 309 SPACES 301 PRIN2 286 SPACES 278 PRIN1 267 SPACES 259 PRIN2 244 SPACES 236 PRIN1 225 SPACES 217 PRIN2 195 SPACES 187 PRIN1 176 SPACES 168 PRIN2 146 SPACES 138 PRIN1 127 SPACES 119 PRIN2 97 SPACES 89 PRIN1 78 SPACES 70 PRIN2 48 SPACES 40 PRIN1 29 SPACES 21 PRIN1) (293 FILLEDRECTANGLEDATA 251 FILLEDRECTANGLEDATA 202 FILLEDRECTANGLEDATA 153 FILLEDRECTANGLEDATA 104 FILLEDRECTANGLEDATA 55 FILLEDRECTANGLEDATA 5 PLOTOBJECT) ( 314 ")" 272 "TEXTURE" 230 "BORDERWIDTH" 181 "OBJECTHEIGHT" 132 "OBJECTWIDTH" 83 "OBJECTBOTTOM" 34 "OBJECTLEFT" 15 "(") PUTGENERIC :D8 (L (2 STREAM 1 PLOT 0 OBJECT)) @ Bhi (15 HPRINT) (5 PLOTOBJECT) () PUTGRAPH :D8 (L (2 STREAM 1 PLOT 0 PLOTOBJECT)) @ HYoB kB oB kB HB kB oB kB HB kB oB kB IIIhB kB oB h(199 PRIN1 187 SPACES 179 PRIN2 144 SPACES 136 PRIN1 124 SPACES 116 PRIN2 101 SPACES 93 PRIN1 81 SPACES 73 PRIN2 58 SPACES 50 PRIN1 38 SPACES 30 PRIN1) (167 PLOT.STYLE 159 PLOT.STYLE 151 PLOT.STYLE 108 GRAPHDATA 65 GRAPHDATA 16 GRAPHDATA 5 PLOTOBJECT) ( 193 ")" 130 "STYLE" 87 "NSAMPLES" 44 "GRAPHFN" 24 "(") PUTLINE :D8 (L (2 STREAM 1 PLOT 0 PLOTOBJECT)) @ HYoB kB oB kB HB kB oB kB HdB kB oB kB HdB kB oB kB IIIhB oB h(248 PRIN1 236 PRIN2 201 SPACES 193 PRIN1 181 SPACES 173 PRIN2 151 SPACES 143 PRIN1 131 SPACES 123 PRIN2 101 SPACES 93 PRIN1 81 SPACES 73 PRIN2 58 SPACES 50 PRIN1 38 SPACES 30 PRIN1) (224 PLOT.STYLE 216 PLOT.STYLE 208 PLOT.STYLE 158 LINEDATA 108 LINEDATA 65 LINEDATA 16 LINEDATA 5 PLOTOBJECT) ( 242 ")" 187 "STYLE" 137 "CONSTANT" 87 "SLOPE" 44 "INFINITESLOPE?" 24 "(") PUTPOINT :D8 (L (2 STREAM 1 PLOT 0 PLOTOBJECT) F 3 STAR F 4 CROSS F 5 CIRCLE) @ !HYddSgdTgUgZoB kB oB kB HB kB oB kB JIBid oB hB kB (175 SPACES 167 PRIN2 159 PRIN1 147 HPRINT 135 SPACES 127 PRIN1 115 SPACES 107 PRIN2 92 SPACES 84 PRIN1 72 SPACES 64 PRIN1) (99 POINTDATA 52 CIRCLE 42 CROSS 30 STAR 16 POINTDATA 5 PLOTOBJECT) ( 153 ")" 121 "SYMBOL" 78 "POINTPOSITION" 58 "(") PUTPOLYGON :D8 (L (2 STREAM 1 PLOT 0 PLOTOBJECT)) @ HYoB kB oB kB HB kB oB kB IIIhB kB oB h(156 PRIN1 144 SPACES 136 PRIN2 101 SPACES 93 PRIN1 81 SPACES 73 PRIN2 58 SPACES 50 PRIN1 38 SPACES 30 PRIN1) (124 PLOT.STYLE 116 PLOT.STYLE 108 PLOT.STYLE 65 POLYGONDATA 16 POLYGONDATA 5 PLOTOBJECT) ( 150 ")" 87 "STYLE" 44 "POLYGONPOINTS" 24 "(") PUTTEXT :D8 (L (2 STREAM 1 PLOT 0 PLOTOBJECT)) @ HYoB kB oB kB HB kB oB kB HB kB oB kB IBid oB h(164 PRIN1 153 HPRINT 144 SPACES 136 PRIN1 124 SPACES 116 PRIN2 101 SPACES 93 PRIN1 81 SPACES 73 PRIN2 58 SPACES 50 PRIN1 38 SPACES 30 PRIN1) (108 TEXTDATA 65 TEXTDATA 16 TEXTDATA 5 PLOTOBJECT) ( 158 ")" 130 "FONT" 87 "TEXT" 44 "TEXTPOSITION" 24 "(") (PRETTYCOMPRINT PLOTOBJECTSCOMS) (RPAQQ PLOTOBJECTSCOMS ((FNS COPYCOMPOUND COPYCURVE COPYFILLEDRECTANGLE COPYGENERIC COPYGRAPHOBJECT COPYLINE COPYPOINT COPYPOLYGON COPYTEXT CREATECOMPOUND CREATECURVE CREATEFILLEDRECTANGLE CREATEGRAPH CREATELINE CREATEPOINT CREATEPOLYGON CREATETEXT DISTANCETOCOMPOUND DISTANCETOCURVE DISTANCETOFILLEDRECTANGLE DISTANCETOGRAPH DISTANCETOLINE DISTANCETOPOINT DISTANCETOPOLYGON DISTANCETOTEXT DRAWCOMPOUNDOBJECT DRAWCURVEOBJECT DRAWFILLEDRECTANGLEOBJECT DRAWGRAPHOBJECT DRAWLINEOBJECT DRAWPOINTOBJECT DRAWPOLYGONOBJECT DRAWTEXTOBJECT ERASECOMPOUNDOBJECT ERASECURVEOBJECT ERASEFILLEDRECTANGLEOBJECT ERASEGRAPHOBJECT ERASELINEOBJECT ERASEPOINTOBJECT ERASEPOLYGONOBJECT ERASETEXTOBJECT EXTENTOFCOMPOUND EXTENTOFCURVE EXTENTOFFILLEDRECTANGLE EXTENTOFGRAPH EXTENTOFLINE EXTENTOFPOINT EXTENTOFPOLYGON EXTENTOFTEXT GETCOMPOUND GETCURVE GETFILLEDRECTANGLE GETGENERIC GETGRAPH GETLINE GETPOINT GETPOLYGON GETTEXT HIGHLIGHTCOMPOUND HIGHLIGHTCURVE HIGHLIGHTFILLEDRECTANGLE HIGHLIGHTGRAPH HIGHLIGHTLINE HIGHLIGHTPOINT HIGHLIGHTPOLYGON HIGHLIGHTTEXT LABELGENERIC LABELPOINT LABELTEXT LOWLIGHTCOMPOUND MOVECOMPOUND MOVECURVE MOVEFILLEDRECTANGLE MOVELINE MOVEPOINT MOVEPOLYGON MOVETEXT PLOTCOMPOUND PLOTCURVE PLOTFILLEDRECTANGLE PLOTGRAPH PLOTLINE PLOTPOINT PLOTPOINTS PLOTPOLYGON PLOTTEXT PUTCOMPOUND PUTCURVE PUTFILLEDRECTANGLE PUTGENERIC PUTGRAPH PUTLINE PUTPOINT PUTPOLYGON PUTTEXT) (MACROS L1METRIC L2METRIC) (VARS CIRCLE CROSS DASH DOT DOTDASH SHADE1 SHADE2 SHADE3 SHADE4 SHADE5 SHADE6 SHADE7 SHADE8 STAR) (RECORDS COMPOUNDDATA CURVEDATA FILLEDRECTANGLEDATA GRAPHDATA LINEDATA PLOT.STYLE POINTDATA POLYGONDATA TEXTDATA) (PROP ARGNAMES PLOTCOMPOUND) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY (FILES (LOADCOMP) PLOT TWODGRAPHICS)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY (LOCALVARS . T)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA PLOTCOMPOUND))))) (PUTPROPS L1METRIC MACRO (OPENLAMBDA (POINT1 POINT2) (* jop%: "17-Jan-85 15:27") (* ;; "Computes the L 1 metric between POINT1 and POINT2") (PLUS (IABS (DIFFERENCE (fetch XCOORD of POINT1) (fetch XCOORD of POINT2))) (IABS (DIFFERENCE (fetch YCOORD of POINT1) (fetch YCOORD of POINT2)))))) (PUTPROPS L2METRIC MACRO (OPENLAMBDA (POINT1 POINT2 PLOT) (* jop%: "17-Jan-85 15:27") (* ;; "Computes the L 2 metric between POINT1 and POINT2") (FPLUS (FTIMES (FDIFFERENCE (fetch XCOORD of POINT1) (fetch XCOORD of POINT2)) (FDIFFERENCE (fetch XCOORD of POINT1) (fetch XCOORD of POINT2))) ( FTIMES (FTIMES (fetch NORMCONSTANT of PLOT) (FDIFFERENCE (fetch YCOORD of POINT1) (fetch YCOORD of POINT2))) (FTIMES (fetch NORMCONSTANT of PLOT) (FDIFFERENCE (fetch YCOORD of POINT1) (fetch YCOORD of POINT2))))))) (RPAQQ CIRCLE #*(5 5)G@@@HH@@HH@@HH@@G@@@) (RPAQQ CROSS #*(5 5)B@@@B@@@OH@@B@@@B@@@) (RPAQQ DASH (5)) (RPAQQ DOT (1 5)) (RPAQQ DOTDASH (5 5 1 5)) (RPAQQ SHADE1 64) (RPAQQ SHADE2 576) (RPAQQ SHADE3 4680) (RPAQQ SHADE4 37449) (RPAQQ SHADE5 55899) (RPAQQ SHADE6 31710) (RPAQQ SHADE7 64479) (RPAQQ SHADE8 65023) (RPAQQ STAR #*(5 5)JH@@G@@@OH@@G@@@JH@@) (DATATYPE COMPOUNDDATA (COMPOUNDTYPE COMPONENTS)) (DATATYPE CURVEDATA (CURVEPOINTS STREAMPOINTS STYLE)) (DATATYPE FILLEDRECTANGLEDATA ((OBJECTLEFT FLOATING) (OBJECTBOTTOM FLOATING) (OBJECTWIDTH FLOATING) ( OBJECTHEIGHT FLOATING) STREAMLEFT STREAMBOTTOM STREAMWIDTH STREAMHEIGHT BORDERWIDTH TEXTURE) BORDERWIDTH _ 1 (ACCESSFNS ((OBJECTRIGHT (PLUS (fetch (FILLEDRECTANGLEDATA OBJECTLEFT) of DATUM) ( fetch (FILLEDRECTANGLEDATA OBJECTWIDTH) of DATUM))) (OBJECTTOP (PLUS (fetch (FILLEDRECTANGLEDATA OBJECTBOTTOM) of DATUM) (fetch (FILLEDRECTANGLEDATA OBJECTHEIGHT) of DATUM))) (STREAMRIGHT (PLUS ( fetch (FILLEDRECTANGLEDATA STREAMLEFT) of DATUM) (fetch (FILLEDRECTANGLEDATA STREAMWIDTH) of DATUM))) (STREAMTOP (PLUS (fetch (FILLEDRECTANGLEDATA STREAMBOTTOM) of DATUM) (fetch (FILLEDRECTANGLEDATA STREAMHEIGHT) of DATUM)))))) (DATATYPE GRAPHDATA (GRAPHFN NSAMPLES STYLE STREAMPOSITIONS)) (DATATYPE LINEDATA (STYLE INFINITESLOPE? (SLOPE FLOATING) (CONSTANT FLOATING) (STREAMSLOPE FLOATING) ( STREAMCONSTANT FLOATING) STREAMPT1 STREAMPT2) STYLE _ 1) (DATATYPE PLOT.STYLE (LINEWIDTH DASHING COLOR) LINEWIDTH _ 1) (DATATYPE POINTDATA (POINTPOSITION STREAMPOSITION SYMBOL) SYMBOL _ STAR) (DATATYPE POLYGONDATA (POLYGONPOINTS STREAMPOINTS STYLE) STYLE _ 1) (DATATYPE TEXTDATA (TEXTPOSITION STREAMPOSITION TEXT FONT) FONT _ SMALLPLOTFONT) (/DECLAREDATATYPE (QUOTE COMPOUNDDATA) (QUOTE (POINTER POINTER)) (QUOTE ((COMPOUNDDATA 0 POINTER) ( COMPOUNDDATA 2 POINTER))) (QUOTE 4)) (/DECLAREDATATYPE (QUOTE CURVEDATA) (QUOTE (POINTER POINTER POINTER)) (QUOTE ((CURVEDATA 0 POINTER) ( CURVEDATA 2 POINTER) (CURVEDATA 4 POINTER))) (QUOTE 6)) (/DECLAREDATATYPE (QUOTE FILLEDRECTANGLEDATA) (QUOTE (FLOATP FLOATP FLOATP FLOATP POINTER POINTER POINTER POINTER POINTER POINTER)) (QUOTE ((FILLEDRECTANGLEDATA 0 FLOATP) (FILLEDRECTANGLEDATA 2 FLOATP ) (FILLEDRECTANGLEDATA 4 FLOATP) (FILLEDRECTANGLEDATA 6 FLOATP) (FILLEDRECTANGLEDATA 8 POINTER) ( FILLEDRECTANGLEDATA 10 POINTER) (FILLEDRECTANGLEDATA 12 POINTER) (FILLEDRECTANGLEDATA 14 POINTER) ( FILLEDRECTANGLEDATA 16 POINTER) (FILLEDRECTANGLEDATA 18 POINTER))) (QUOTE 20)) (/DECLAREDATATYPE (QUOTE GRAPHDATA) (QUOTE (POINTER POINTER POINTER POINTER)) (QUOTE ((GRAPHDATA 0 POINTER) (GRAPHDATA 2 POINTER) (GRAPHDATA 4 POINTER) (GRAPHDATA 6 POINTER))) (QUOTE 8)) (/DECLAREDATATYPE (QUOTE LINEDATA) (QUOTE (POINTER POINTER FLOATP FLOATP FLOATP FLOATP POINTER POINTER )) (QUOTE ((LINEDATA 0 POINTER) (LINEDATA 2 POINTER) (LINEDATA 4 FLOATP) (LINEDATA 6 FLOATP) (LINEDATA 8 FLOATP) (LINEDATA 10 FLOATP) (LINEDATA 12 POINTER) (LINEDATA 14 POINTER))) (QUOTE 16)) (/DECLAREDATATYPE (QUOTE PLOT.STYLE) (QUOTE (POINTER POINTER POINTER)) (QUOTE ((PLOT.STYLE 0 POINTER) (PLOT.STYLE 2 POINTER) (PLOT.STYLE 4 POINTER))) (QUOTE 6)) (/DECLAREDATATYPE (QUOTE POINTDATA) (QUOTE (POINTER POINTER POINTER)) (QUOTE ((POINTDATA 0 POINTER) ( POINTDATA 2 POINTER) (POINTDATA 4 POINTER))) (QUOTE 6)) (/DECLAREDATATYPE (QUOTE POLYGONDATA) (QUOTE (POINTER POINTER POINTER)) (QUOTE ((POLYGONDATA 0 POINTER ) (POLYGONDATA 2 POINTER) (POLYGONDATA 4 POINTER))) (QUOTE 6)) (/DECLAREDATATYPE (QUOTE TEXTDATA) (QUOTE (POINTER POINTER POINTER POINTER)) (QUOTE ((TEXTDATA 0 POINTER) (TEXTDATA 2 POINTER) (TEXTDATA 4 POINTER) (TEXTDATA 6 POINTER))) (QUOTE 8)) (PUTPROPS PLOTCOMPOUND ARGNAMES (NIL (PLOT COMPOUNDTYPE COMPONENT1 |...| LABEL MENU NODRAWFLG) . COMPOUNDARGS)) (PUTPROPS PLOTOBJECTS COPYRIGHT ("Xerox Corporation" 1985 1986 1987 1993 2000)) NIL