(DEFINE-FILE-INFO §READTABLE "INTERLISP" §PACKAGE "INTERLISP") (FILECREATED "17-Dec-86 16:07:13" ("compiled on " {ERIS}LIBRARY>GRAPHER.;56) "16-Dec-86 12:11:24" recompiled changes%: SCALE/TONODES in "Xerox Lisp 16-Dec-86 ..." dated "16-Dec-86 12:45:08") (FILECREATED "17-Dec-86 15:59:09" {ERIS}LIBRARY>GRAPHER.;56 160517 changes to%: (VARS ScalableLinkParameters) (FNS SCALE/TONODES) previous date%: "18-Mar-86 17:50:25" {ERIS}LIBRARY>GRAPHER.;53) GRAPHMOVENODE :D4 (L (3 WINDOW 2 GRAPH 1 NEWPOS 0 NODE)) @dAô‘hA @ABC@@ (29 CALL.MOVENODEFN 12 SET/LAYOUT/POSITION) NIL () ADD/AND/DISPLAY/LINK :D4 (L (3 G 2 WIN 1 TOND 0 FROMND)) .A@ oi i h@ACB@AoBC i(42 DISPLAYLINK 30 GRAPHADDLINK 21 TERPRI 17 PRIN1 8 MEMBTONODES 5 TOLINKS) NIL ( 36 (0 . 0) 13 " link already exists. ") APPLYTOSELECTEDNODE :D4 (L (0 WINDOW)) "@dg @g @g @ É (31 GRAPHBUTTONEVENTFN 25 \INSUREWINDOW 21 GETWINDOWUSERPROP 14 GETWINDOWUSERPROP 7 GETWINDOWUSERPROP) (18 BROWSER/MIDDLEFN 11 BROWSER/LEFTFN 4 GRAPH) () CALL.MOVENODEFN :D4 (L (4 OLDPOS 3 WINDOW 2 GRAPH 1 NEWPOS 0 NODE)) BH´ @ABCDlHhNIL NIL () CHANGE.NODEFONT.SIZE :D4 (L (3 WINDOW 2 GRAPH 1 NODE 0 HOW)) V@A H´AAoCB¿BY™@ABClI¿AH¿Ai ¿AoCBh(82 DISPLAYNODE 71 MEASUREGRAPHNODE 30 DISPLAYNODE 14 NEXTSIZEFONT) NIL ( 77 (0 . 0) 25 (0 . 0)) CHOOSE.GRAPH.FONT :D4 (L (0 GRAPH)) @NIL NIL () CLOSEST/NODE :D4 (L (1 POS 0 NODELST)) "nýè!@¡IH@A Zñ”@¹J¸@b°è(18 MANHATTANDIST) NIL () DEFAULT.ADDNODEFN :D4 (L (3 FONT 2 BOXED 1 WINDOW 0 GRAPH)) /o X¿H d@³ôHhA hdCµ@ B (44 NODECREATE 39 CHOOSE.GRAPH.FONT 30 CURSORPOSITION 18 PACK* 15 GENSYM 9 PROMPTINWINDOW) NIL ( 6 "Node label? ") DELETE/AND/DISPLAY/LINK :D4 (L (3 G 2 WIN 1 TOND 0 FROMND)) WA@ ³@A ²4C³.@Ab¿Hb@A @ACB¿@AoBChH ioi i h(83 TERPRI 79 PRIN1 69 DISPLAYLINK 54 GRAPHDELETELINK 44 LINKPARAMETERS 19 MEMBTONODES 16 TOLINKS 8 MEMBTONODES 5 TOLINKS) NIL ( 75 " link does not exist. " 61 (0 . 0)) DISPLAY/NAME :D4 (L (0 ND)) @NIL NIL () DISPLAYGRAPH :D4 (L (3 TRANS 2 CLIP/REG 1 STREAM 0 GRAPH)) ykC™C3”C3¦ob¿Ag bd ´nýèA °$A ¹@AIb¿ICê ICê b¿IX¿@ŒdCA@iH ¿µò@‰dCAB¿µõh(112 PRINTDISPLAYNODE 96 DISPLAYNODELINKS 75 FIXR 68 FIXR 58 SCALE/GRAPH 51 DSPSCALE 45 DSPRIGHTMARGIN 36 DISPLAYSTREAMP 30 \GETSTREAM) (27 OUTPUT) ( 20 (0 . 0)) DISPLAYLINK :D4 (L (6 PARAMS 5 LINEWIDTH 4 G 3 STREAM 2 TRANS 1 TOND 0 FRND)) –Dd²T©A @ ñ›B@AEhCF @ A ñ³`@ A ñ›B@AEhCF A @ ñ´JB@AEhCF ³Ú@ A ñ³ÏA @ ñ³ÛA @ ñ³˜@ A ñ´ B@AEhCF (147 DISPLAYLINK/LR 133 GN/RIGHT 129 GN/LEFT 122 GN/RIGHT 118 GN/LEFT 111 GN/TOP 107 GN/BOTTOM 100 GN/TOP 96 GN/BOTTOM 86 DISPLAYLINK/TB 72 GN/TOP 68 GN/BOTTOM 63 DISPLAYLINK/BT 50 GN/TOP 46 GN/BOTTOM 39 GN/RIGHT 35 GN/LEFT 30 DISPLAYLINK/RL 17 GN/RIGHT 13 GN/LEFT) NIL () DISPLAYLINK/BT :D4 (L (6 PARAMS 5 STREAM 4 OPERATION 3 WIDTH 2 GNT 1 GNB 0 TRANS)) LFg'µg@AØ@A kÙØ@BØ@B kØØFg'µCµkDEFg'Fg'Fl H(41 GN/TOP 25 GN/BOTTOM) (66 DASHING 61 COLOR 48 LINEWIDTH 9 DRAWLINE 3 DRAWLINKFN) () DISPLAYLINK/LR :D4 (L (6 PARAMS 5 STREAM 4 OPERATION 3 WIDTH 2 GNR 1 GNL 0 TRANS)) LFg'µg@A kÙØ@AØ@B kØØ@BØFg'µCµkDEFg'Fg'Fl H(34 GN/RIGHT 18 GN/LEFT) (66 DASHING 61 COLOR 48 LINEWIDTH 9 DRAWLINE 3 DRAWLINKFN) () DISPLAYLINK/RL :D4 (L (6 PARAMS 5 STREAM 4 OPERATION 3 WIDTH 2 GNL 1 GNR 0 TRANS)) LFg'µg@A kØØ@AØ@B kÙØ@BØFg'µCµkDEFg'Fg'Fl H(34 GN/LEFT 18 GN/RIGHT) (66 DASHING 61 COLOR 48 LINEWIDTH 9 DRAWLINE 3 DRAWLINKFN) () DISPLAYLINK/TB :D4 (L (6 PARAMS 5 STREAM 4 OPERATION 3 WIDTH 2 GNB 1 GNT 0 TRANS)) LFg'µg@AØ@A kØØ@BØ@B kÙØFg'µCµkDEFg'Fg'Fl H(41 GN/BOTTOM 25 GN/TOP) (66 DASHING 61 COLOR 48 LINEWIDTH 9 DRAWLINE 3 DRAWLINKFN) () EDITTOGGLEBORDERA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 4 W) †Tg T É"H¨o ho HI Zi JgTHH²H»JHTlK¿oi ¿Ji ¿oi ¿i J(130 TERPRI 125 PRIN1 116 PRIN1 99 PRIN1 57 RESET/NODE/BORDER 48 TERPRI 43 READ/NODE 37 PROMPTPRINT 28 PROMPTPRINT 13 \INSUREWINDOW 9 GETWINDOWUSERPROP 2 CLRPROMPT) (52 INVERT 6 GRAPH) ( 121 " inverted." 95 "Node " 34 " Select node to have border inverted. " 25 " No nodes to invert. ") EDITTOGGLEBORDER :D4 (P 0 SI::*RESETFORMS* I 0 W) %g` hhhg ¿ (34 CL:VALUES-LIST 30 SI::RESETUNWIND 27 \MVLIST 24 EDITTOGGLEBORDERA0001 8 TTYDISPLAYSTREAM) (21 SI::RESETUNWIND 5 PROMPTWINDOW 2 TTYDISPLAYSTREAM) () ERASE/GRAPHNODE :D4 (L (2 TRANS 1 STREAM 0 NODE)) zA µ Ag hðµY@HjðµH´H µ=@hðµ.hddABµ0@ Bµ!@ @@ggj @ Ø°ß@ Ø°Ð(117 GN/LEFT 109 GN/BOTTOM 103 BKBITBLT 77 GN/BOTTOM 70 GN/LEFT 41 \FZEROP 12 IMAGESTREAMTYPEP 3 WINDOWP) (98 REPLACE 95 TEXTURE 9 DISPLAY) () DISPLAYNODE :D4 (L (4 TOSONLY 3 G 2 STREAM 1 TRANS 0 NODE)) @ABCD @ABhB (19 PRINTDISPLAYNODE 16 DSPCLIPPINGREGION 8 DISPLAYNODELINKS) NIL () DISPLAYNODELINKS :D4 (L (5 LINEWIDTH 4 TOSONLY 3 G 2 STREAM 1 TRANS 0 NODE)) SC!@ !KµD§@ Yµ h¼@LH ]ABCE@M ¿K[°ÖH Z@ABCEJ@ ¿I°Ç(76 DISPLAYLINK 72 LINKPARAMETERS 61 GETNODEFROMID 50 DISPLAYLINK 46 LINKPARAMETERS 36 GETNODEFROMID 22 FROMLINKS 8 TOLINKS) NIL () DRAW/GRAPHNODE/BORDER :D4 (L (5 STREAM 4 HEIGHT 3 WIDTH 2 BOTTOM 1 LEFT 0 BORDER)) K@hðµ*@diðœ¿ABCDkhE 3 ²@jñhðµ ABCD@hE @ŸABCD@hE@ o@ (72 ERROR 63 DRAWAREABOX 44 DRAWAREABOX 21 DRAWAREABOX) NIL ( 68 "Illegal border:") DRAWAREABOX :D4 (L (7 TEXTURE 6 W 5 OP 4 BORDER 3 BOXHEIGHT 2 BOXWIDTH 1 BOXBOTTOM 0 BOXLEFT)) gG¥nÿÿb¿hddF@ADCgEG hddF@DÔACÔDÕBDdÔÕDgEG hddF@DÔABDdÔÕDgEG hddF@BÔDÕADCgEG (100 BKBITBLT 78 BKBITBLT 54 BKBITBLT 26 BKBITBLT) (93 TEXTURE 71 TEXTURE 47 TEXTURE 19 TEXTURE) () EDITADDLINK :D4 (L (0 W)) gg@g @(16 EDITAPPLYTOLINK 12 GETWINDOWUSERPROP) (9 GRAPH 5 added 2 ADD/AND/DISPLAY/LINK) () EDITADDNODE :D4 (L (0 W)) N@g H@ Yd ` ¿o` ¿I ` Io@h@ I@ ÉHI(74 TRACKCURSOR 68 \INSUREWINDOW 63 PRINTDISPLAYNODE 60 DSPCLIPPINGREGION 49 PRIN1 43 DISPLAY/NAME 38 PRIN1 27 TERPRI 21 MEASUREGRAPHNODE 14 GRAPHADDNODE 6 GETWINDOWUSERPROP) (46 PROMPTWINDOW 35 PROMPTWINDOW 24 PROMPTWINDOW 3 GRAPH) ( 54 (0 . 0) 32 "Position node ") EDITAPPLYTOLINKA0001A0002 :D4 (P 3 SI::*NLSETQFLAG* P 2 *PROCEED-CASES* P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 4 PROCEED-CASE0051 F 5 *PROCEED-CASES* F 6 GRAPH F 7 DS) Ei@ggggTgjgg gg UVW h (64 \MVLIST 58 READ/NODE 43 MAKE-PROCEED-CASE 39 CL:SYMBOL-FUNCTION 30 CL:SYMBOL-FUNCTION) (36 SI::ERRORSET-PRINT-FUNCTION 33 :REPORT 27 TRUE 24 :TEST 20 :SELECTOR 16 :TAG 13 ABORT 10 :NAME 7 :NORMAL) () EDITAPPLYTOLINKA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 5 PROCEED-CASE0051 I 0 SI::*CLEANUP-FORMS* F 6 DS F 7 GRAPH F 8 FN F 9 MSG) ÁW¢±¯Poi ¿i oi WV XHV oi hhM \»LºKdgð•¿J „j:´hµHV ¿YHV HIVWlW´8oi ¿H i ¿oi ¿I i ¿ki ¿Wi ¿i hi oi (190 PRINT 182 TERPRI 176 TERPRI 171 PRIN1 164 SPACES 158 PRIN1 154 DISPLAY/NAME 149 PRIN1 140 PRIN1 136 DISPLAY/NAME 131 PRIN1 110 FLIPNODE 105 CLRPROMPT 101 ERROR! 97 FLIPNODE 83 CL:VALUES-LIST 64 EDITAPPLYTOLINKA0001A0002 54 PRIN1 46 FLIPNODE 41 CLRPROMPT 37 READ/NODE 30 PRIN1 22 TERPRI 17 PRIN1) (76 :NORMAL) ( 186 "There are no nodes. You can create nodes with the Add Node command." 145 " to " 127 "Link from " 50 "TO?" 26 "FROM?" 13 "Specify the link by selecting the FROM node, then the TO node.") EDITAPPLYTOLINK :D4 (P 0 SI::*RESETFORMS* I 3 DS I 2 GRAPH I 1 MSG I 0 FN) %g` hhhg ¿ (34 CL:VALUES-LIST 30 SI::RESETUNWIND 27 \MVLIST 24 EDITAPPLYTOLINKA0001 8 TTYDISPLAYSTREAM) (21 SI::RESETUNWIND 5 PROMPTWINDOW 2 TTYDISPLAYSTREAM) () EDITCHANGEFONT :D4 (L (1 W 0 HOW)) WAg A ÉH¨o h` ¿o` ¿@gð”oƒo` HI Zd´ @JHAh(83 CHANGE.NODEFONT.SIZE 72 READ/NODE 66 PRIN1 44 PRIN1 33 TERPRI 25 PROMPTPRINT 10 \INSUREWINDOW 6 GETWINDOWUSERPROP) (63 PROMPTWINDOW 49 SMALLER 41 PROMPTWINDOW 30 PROMPTWINDOW 3 GRAPH) ( 60 "larger." 55 "smaller." 38 " Select node to be made " 22 " No nodes yet. ") EDITCHANGELABEL :D4 (L (0 W)) h@g @ o#H¨o h` ¿o` HI [H@K\´àKJ@HKIJKLKi KJ@HK(100 DISPLAYNODE 93 MEASUREGRAPHNODE 75 ERASE/GRAPHNODE 69 DISPLAYNODE 59 GRAPHCHANGELABEL 52 READ/NODE 46 PRIN1 35 TERPRI 27 PROMPTPRINT 10 GETSTREAM 6 GETWINDOWUSERPROP) (43 PROMPTWINDOW 32 PROMPTWINDOW 3 GRAPH) ( 40 "Select node to have label changed." 24 " No nodes yet. " 14 (0 . 0)) EDITDELETELINK :D4 (L (0 W)) gg@g @(16 EDITAPPLYTOLINK 12 GETWINDOWUSERPROP) (9 GRAPH 5 deleted 2 DELETE/AND/DISPLAY/LINK) () EDITDELETENODEA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 5 W) ÐUg U É2H¨o ho HI Zi JI hdoJ [hgð²oJI ¿JoIH¿J °d¼JLH HU¿µîJ ŽdH JHU¿µðJHU¿oi ¿Ki ¿oi ¿i JJI ¿oi ¿i h(204 TERPRI 199 PRIN1 190 FLIPNODE 183 TERPRI 178 PRIN1 169 PRIN1 163 PRIN1 154 GRAPHDELETENODE 143 GRAPHDELETELINK 137 GETNODEFROMID 129 \APPEND2 126 FROMLINKS 117 GRAPHDELETELINK 112 GETNODEFROMID 100 \APPEND2 97 TOLINKS 92 DISPLAYNODE 81 FLIPNODE 70 ASKUSER 63 DISPLAY/NAME 53 FLIPNODE 48 TERPRI 43 READ/NODE 37 PROMPTPRINT 28 PROMPTPRINT 13 \INSUREWINDOW 9 GETWINDOWUSERPROP 2 CLRPROMPT) (73 Y 6 GRAPH) ( 195 "nothing deleted." 174 " deleted." 159 "Node " 87 (0 . 0) 59 "delete node " 34 " Select node to be deleted. " 25 " No nodes to delete. ") EDITDELETENODE :D4 (P 0 SI::*RESETFORMS* I 0 W) %g` hhhg ¿ (34 CL:VALUES-LIST 30 SI::RESETUNWIND 27 \MVLIST 24 EDITDELETENODEA0001 8 TTYDISPLAYSTREAM) (21 SI::RESETUNWIND 5 PROMPTWINDOW 2 TTYDISPLAYSTREAM) () EDITGRAPH :D4 (L (1 WINDOW 0 GRAPH)) R@d³dddddddddddhbA bdg@AggAgggA A A @(78 EDITGRAPH1 74 REDISPLAYGRAPH 70 DSPOPERATION 63 PUTWINDOWPROP 53 PUTWINDOWPROP 43 PUTWINDOWPROP 33 SIZE/GRAPH/WINDOW) (66 INVERT 60 SCROLLBYREPAINTFN 57 SCROLLFN 50 REDISPLAYGRAPH 47 REPAINTFN 39 GRAPH) () EDITGRAPH1A0001 :D4 (P 3 SI::*NLSETQFLAG* P 2 *PROCEED-CASES* P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 4 PROCEED-CASE0058 F 5 *PROCEED-CASES* F 6 W) Bi@ggggTgjgg gg UV h (61 \MVLIST 55 GRAPHEDITCOMMANDFN 43 MAKE-PROCEED-CASE 39 CL:SYMBOL-FUNCTION 30 CL:SYMBOL-FUNCTION) (36 SI::ERRORSET-PRINT-FUNCTION 33 :REPORT 27 TRUE 24 :TEST 20 :SELECTOR 16 :TAG 13 ABORT 10 :NAME 7 :NORMAL) () EDITGRAPH1 :D4 (P 0 PROCEED-CASE0058 I 0 W) ô¿o` ¿` ¿o` ¿` ¿o` ¿¿`låjð³ô`kåjð³WhhH !I»IºKdgð•¿J „j:´hµ#` ¿` ¿o` ¿` °?gð²9@g •@ °%` ¿o` ¿` ¿o` ¿¿`låIjðµI´I ²ä±ÿC(236 \FZEROP 212 GETMOUSESTATE 208 PRIN1 197 TERPRI 190 PRIN1 179 TERPRI 171 TRACKNODE 165 GETWINDOWUSERPROP 157 CLRPROMPT 145 TERPRI 138 PRIN1 127 TERPRI 120 TERPRI 105 CL:VALUES-LIST 83 EDITGRAPH1A0001 53 GETMOUSESTATE 49 PRIN1 38 TERPRI 31 PRIN1 20 TERPRI 13 PRIN1 2 CLRPROMPT) (216 LASTMOUSEBUTTONS 205 PROMPTWINDOW 194 PROMPTWINDOW 187 PROMPTWINDOW 176 PROMPTWINDOW 162 GRAPH 151 STOP 142 PROMPTWINDOW 135 PROMPTWINDOW 124 PROMPTWINDOW 117 PROMPTWINDOW 98 :NORMAL 67 LASTMOUSEBUTTONS 57 LASTMOUSEBUTTONS 46 PROMPTWINDOW 35 PROMPTWINDOW 28 PROMPTWINDOW 17 PROMPTWINDOW 10 PROMPTWINDOW) ( 202 "Press the middle button and select the 'Add a node' command." 184 "There are no nodes to move yet." 132 "command aborted." 43 "During an edit command, the middle button can be used to abort." 25 "Use the middle button to get a menu of edit commands." 7 "Use the left button to move nodes.") EDITGRAPHMENU :D4 NIL I`Ã“``do¿di¿di¿dg ¿dg¿jdnÿdhHdI ¿NIL (70 EDITGRAPHMENU 43 DEFAULTMENUHELDFN 36 CLRPROMPT 13 |MENUTYPE#| 9 EDITGRAPHMENU 5 MENU 2 EDITGRAPHMENU) ( 19 (("Add Node" (QUOTE ADDNODE)) ("Delete Node" (QUOTE DELETENODE)) ("Add Link" (QUOTE ADDLINK)) ("Delete Link" (QUOTE DELETELINK)) ("Toggle DirectedFlg" (QUOTE DIRECTED)) ("Toggle SidesFlg" (QUOTE SIDES)) STOP)) EDITMOVENODE :D4 (L (0 WINDOW)) Ý@ É@ É@g SJd¢±¯¾` ¿o` ¿o` ¿o` ¿NhH [ ½L•LH ¿Md•H ¿M¼¿`lå_jð³XO–O ³LL•LH ¿` ¿o` ¿o` ¿o` ¿LHJ¿` ¿o` hLNhHK ]ð¢±ÿz°‰(211 NODELST/AS/MENU 208 CURSORPOSITION 198 PRIN1 187 TERPRI 180 TRACKCURSOR 173 PRIN1 162 PRIN1 151 PRIN1 140 TERPRI 133 FLIPNODE 124 \FZEROP 101 GETMOUSESTATE 95 FLIPNODE 87 FLIPNODE 79 NODELST/AS/MENU 75 CURSORPOSITION 68 PRIN1 57 PRIN1 46 PRIN1 35 TERPRI 18 GETWINDOWUSERPROP 9 \INSUREWINDOW 3 \INSUREWINDOW) (195 PROMPTWINDOW 184 PROMPTWINDOW 170 PROMPTWINDOW 159 PROMPTWINDOW 148 PROMPTWINDOW 137 PROMPTWINDOW 105 LASTMOUSEBUTTONS 65 PROMPTWINDOW 54 PROMPTWINDOW 43 PROMPTWINDOW 32 PROMPTWINDOW 15 GRAPH) ( 192 "Done." 167 "and release the button." 156 "move the node to its new position" 145 "Holding the button down, " 62 "and press any button." 51 "you want to move " 40 "Move the cursor to the node ") EDITTOGGLELABELA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 4 W) ‡Tg T É"H¨o ho HI Zi JgTH²H»JHTlK¿oi ¿Ji ¿oi ¿i J(131 TERPRI 126 PRIN1 117 PRIN1 100 PRIN1 56 RESET/NODE/LABELSHADE 48 TERPRI 43 READ/NODE 37 PROMPTPRINT 28 PROMPTPRINT 13 \INSUREWINDOW 9 GETWINDOWUSERPROP 2 CLRPROMPT) (52 INVERT 6 GRAPH) ( 122 " inverted." 96 "Node " 34 " Select node to have label inverted. " 25 " No nodes to invert.") EDITTOGGLELABEL :D4 (P 0 SI::*RESETFORMS* I 0 W) %g` hhhg ¿ (34 CL:VALUES-LIST 30 SI::RESETUNWIND 27 \MVLIST 24 EDITTOGGLELABELA0001 8 TTYDISPLAYSTREAM) (21 SI::RESETUNWIND 5 PROMPTWINDOW 2 TTYDISPLAYSTREAM) () FLIPNODE :D4 (L (1 DS 0 NODE)) 4hddA@ kÙ@ kÙ@lØ@lØggnÿÿ (49 BKBITBLT 13 GN/BOTTOM 7 GN/LEFT) (42 INVERT 39 TEXTURE) () FONTNAMELIST :D4 (L (0 FONTDESC)) @g @g @g h(20 FONTPROP 13 FONTPROP 6 FONTPROP) (17 FACE 10 SIZE 3 FAMILY) () FROMLINKS :D4 (L (0 NODE)) @NIL NIL () GETNODEFROMID :D4 (L (1 NODELST 0 ID)) @Aµ@@gð–@Aµ o@ (29 ERROR) (12 Link% Parameters) ( 25 "No graphnode for nodeid:") GN/BOTTOM :D4 (L (0 NODE)) @@âÙNIL NIL () GN/LEFT :D4 (L (0 NODE)) @@âÙNIL NIL () GN/RIGHT :D4 (L (0 NODE)) @@kØâkÙØNIL NIL () GN/TOP :D4 (L (0 NODE)) @@kØâkÙØNIL NIL () GRAPHADDLINK :D4 (L (3 WINDOW 2 GRAPH 1 TO 0 FROM)) ABH™@ABClH¿AH@H@HAHNIL NIL () GRAPHADDNODE :D4 (L (1 W 0 GRAPH)) * @X—@AlH…@AiY¡h@dIh I(37 \NCONC2 24 DEFAULT.ADDNODEFN) NIL () GRAPHBUTTONEVENTFN :D4 (L (4 REG 3 MIDDLEFNOFNODE 2 LEFTFNOFNODE 1 GRAPH 0 WINDOW)) §@ A@ R`dlåjð§¿B´{g‹kåjð³pC´ngºHhI [ ½L•LI ¿Md•I ¿M¼¿`låjð²'L•LI ¿Jdgð’¿B‰gð‘C‚¾L@lN@ É``¨Ld”I hLHhIK ]ð²•°¥(159 NODELST/AS/MENU 156 CURSORPOSITION 146 FLIPNODE 138 INSIDE? 127 \INSUREWINDOW 114 SHOULDNT 93 FLIPNODE 75 GETMOUSESTATE 69 FLIPNODE 61 FLIPNODE 53 NODELST/AS/MENU 49 CURSORPOSITION 9 GETSTREAM 3 TOTOPW) (135 LASTMOUSEY 132 LASTMOUSEX 107 MIDDLE 99 LEFT 79 LASTMOUSEBUTTONS 42 MIDDLE 29 LEFT 15 LASTMOUSEBUTTONS) () GRAPHCHANGELABEL :D4 (L (2 NODE 1 W 0 GRAPH)) $@X˜@ABlHo (33 PROMPTINWINDOW) NIL ( 30 "Node label? ") GRAPHDELETELINK :D4 (L (3 WINDOW 2 GRAPH 1 TO 0 FROM)) LBH™@ABClH¿@A@ A@A (71 REMOVE 46 REMOVETONODES) NIL () GRAPHDELETENODE :D4 (L (2 WINDOW 1 GRAPH 0 NODE)) AH˜@ABlH¿A@A h(27 DREMOVE) NIL () GRAPHEDITCOMMANDFN :D4 (I 0 GRAPHWINDOW F 2 EDITGRAPHMENUCOMMANDS) è`Ã”`°;`dR¿di¿di¿dg ¿dg¿jdnÿdhHdI ¿ dgð“gdgð•¿@ dgð•¿@ dgð•¿@ dgð•¿@ dgð˜¿g@ dgð˜¿g@ dgð•¿@ dgð•¿@ dgð•¿@ dgð•¿@ dgð•¿@ gð´@ (229 EDITTOGGLELABEL 218 EDITTOGGLEBORDER 206 TOGGLE/SIDESFLG 194 TOGGLE/DIRECTEDFLG 182 EDITCHANGELABEL 170 EDITDELETELINK 158 EDITCHANGEFONT 143 EDITCHANGEFONT 128 EDITADDLINK 116 EDITDELETENODE 104 EDITADDNODE 92 EDITMOVENODE 71 MENU) (222 SHADE 211 BORDER 199 SIDES 187 DIRECTED 175 CHANGELABEL 163 DELETELINK 154 LARGER 148 LARGER 139 SMALLER 133 SMALLER 121 ADDLINK 109 DELETENODE 97 ADDNODE 85 MOVENODE 80 STOP 75 STOP 68 EDITGRAPHMENU 41 DEFAULTMENUHELDFN 34 CLRPROMPT 14 |MENUTYPE#| 9 EDITGRAPHMENU 5 MENU 2 EDITGRAPHMENU) () GRAPHEDITEVENTFN :D4 (L (0 GRWINDOW)) 2h@ @ @ ¤@ g ”@ @ gð´@ (47 CLOSEW 37 GRAPHEDITCOMMANDFN 32 TRACKNODE 27 SHIFTDOWNP 20 DOWINDOWCOM 15 INSIDE? 12 LASTMOUSEY 8 LASTMOUSEX 4 DSPCLIPPINGREGION) (40 STOP 24 CTRL) () GRAPHER/CENTERPRINTINAREA :D4 (L (5 STREAM 4 HEIGHT 3 WIDTH 2 Y 1 X 0 EXP)) ;Eg b @E ACHÙkØlÛØBDEÈÙEÈØlÛØE@E h(55 PRIN3 50 MOVETO 13 STRINGWIDTH 6 \GETSTREAM) (39 FONTDESCRIPTOR 32 FONTDESCRIPTOR 3 OUTPUT) () GRAPHNODE/BORDER/WIDTH :D4 (L (0 BORDER)) ,@µjið‘k@d3 “ œ@3 —j@ñ¢@o@ (41 ERROR 17 ABS) NIL ( 37 "Illegal border:") GRAPHREGION :D4 (L (0 GRAPH)) 9@!Hµjdddd ¿µøH YH ZH IÙkØH JÙkØ(54 CREATEREGION 47 MAX/TOP 39 MAX/RIGHT 34 MIN/BOTTOM 29 MIN/LEFT 20 MEASUREGRAPHNODE 14 CREATEREGION) NIL () HARDCOPYGRAPH :D4 (L (3 TRANS 2 IMAGETYPE 1 FILE 0 GRAPH/WINDOW)) 4AdŸdg —¿A µAB @d —¿@g HhCH (49 CLOSEF 45 DISPLAYGRAPH 39 GETWINDOWUSERPROP 30 WINDOWP 22 OPENIMAGESTREAM 15 GETSTREAM 9 OPENP) (36 GRAPH 6 OUTPUT) () INTERSECT/REGIONP/LBWH :D4 (L (4 REG 3 H 2 W 1 B 0 L)) -DACØñµ"DDØ@ýñµD@BØñµDDØAýñhðNIL NIL () INVERTED/GRAPHNODE/BORDER :D4 (L (0 BORDER)) *@dið‘h¡i@d3 ”¿j@Ù´@3 ´ @@ h(36 INVERTED/SHADE/FOR/GRAPHER) NIL () INVERTED/SHADE/FOR/GRAPHER :D4 (L (0 SHADE)) ;@dið‘h¡i@d3 “mÿæÃ’@µo@ nÿÿHhdddg H(55 BLTSHADE 37 BITMAPCOPY 33 ERROR) (51 INVERT 21 BITMAP) ( 29 "Illegal shade:") LAYOUT/POSITION :D4 (L (0 NODE)) @NIL NIL () LINKPARAMETERS :D4 (L (1 TOND 0 FROMND)) A@ Xd´ Hgð´H(11 MEMBTONODES 8 TOLINKS) (22 Link% Parameters) () MANHATTANDIST :D4 (L (1 POS2 0 POS1)) @AÙ @AÙ Ø(15 ABS 7 ABS) NIL () MAX/RIGHT :D4 (L (0 NODES)) @!HµI ºI“JIó‘J¹HX°ë(13 GN/RIGHT) NIL () MAX/TOP :D4 (L (0 NODES)) @!HµI ºI“JIó‘J¹HX°ë(13 GN/TOP) NIL () MEASUREGRAPHNODE :D4 (L (1 RESETFLG 0 NODE)) @A @dµ o@ (21 SET/LAYOUT/POSITION 18 ERROR 4 SET/LABEL/SIZE) NIL ( 14 "This graphnode has not been given a position:") MEMBTONODES :D4 (L (1 TONODES 0 TOND)) +AHµh¹@Ið³IµHX°ígð²ö@Ið²ïINIL (29 Link% Parameters) () MIN/BOTTOM :D4 (L (0 NODES)) @!HµI ºI“IJó‘J¹HX°ë(13 GN/BOTTOM) NIL () MIN/LEFT :D4 (L (0 NODES)) @!HµI ºI“IJó‘J¹HX°ë(13 GN/LEFT) NIL () MOVENODE :D4 (L (4 STREAM 3 GRAPH 2 POS 1 OLDPOS 0 NODE)) +ABô‘h@D @oDC@B @oDC@D (40 FLIPNODE 35 DISPLAYNODE 25 SET/LAYOUT/POSITION 20 DISPLAYNODE 10 FLIPNODE) NIL ( 30 (0 . 0) 15 (0 . 0)) NODECREATE :D4 (L (7 LABELSHADE 6 BORDER 5 FONT 4 FROMNODEIDS 3 TONODEIDS 2 POS 1 LABEL 0 ID) F 3 DEFAULTFONT) 00@BhdAºEµ`µS ¹GhdCDJ¸IHFh(20 FONTNAMELIST) (14 DEFAULT.GRAPH.NODEFONT) () NODELST/AS/MENU :D4 (L (1 POS 0 NODELST)) Q@AA3Hµh[\Kâ]ÙJýñ²)JLMØýñ²!K\Kâ]ÙIýñ›ILMØýñ”KµiHX°»NIL NIL () NODEREGION :D4 (L (0 NODE)) @ @ @@(25 CREATEREGION 7 GN/BOTTOM 3 GN/LEFT) NIL () PRINTDISPLAYNODE :D4 (L (3 CLIP/REG 2 STREAM 1 TRANS 0 NODE) F 10 CACHE/NODE/LABEL/BITMAPS) @HjðµH´H µ‚±áA@ ØA@ Ø@@@@ F C›HIJKC ¡@@^ÃN›@jdBHI±w@_Ã²NO²JMjð³1@HIJKB ¿@jdBHMØIMØ±,@jdBHI±@ ²XMjð³ @HIJKB ¿MHØMIØHIB¿@g _¿@BlO¿±ºLdgð²¿hB lÚ_¿nÿÿBHIOd ¿±•¢±‘L ©LhddB ¼Mjð³@HIJKB ¿LB ¿@HIJKB ¿@²@HIJKMB ¿W²,C²)HIJKC ²@JK ¿BHI@jdJKg @(508 BKBITBLT 488 BITMAPCREATE 478 INTERSECT/REGIONP/LBWH 461 FILL/GRAPHNODE/LABEL 436 GRAPHER/CENTERPRINTINAREA 414 DSPFONT 408 DRAW/GRAPHNODE/BORDER 380 FONTCREATE 370 FONTP 358 BLTSHADE 339 DSPSCALE 299 IMAGEOBJPROP 280 MOVETO 266 DRAW/GRAPHNODE/BORDER 237 IMAGEOBJP 177 DRAW/GRAPHNODE/BORDER 101 INTERSECT/REGIONP/LBWH 87 GRAPHNODE/BORDER/WIDTH 44 GN/BOTTOM 37 GN/LEFT 24 \FZEROP) (504 INPUT 330 SHADE 296 DISPLAYFN 144 BITMAP 112 BITMAP) () FILL/GRAPHNODE/LABEL :D4 (L (6 STREAM 5 NBW 4 HEIGHT 3 WIDTH 2 BOTTOM 1 LEFT 0 SHADE)) >@F ¥F ´/@dið”¿nÿÿ¡j¸hddFAEØBEØCEdØÙDEdØÙggH h(58 BKBITBLT 12 DISPLAYSTREAMP 7 WINDOWP) (53 INVERT 50 TEXTURE) () FIX/SCALE :D4 (L (1 SCALE 0 PARAMVALUE)) *@² 0@°dA ¸IµHhZH&¹µìJA@ê (39 FIXR 15 FIX/SCALE) NIL () PROMPTINWINDOWA0003 :D4 (P 3 SI::*NLSETQFLAG* P 2 *PROCEED-CASES* P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 4 PROCEED-CASE0073 F 5 *PROCEED-CASES* F 6 PREVTTY) Li@ggggTgjgg gg UhddVhdl h h (71 \MVLIST 65 PROMPTFORWORD 43 MAKE-PROCEED-CASE 39 CL:SYMBOL-FUNCTION 30 CL:SYMBOL-FUNCTION) (36 SI::ERRORSET-PRINT-FUNCTION 33 :REPORT 27 TRUE 24 :TEST 20 :SELECTOR 16 :TAG 13 ABORT 10 :NAME 7 :NORMAL) () PROMPTINWINDOW :D4 (L (3 BORDERSIZE 2 WHICHCORNER 1 POSITION 0 PROMPTSTR) P 11 PROCEED-CASE0073 P 6 PREVTTY F 12 WindowTitleDisplayStream) ¿C3µlAµD`Aµ;`ƒ g ÈlÚiH[@W dl<ñ¢¿l¥j\[º°7H ©HhddB ¸@H HÈØ»HÈHÈØ¼A©@3 ¬@KJdØØ¿A¬@d3 ®¿@LJdØØ@(171 STRINGWIDTH 154 FONTCREATE 144 FONTP 102 IMAGEOBJPROP 93 IMAGEOBJP 88 BITMAPHEIGHT 83 BITMAPWIDTH 67 GRAPHNODE/BORDER/WIDTH) (189 FONTDESCRIPTOR 183 FONTDESCRIPTOR 175 FONTDESCRIPTOR 124 SHADE 99 IMAGEBOXFN 75 BITMAP) () SET/LAYOUT/POSITION :D4 (L (1 POS 0 NODE)) @A@A@NIL NIL () SHOWGRAPH :D4 (L (6 COPYBUTTONEVENTFN 5 ALLOWEDITFLG 4 TOPJUSTIFYFLG 3 MIDDLEBUTTONFN 2 LEFTBUTTONFN 1 WINDOW 0 GRAPH)) @d³dddddddddddhbAµ E´oDbdg@AggAggAggE²gA ¿Agg†Ag ¿AgFµgAggAgBAgCA A(156 REDISPLAYGRAPH 152 PUTWINDOWPROP 144 PUTWINDOWPROP 136 PUTWINDOWPROP 126 PUTWINDOWPROP 112 PUTWINDOWPROP 104 PUTWINDOWPROP 93 DSPOPERATION 83 PUTWINDOWPROP 73 PUTWINDOWPROP 63 PUTWINDOWPROP 53 PUTWINDOWPROP 43 SIZE/GRAPH/WINDOW) (148 BROWSER/MIDDLEFN 140 BROWSER/LEFTFN 133 APPLYTOSELECTEDNODE 130 BUTTONEVENTFN 123 GRAPHERCOPYBUTTONEVENTFN 117 COPYBUTTONEVENTFN 109 RIGHTBUTTONFN 101 GRAPHEDITEVENTFN 98 RIGHTBUTTONFN 89 INVERT 80 HARDCOPYGRAPH 77 HARDCOPYFN 70 SCROLLBYREPAINTFN 67 SCROLLFN 60 REDISPLAYGRAPH 57 REPAINTFN 49 GRAPH) ( 39 "Graph Editor Window") SIZE/GRAPH/WINDOW :D4 (L (2 TOPJUSTIFYFLG 1 WINDOW/TITLE 0 GRAPH)) “@ 1Ad “¿AZ¹J³BHdldñ¢¿lddnôñ“¿nô Hdl<ñ¢¿l<`lÛ»dKñ‘¿KI I Z…J ¿JgHhJ HÙJ hJ B²HHØJg Ù‚HÙJ J(143 WYOFFSET 133 GETWINDOWPROP 114 WYOFFSET 109 WXOFFSET 102 WXOFFSET 97 PUTWINDOWPROP 88 CLEARW 82 CREATEW 78 GETBOXREGION 75 HEIGHTIFWINDOW 45 WIDTHIFWINDOW 11 WINDOWP 3 GRAPHREGION) (130 HEIGHT 93 EXTENT 61 SCREENHEIGHT) () TOGGLE/DIRECTEDFLG :D4 (L (0 WIN)) )@g @g hðhd@ g@@ (38 REDISPLAYGRAPH 34 DSPFILL 27 DSPTEXTURE 15 GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (30 REPLACE 12 GRAPH 3 GRAPH) () TOGGLE/SIDESFLG :D4 (L (0 WIN)) '@g @g hðhd@ g@@ (36 REDISPLAYGRAPH 32 DSPFILL 25 DSPTEXTURE 14 GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (28 REPLACE 11 GRAPH 3 GRAPH) () TOLINKS :D4 (L (0 NODE)) @NIL NIL () TRACKCURSOR :D4 (L (2 GRAPH 1 DS 0 ND)) –P@d¢±Ž@Y@A X@A J²¿`lå[jð³?K²'K °¿`lå\jðµL´L hðZ’h³@dhAHBA ¿°³@A I@Xô³A @ ¿@HBA I h(146 CALL.MOVENODEFN 141 WFROMDS 133 EXTENDEXTENT 130 NODEREGION 126 WFROMDS 114 FLIPNODE 106 MOVENODE 100 CURSORPOSITION 83 \FZEROP 62 GETMOUSESTATE 57 \FZEROP 36 GETMOUSESTATE 30 FLIPNODE 24 CURSORPOSITION) (66 LASTMOUSEBUTTONS 40 LASTMOUSEBUTTONS) () TRACKNODE :D4 (L (0 W)) "@g h@ @ É@g (31 TRACKCURSOR 28 GETWINDOWUSERPROP 19 \INSUREWINDOW 15 CLOSEST/NODE 12 CURSORPOSITION 6 GETWINDOWUSERPROP) (25 GRAPH 3 GRAPH) () NEXTSIZEFONT :D4 (L (1 NOWFONT 0 WHICHDIR)) [AÈ!@gð²2H`Èýñ´,`Yµh²HIÈýñ¥I I°ã`ZµhdÈHýó³å¿J°ë(58 FONTNAMELIST) (77 FONTDESCRIPTOR 66 DECREASING.FONT.LIST 48 FONTDESCRIPTOR 32 DECREASING.FONT.LIST 23 FONTDESCRIPTOR 19 DECREASING.FONT.LIST 12 LARGER 3 FONTDESCRIPTOR) () DECREASING.FONT.LIST :D4 NIL &@o°d»gK ¸IµHhZH&¹µèJ(18 FONTCREATE) (14 HELVETICA) ( 6 (18 14 12 10 8 5)) SCALE.FONT :D4 (L (1 STR 0 WID)) 2@A` oÖó‘h`Hµg¹AI @ó¡IHX°ê(38 STRINGWIDTH 8 STRINGWIDTH) (30 SHADE 20 DECREASING.FONT.LIST 4 DECREASING.FONT.LIST) ( 12 1.5) BRH/LAYOUT :D4 (L (4 GN 3 MOMLST 2 Y 1 X 0 N) F 4 PERSONALD F 5 MOTHERD) \DDTDØDCDAIâØhH²JHAIUØØB@h[ñ˜HJKÙâ KZ¿DBJâØJ(76 BRH/OFFSET 65 BRH/LAYOUT/DAUGHTERS) NIL () BRH/LAYOUT/DAUGHTERS :D4 (L (3 MOMLST 2 Y 1 X 0 DS) F 3 NODELST) %@BHµIBÙºIJAICJS Ø¹HX°ä(28 BRH/LAYOUT 24 GETNODEFROMID) NIL () BRH/OFFSET :D4 (L (1 YINC 0 NODEIDS) F 1 NODELST) -@°&dHQ XHAÔ¿HA µÛh(36 BRH/OFFSET 12 GETNODEFROMID) NIL () BRHC/INTERTREE/SPACE :D4 (L (1 BTC 0 TTC)) Zo1@@b¿»AAb¿¹KIÙZHñ‘J¸A¡H@²ýAd@Ùjð²Ab¿¹@@b¿[°Ô@ýñ³Â@@b¿[°ÁNIL NIL ( 3 -1000) BRHC/LAYOUT :D4 (L (3 GN 2 MOMLST 1 X 0 N) F 6 RETURNTTC F 7 RETURNBTC F 8 PERSONALD) jCCC3Jâ]AIØ\CBCjhHµ,CL [CAIâØKAWKMÙJØØVcAKMÙWcKL@h°Ô(102 BRHC/LAYOUT/DAUGHTERS 58 BRHC/LAYOUT/TERMINAL) NIL () BRHC/LAYOUT/DAUGHTERS :D4 (L (2 MOMLST 1 X/SW 0 DS) F 9 RETURNBTC F 10 RETURNTTC F 11 MOTHERD F 12 FAMILYD F 13 NODELST) | @jAWØcHµ(ANNc¿MA¿NNWÔ¿Mc¿OIOØØâ[W ¼KJBL_¿NµO_¿W¾W°#W ¹LI¿WI N ¾MWI ½HX°‘(116 EXTEND/TRANSITION/CHAIN 113 RAISE/TRANSITION/CHAIN 105 EXTEND/TRANSITION/CHAIN 101 RAISE/TRANSITION/CHAIN 88 BRHC/INTERTREE/SPACE 65 BRHC/LAYOUT 57 GETNODEFROMID) NIL () BRHC/LAYOUT/TERMINAL :D4 (L (1 X/SW 0 GN) F 0 RETURNTTC F 1 RETURNBTC) AjhcA@hc@âNIL NIL () BRHC/OFFSET :D4 (L (1 ABSY 0 N) F 1 NODELST) :@Q AHHH¿ØbHAHØH‡dA ¿µ÷h(49 BRHC/OFFSET 4 GETNODEFROMID) NIL () BRHL/LAYOUT :D4 (L (4 GN 3 MOMLST 2 Y 1 X 0 N) F 3 PERSONALD F 4 MOTHERD) YDd‘jDSDØDCDAIâØhH²HAITØØB@hdJñ¡¿JºDBJâØJ(70 BRHL/LAYOUT/DAUGHTERS) NIL () BRHL/LAYOUT/DAUGHTERS :D4 (L (3 MOMLST 2 Y 1 X 0 DS) F 6 NODELST) T@BBHZµIBÙ[V \µIKAICL ØY¿J°Þ®L ¼JL¿IL°âLA ¿L]CM°Ô(63 BRHL/MOVE/RIGHT 47 NEW/INSTANCE/OF/GRAPHNODE 34 BRHL/LAYOUT 19 GETNODEFROMID) NIL () BRHL/MOVE/RIGHT :D4 (L (2 STACK 1 X 0 GN) F 5 MOTHERD F 6 NODELST) ]@@@B²o@ ¿AIHâÙýñ³@ AHUØØ@BJµIAHâØhV KL¿JZ°æ(85 BRHL/MOVE/RIGHT 80 GETNODEFROMID 51 TOLINKS 36 ERROR) NIL ( 21 "Loop caught in BRHL/MOVE/RIGHT at") BROWSE/LAYOUT/HORIZ :D4 (L (0 ROOTIDS) F 3 NODELST) <@jHµSihdddddddddhºIJjIhJS Ø¹HX°Í(51 BRH/LAYOUT 47 GETNODEFROMID) NIL () BROWSE/LAYOUT/HORIZ/COMPACTLY :D4 (L (0 ROOTS) P 1 RETURNBTC P 0 RETURNTTC F 7 NODELST F 8 MOTHERD) ¿p@d³jh@W ¿@j °h³@jh@W ¿@j °Nºhhhdd`jd@h`J`h]Wc¿M^jWÙhM¿Nj ¿@[µ&MW cWihdddddddddhW\NL ¿K°¹(183 DREMOVE 126 DREMOVE 114 BRHC/OFFSET 108 BRHC/LAYOUT 55 PACK 50 BRHC/OFFSET 43 BRHC/LAYOUT 40 GETNODEFROMID 24 BRHC/OFFSET 18 BRHC/LAYOUT 15 GETNODEFROMID) (76 DEFAULT.GRAPH.NODEBORDER 72 DEFAULT.GRAPH.NODEFONT 65 DEFAULT.GRAPH.NODELABELSHADE) () BROWSE/LAYOUT/LATTICE :D4 (L (0 NS) F 3 NODELST) <@jHµSihdddddddddhºIJjIhJS Ø¹HX°Í(51 BRHL/LAYOUT 47 GETNODEFROMID) NIL () BRV/OFFSET :D4 (L (1 ABSX 0 N) F 2 NODELST F 3 TERMY) ?@R AHHH¿ØbHYAIØIdSÙH‡dA ¿µ÷h(54 BRV/OFFSET 4 GETNODEFROMID) NIL () EXTEND/TRANSITION/CHAIN :D4 (L (1 RTC 0 LTC)) G@A"IªH I@Hd«I¿HI@ZI[Ùjð—H¸IY°ÐKJñ”H¸°ÆIY°Â(11 FLAST) NIL () FOREST/BREAK/CYCLES :D4 (L (0 NODE) F 3 NODELST) 2@i@!HYµhS d˜ ºIJ‚ ¿I°â(43 FOREST/BREAK/CYCLES 34 NEW/INSTANCE/OF/GRAPHNODE 27 GETNODEFROMID) NIL () INIT/NODES/FOR/LAYOUT :D4 (L (3 FONT 2 ROOTIDS 1 FORMAT 0 NS) F 1 NODELST) w@°.dHHBhðhð¿H¬HC¿µÓB°)dAgð¨AžgA˜HQ ‡HQ µØQdHh¿H µïh(110 SET/LABEL/SIZE 89 FOREST/BREAK/CYCLES 86 GETNODEFROMID 80 LATTICE/BREAK/CYCLES 77 GETNODEFROMID) (69 LATTICE 61 LATTICE) () INTERPRET/MARK/FORMAT :D4 (L (0 FORMAT) F 1 BOX.BOTH.FLG F 2 BOX.LEAVES.FLG F 3 BORDER.FOR.MARKING F 4 LABELSHADE.FOR.MARKING) j@gðª@d›¿g@“hc¿@gðª@d›¿g@“hc¿@´9@gð‘@‡g@d²(¸gH•Hg'‚gc¿gH•Hg'‚gchNIL (100 DON'T 95 LABELSHADE 88 LABELSHADE 82 DON'T 77 BORDER 70 BORDER 60 MARK 53 MARK 37 NOT/LEAVES 27 NOT/LEAVES 16 COPIES/ONLY 6 COPIES/ONLY) () LATTICE/BREAK/CYCLES :D4 (L (1 STACK 0 NODE) F 4 NODELST) =@i@1HYµhZT »JA™K »IKŠK§KJA ¿I°×(54 LATTICE/BREAK/CYCLES 37 NEW/INSTANCE/OF/GRAPHNODE 28 GETNODEFROMID) NIL () LAYOUTFOREST :D4 (L (7 FAMILYD 6 PERSONALD 5 MOTHERD 4 FONT 3 BOXING 2 FORMAT 1 ROOTIDS 0 NODELST)) @ABCDEF (11 LAYOUTGRAPH) NIL () LAYOUTGRAPH :D4 (L (3 FONT 2 FORMAT 1 ROOTIDS) P 3 LABELSHADE.FOR.MARKING P 2 BORDER.FOR.MARKING P 1 BOX.LEAVES.FLG P 0 BOX.BOTH.FLG I 6 FAMILYD I 5 PERSONALD I 4 MOTHERD I 0 NODELST F 7 DEFAULTFONT) oiddg4Aµo ¿A]µ@Cµ1WbDªoC b¿E³>BgðªB²0gB²)oC ° hddg °Éd@¦o ¿M°¯jb ¿F©CÈâb¿B @BACBgðªBdœ¿gB”@ ¿BgðªBd¿gB•A °Bgð¨BšgB”A ƒA \@°-d^žN3—N3³oN ¿µÔBgð¬Bd²@¿gB²7@ ¿L ¿Bdgð•gB¤L ¿BgðªB²8gB²1L °+BgðªBdœ¿gB”L ¿Bgð¨B™gB“L L(363 REFLECT/GRAPH/VERTICALLY 343 REFLECT/GRAPH/HORIZONTALLY 320 REFLECT/GRAPH/HORIZONTALLY 298 REFLECT/GRAPH/VERTICALLY 278 REFLECT/GRAPH/DIAGONALLY 273 SWITCH/NODE/HEIGHT/WIDTH 245 ERROR 200 BROWSE/LAYOUT/HORIZ/COMPACTLY 195 BROWSE/LAYOUT/HORIZ 174 BROWSE/LAYOUT/LATTICE 152 SWITCH/NODE/HEIGHT/WIDTH 131 INIT/NODES/FOR/LAYOUT 124 INTERPRET/MARK/FORMAT 99 ERROR 85 FONTCREATE 73 STRINGWIDTH 42 STRINGWIDTH 19 ERROR) (356 REVERSE/DAUGHTERS 348 REVERSE/DAUGHTERS 336 REVERSE 326 REVERSE 312 REVERSE/DAUGHTERS 303 REVERSE/DAUGHTERS 291 REVERSE 284 REVERSE 265 VERTICAL 254 VERTICAL 188 FAST 180 FAST 167 LATTICE 157 LATTICE 145 VERTICAL 135 VERTICAL 114 FONTDESCRIPTOR 81 DISPLAY 61 VERTICAL 52 VERTICAL 5 DON'T) ( 230 "Disconnected graph. Root(s) didn't connect to:" 96 "is in ROOTIDS but no GRAPHNODE for it in NODELST." 69 "AA" 38 "AAAAAA" 16 "LAYOUTGRAPH needs a LIST of root node ids") LAYOUTLATTICE :D4 (L (3 FONT 2 FORMAT 1 ROOTIDS) I 6 FAMILYD I 5 PERSONALD I 4 MOTHERD I 0 NODELST F 1 DEFAULTFONT) _AHµ=CµQb@BACF©CÈâb¿DªoC b¿E³)Bgð²oC °d@¦o ¿HX°²jb ¿A (92 BROWSE/LAYOUT/LATTICE 78 ERROR 64 STRINGWIDTH 43 STRINGWIDTH 21 INIT/NODES/FOR/LAYOUT) (53 VERTICAL 27 FONTDESCRIPTOR) ( 75 "is in ROOTIDS but no GRAPHNODE for it in NODELST." 60 "AA" 39 "AAAAAA") LAYOUTSEXPR :D4 (L (6 FAMILYD 5 PERSONALD 4 MOTHERD 3 FONT 2 BOXING 1 FORMAT 0 TREE) P 0 RESULT) ,@²"@ H@hAd£d‘hB CDEF o (41 ERROR 33 LAYOUTGRAPH 25 \APPEND2 9 LAYOUTSEXPR1) NIL ( 38 "Cannot layout NIL as S-EXPRESSION") LAYOUTSEXPR1 :D4 (L (0 TREE) F 2 RESULT) |RHµ.hµp@d³7hdd`hddd`@`hRc¹@Ið•IµÍi°ÊHX°Áhdd`hd@ h`@`hRc@…d ¿µøh(115 LAYOUTSEXPR1 82 \APPEND2) (91 DEFAULT.GRAPH.NODEBORDER 86 DEFAULT.GRAPH.NODEFONT 75 DEFAULT.GRAPH.NODELABELSHADE 33 DEFAULT.GRAPH.NODEBORDER 29 DEFAULT.GRAPH.NODEFONT 22 DEFAULT.GRAPH.NODELABELSHADE) () MARK/GRAPH/NODE :D4 (L (0 NODE) F 0 BORDER.FOR.MARKING F 1 LABELSHADE.FOR.MARKING) &Pgð®@P¿Qgðµ @QNIL (24 DON'T 3 DON'T) () NEW/INSTANCE/OF/GRAPHNODE :D4 (L (0 GN) F 1 NODELST F 2 BOX.LEAVES.FLG F 3 BOX.BOTH.FLG) z@hhdd@¸@@@hd@H@ hHQcR©@šH ¿S“@ H(118 MARK/GRAPH/NODE 111 MARK/GRAPH/NODE 73 COPY) NIL () RAISE/TRANSITION/CHAIN :D4 (L (1 RAISE 0 TC)) @Hµ@dAÔ¿HX°ñNIL NIL () REFLECT/GRAPH/DIAGONALLY :D4 (L (0 GRAPH)) %@@hð@°dHXdHd¿µì@NIL NIL () REFLECT/GRAPH/HORIZONTALLY :D4 (L (0 GRAPH)) &@@ @ ØHµhZIJÙ¿HX°î(11 MIN/LEFT 6 MAX/RIGHT) NIL () REFLECT/GRAPH/VERTICALLY :D4 (L (0 GRAPH)) &@@ @ ØHµhZIJÙ¿HX°î(11 MIN/BOTTOM 6 MAX/TOP) NIL () SWITCH/NODE/HEIGHT/WIDTH :D4 (L (0 NL)) '@° d!HHºYJJI¿µáhNIL NIL () GRAPHERCOPYBUTTONEVENTFN :D4 (L (0 WINDOW)) @ d– h(11 COPYINSERT 8 GRAPHEROBJ 3 GRAPHOBJ.FINDGRAPH) NIL () GRAPHOBJ.FINDGRAPH :D4 (L (0 WINDOW)) W@ @ ÉhnÿÿgH¿¿I``¬hnÿÿgHh`låjð²ÜhnÿÿgH¿@g (84 COPYGRAPH 81 GETWINDOWUSERPROP 73 DSPFILL 50 DSPFILL 38 INSIDE? 27 GETMOUSESTATE 23 DSPFILL 7 \INSUREWINDOW 3 GETSTREAM) (78 GRAPH 69 INVERT 55 LASTMOUSEBUTTONS 46 INVERT 35 LASTMOUSEY 32 LASTMOUSEX 19 INVERT) () ALIGNMENTNODE :D4 (L (1 GRAPH 0 NODESPEC)) À@gð¨@dgð²#¿AAHµIZ ¼K“LKó“L»J¹HX°ègð¨@dgð²#¿AAHµIZ ¼K“KLó“L»J¹HX°ègð¨@dgð²#¿AAHµIZ ¼K“LKó“L»J¹HX°ègð¨@dgð²#¿AAHµIZ ¼K“KLó“L»J¹HX°èA (189 GETNODEFROMID 168 GN/LEFT 122 GN/RIGHT 76 GN/BOTTOM 30 GN/TOP) (148 *LEFT 141 *LEFT* 102 *RIGHT 95 *RIGHT* 56 *BOTTOM 49 *BOTTOM* 10 *TOP 3 *TOP*) () GRAPHOBJ.CHECKALIGN :D4 (L (1 ALIGNSPEC 0 GRAPH)) ƒAµjbd³z3³uA²iAdgð³0dgð³)dgð³"dgð³dgð³dgð«dgð¥dgð’¿i‡¿A@ ²%A² Ad3³!dgð³©AjhbµoA A(127 ERROR 82 GETNODEFROMID) (103 BASELINE 69 *RIGHT 63 *LEFT 57 *BOTTOM 50 *TOP 43 *RIGHT* 36 *LEFT* 29 *BOTTOM* 22 *TOP*) ( 123 "ILLEGAL GRAPH ALIGNMENT SPECIFICATION") GRAPHEROBJ :D4 (L (5 COPYBUTTONEVENTFN 4 MIDDLEBUTTONFN 3 LEFTBUTTONFN 2 VALIGN 1 HALIGN 0 GRAPH) F 2 GRAPHERIMAGEFNS) }@ @dA @B hR µ(ggggggggddddhg c IgH H C˜IgC¿D˜IgD¿E—IgEI(121 IMAGEOBJPROP 110 IMAGEOBJPROP 99 IMAGEOBJPROP 89 IMAGEOBJPROP 86 CREATEPOSITION 83 MINUS 77 MINUS 65 IMAGEOBJCREATE 60 IMAGEFNSCREATE 22 IMAGEFNSP 14 GRAPHOBJ.CHECKALIGN 9 GRAPHOBJ.CHECKALIGN 3 GRAPHREGION) (117 COPYBUTTONEVENTFN 106 MIDDLEBUTTONFN 95 LEFTBUTTONFN 72 OBJECTORIGIN 56 GRAPHER 48 NILL 45 GRAPHOBJ.COPYBUTTONEVENTFN 42 GRAPHOBJ.BUTTONEVENTINFN 39 GRAPHOBJ.COPYFN 36 GRAPHOBJ.GETFN 33 GRAPHOBJ.PUTFN 30 GRAPHOBJ.IMAGEBOXFN 27 GRAPHOBJ.DISPLAYFN) () GRAPHOBJ.BUTTONEVENTINFN :D4 (L (1 WINDOW 0 GROBJ)) ˆ@g @g 2H¡IžA@g HI`do¿dg ¿dg¿jdnÿdhºdJ ¿ ´4@g [hi¼@gK L KKh¿L g(130 CLOSEW 125 IMAGEOBJPROP 111 EDITGRAPH 107 COPYGRAPH 97 SIZE/GRAPH/WINDOW 90 IMAGEOBJPROP 81 MENU 34 GRAPHBUTTONEVENTFN 28 IMAGEOBJPROP 13 IMAGEOBJPROP 6 IMAGEOBJPROP) (133 CHANGED 102 OBJECTDATUM 87 OBJECTDATUM 58 DEFAULTMENUHELDFN 51 CLRPROMPT 38 |MENUTYPE#| 25 OBJECTDATUM 10 MIDDLEBUTTONFN 3 LEFTBUTTONFN) ( 44 ((Edit% graph T " Opens a window to edit this graph"))) GRAPHOBJ.COPYBUTTONEVENTFN :D4 (L (1 WINDOW 0 GROBJ)) @g H—@AlH@ (26 COPYINSERT 23 GRAPHOBJ.COPYFN 6 IMAGEOBJPROP) (3 COPYBUTTONEVENTFN) () GRAPHOBJ.COPYFN :D4 (L (0 GROBJ)) Y@g !H HHYg@g ZJIg@g Ig@g Ig@g I(85 IMAGEOBJPROP 82 IMAGEOBJPROP 71 IMAGEOBJPROP 68 IMAGEOBJPROP 57 IMAGEOBJPROP 54 IMAGEOBJPROP 43 IMAGEOBJPROP 35 IMAGEOBJPROP 24 GRAPHEROBJ 14 COPYGRAPH 6 IMAGEOBJPROP) (79 COPYBUTTONEVENTFN 75 COPYBUTTONEVENTFN 65 MIDDLEBUTTONFN 61 MIDDLEBUTTONFN 51 LEFTBUTTONFN 47 LEFTBUTTONFN 32 OBJECTORIGIN 28 OBJECTORIGIN 3 OBJECTDATUM) () GRAPHOBJ.DISPLAYFN :D4 (L (1 STREAM 0 GROBJ)) g@g hA @g #H¯@g ¼@AlL¸Ik ‘J…JAI [JAhdA HÕKÕI×hA HÕKÕI× h(99 DISPLAYGRAPH 96 CREATEPOSITION 82 DSPYPOSITION 66 DSPXPOSITION 57 GRAPHREGION 54 SCALE/GRAPH 45 EQP 31 IMAGEOBJPROP 18 IMAGEOBJPROP 11 DSPSCALE 6 IMAGEOBJPROP) (28 IMAGEBOXFN 15 OBJECTDATUM 3 BOUNDBOX) () GRAPHOBJ.GETALIGN :D4 (L (1 GRAPH 0 STREAM) F 1 FILERDTBL) $@Q Hd²do ªA H(28 NTH 21 MEMB 4 READ) NIL ( 18 (*TOP* *BOTTOM* *LEFT* *RIGHT* *TOP *BOTTOM *LEFT *RIGHT)) GRAPHOBJ.GETFN :D4 (L (0 STREAM) F 1 FILERDTBL) 5@dQ gð©¿o ¿@ @ H@H @H @Q ¿(49 RATOM 44 GRAPHEROBJ 41 GRAPHOBJ.GETALIGN 36 GRAPHOBJ.GETALIGN 27 READGRAPH 23 READC 18 ERROR 5 SKIPSEPRS) (8 %() ( 15 "ILLEGAL GRAPHOBJECT FORMAT") GRAPHOBJ.IMAGEBOXFN :D4 (L (1 STREAM 0 GROBJ)) Â@g hA RH[H\H]Ikð¦KAI»K ZdJMd3—JÖ°PK ^ Mdgð²1¿NNÈÙNÈØlÛŠNÖÔLd3–JÖ°"K ^ Ldgð’¿jNÖÔh(163 GN/LEFT 159 ALIGNMENTNODE 73 GN/BOTTOM 69 ALIGNMENTNODE 41 GRAPHREGION 36 SCALE/GRAPH 11 DSPSCALE 6 IMAGEOBJPROP) (170 BASELINE 123 FONTDESCRIPTOR 106 FONTDESCRIPTOR 80 BASELINE 3 OBJECTDATUM) () GRAPHOBJ.PUTALIGN :D4 (L (2 ALIGN 1 GRAPH 0 STREAM) F 3 FILERDTBL) :Bd²o ‘BŽAkHµ hB@SºBJð’I°íIkÔ¹HX°à(35 PRIN2 12 MEMB) NIL ( 9 (*TOP* *BOTTOM* *LEFT* *RIGHT* *TOP *BOTTOM *LEFT *RIGHT)) GRAPHOBJ.PUTFN :D4 (L (1 STREAM 0 GROBJ)) D@g oA HYdA A AIHkA AIHoA ¿A h(64 TERPRI 59 PRIN1 51 GRAPHOBJ.PUTALIGN 42 SPACES 37 GRAPHOBJ.PUTALIGN 29 TERPRI 25 DUMPGRAPH 17 PRIN1 6 IMAGEOBJPROP) (3 OBJECTDATUM) ( 55 ")" 13 "(") COPYGRAPH :D4 (L (0 GRAPH)) @@±‹d[KKKKKKKKKKKKK¸IµHhZH&¹µ‚±ÿtJ@@@@@@@@@@@@NIL NIL () DUMPGRAPHA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 13 STREAM F 14 GRAPH F 15 SI::*RESETFORMS* F 16 FILERDTBL) Á gW hhWcjdddd oW ¿W ¿oW Wd²"¿lhW¿oW ¿WW ¿W² lhW¿oW ¿WW ¿Wd²$¿lhW¿oW ¿WW ¿W²"lhW¿oW ¿WW ¿Wd²&¿lhW¿oW ¿WW ¿W²$lhW¿oW ¿WW ¿Wd²(¿lhW¿oW ¿WW ¿W²&lhW¿oW ¿WW ¿Wd²*¿lhW¿oW ¿WW ¿W²(lhW¿oW ¿WW ¿W²)lhW¿oW ¿WW ¿oW W!Oµ(W ¿oW ¿KW ¿kW N ^±”_dNªKkÔ[N¾O_²OO¬OJkÔZO_¿OdM³IkÔYM½O_ið³OdœLªOHkÔXL\¿O_±ÿZdW ¿kW ¿µîW ¿oW ¿IW ¿kW M ]°3d_d³dÃ–¿O ´gO W ¿kW ¿µÎL²3W ¿oW ¿HW ¿kW ¿L \W Oµ`O²5W ¿oW ¿JW ¿kW ¿O _W OµFW ¿oW W!OµHoW h_¿OkW¿OW ¿O_°„_¿OkW¿OW ¿O_°ž_¿lhW¿oW ¿ONW ¿kW ¿W _¿OW ¿kW ¿OhW¿OW ¿kW ¿OMW ¿kW ¿Od”dið²¿O°¿OLW ¿kW ¿O´ OOW ¿kW ¿O²LoW ¿O°.d_dgðžONO‚NW ¿kW ¿µÓoƒoW ¿O´3oW ¿O°dNW ¿kW ¿µìoW ¿oW ¿W ¿O_±þ(1462 TERPRI 1456 PRIN1 1446 PRIN1 1432 SPACES 1425 PRIN2 1401 PRIN1 1378 PRIN1 1359 SPACES 1352 PRIN2 1304 PRIN1 1282 SPACES 1275 PRIN2 1249 SPACES 1242 PRIN2 1180 SPACES 1173 PRIN2 1152 SPACES 1145 PRIN2 1135 TAB 1126 SPACES 1119 HPRINT 1098 POSITION 1092 SPACES 1085 PRIN2 1073 PRIN1 1063 TAB 1043 HPRINT 1034 TAB 1014 HPRINT 1005 TAB 991 PRIN1 970 PRIN1 960 TERPRI 946 POSITION 939 DREVERSE 933 SPACES 926 PRIN1 919 PRIN1 909 TERPRI 891 POSITION 885 DREVERSE 880 SPACES 873 PRIN1 866 PRIN1 856 TERPRI 843 SPACES 836 PRIN2 830 FONTCLASSUNPARSE 820 FONTP 816 FONTUNPARSE 793 DREVERSE 789 SPACES 782 PRIN1 775 PRIN1 765 TERPRI 755 SPACES 748 PRIN2 608 DREVERSE 604 SPACES 597 PRIN1 590 PRIN1 580 TERPRI 563 PRIN1 553 PRIN2 533 PRIN1 523 TAB 498 PRIN2 479 PRIN1 469 TAB 445 PRIN2 427 PRIN1 417 TAB 392 PRIN2 375 PRIN1 365 TAB 343 PRIN2 327 PRIN1 317 TAB 294 PRIN2 279 PRIN1 269 TAB 249 PRIN2 235 PRIN1 225 TAB 204 PRIN2 191 PRIN1 181 TAB 163 PRIN2 151 PRIN1 141 TAB 122 PRIN2 111 PRIN1 101 TAB 85 PRIN2 75 PRIN1 65 TAB 49 PRIN1 39 TERPRI 33 PRIN1 7 SETREADTABLE) (1327 Link% Parameters 825 CLASS 809 FONTDESCRIPTOR 2 SETREADTABLE) ( 1451 ")" 1441 ")" 1396 "(" 1373 "NIL " 1368 ") " 1299 "(" 1068 "(" 986 "))" 965 "NODES (" 914 "SHADES " 861 "BORDERS " 770 "FONTS " 585 "IDS " 558 ")" 528 "CHANGELABELFN " 474 "INVERTLABELFN " 422 "INVERTBORDERFN " 370 "FONTCHANGEFN " 322 "DELETELINKFN " 274 "ADDLINKFN " 230 "DELETENODEFN " 186 "ADDNODEFN " 146 "MOVENODEFN " 106 "DIRECTEDFLG " 70 "SIDESFLG " 44 "FIELDS (" 28 "(") DUMPGRAPH :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 1 STREAM I 0 GRAPH F 2 LISPXHIST) Rg ¿ (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 DUMPGRAPHA0001) (6 SI::RESETUNWIND) () READGRAPH :D4 (L (0 STREAM) F 30 FILERDTBL) •@dW< gð©¿o ¿@ hdddddddddddhñ @W< Zdgð¢±¿@W< ±d_dgðš¿HO±êdgð›¿HO±Ødgðœ¿HO±Ådgð¿HO±±dgðž¿HO±œdgðŸ¿HO±†dgðŸ¿HO°odgð²¿HO°Wdgð²¿HO°>dgð²¿HO°$gð²HO‰oO ¿µ‚±þý±þàgð².@W< Y ¾I_¿k_Oó’±þÁNO@W< ¿OkÔ°æJdgð²-¿@W< Y ¼I_¿k_Oó’±þŒLO@ ¿OkÔ°ègð²W@W< Y »I_¿k_Oó’±þ\KO@W< ZdgðŸ¿@W< ZJ °gð™JJ €J¿OkÔ°½Jdgð¢±.¿@ ¿H0@dW< gð¯¿O$¿@W< ¿±ýð ¿0N@W< @ _,¿@W< hdK@W< _.¿@W< Zd™ið‘J„LJ _*¿@W< Z´MJ hd0@W< °;d_gð²ONO O…NO _0¿O2µ O0h_4‚O0&_2¿µÆO40@W< °"d_¿NO _6¿O8µ O6h_:‚O6&_8¿µßO:O.O,O*h@W< ¿_(¿O&µO(h_&_$¿±þëO(&_&¿±þâgð²,@W< Y ½I_ ¿k_"O ó’±üÌMO"@ ¿O"kÔ°èJgð‘Ho@ ¿±ü§(911 ERROR 888 SETA 885 HREAD 863 ARRAY 859 RATOM 818 RATOM 765 ELT 752 READ 716 ELT 703 ELT 678 READ 667 ELT 659 RATOM 650 ELT 637 RATOM 628 ELT 625 RATOM 616 READ 607 HREAD 603 ELT 600 RATOM 589 READC 582 RATOM 565 SKIPSEPRS 553 RATOM 531 SETA 526 FONTCLASS 508 FONTCLASS 501 READ 487 READ 463 ARRAY 459 RATOM 440 SETA 437 HREAD 415 ARRAY 411 RATOM 389 SETA 386 READ 362 ARRAY 358 RATOM 333 ERROR 78 READ 61 RATOM 24 READC 19 ERROR 6 SKIPSEPRS) (899 %) 850 SHADES 689 Link% Parameters 568 %( 543 NODES 515 CLASS 492 C 450 FONTS 401 BORDERS 349 IDS 302 CHANGELABELFN 277 INVERTLABELFN 252 INVERTBORDERFN 228 FONTCHANGEFN 206 DELETELINKFN 184 ADDLINKFN 163 DELETENODEFN 143 ADDNODEFN 124 MOVENODEFN 106 DIRECTEDFLG 89 SIDESFLG 66 FIELDS 9 %() ( 907 "INVALID GRAPHER IMAGE OBJECT" 327 "UNRECOGNIZED GRAPH FIELD" 16 "ILLEGAL GRAPH FORMAT") (PRETTYCOMPRINT GRAPHERCOMS) (RPAQQ GRAPHERCOMS ((COMS (* Seems not be called by anyone, and isn't a documented entry. Remove?) ( FNS GRAPHMOVENODE)) (FNS ADD/AND/DISPLAY/LINK APPLYTOSELECTEDNODE CALL.MOVENODEFN CHANGE.NODEFONT.SIZE CHOOSE.GRAPH.FONT CLOSEST/NODE DEFAULT.ADDNODEFN DELETE/AND/DISPLAY/LINK DISPLAY/NAME DISPLAYGRAPH DISPLAYLINK DISPLAYLINK/BT DISPLAYLINK/LR DISPLAYLINK/RL DISPLAYLINK/TB EDITTOGGLEBORDER ERASE/GRAPHNODE DISPLAYNODE DISPLAYNODELINKS DRAW/GRAPHNODE/BORDER DRAWAREABOX EDITADDLINK EDITADDNODE EDITAPPLYTOLINK EDITCHANGEFONT EDITCHANGELABEL EDITDELETELINK EDITDELETENODE EDITGRAPH EDITGRAPH1 EDITGRAPHMENU EDITMOVENODE EDITTOGGLELABEL FLIPNODE FONTNAMELIST FROMLINKS GETNODEFROMID GN/BOTTOM GN/LEFT GN/RIGHT GN/TOP GRAPHADDLINK GRAPHADDNODE GRAPHBUTTONEVENTFN GRAPHCHANGELABEL GRAPHDELETELINK GRAPHDELETENODE GRAPHEDITCOMMANDFN GRAPHEDITEVENTFN GRAPHER/CENTERPRINTINAREA GRAPHNODE/BORDER/WIDTH GRAPHREGION HARDCOPYGRAPH INTERSECT/REGIONP/LBWH INVERTED/GRAPHNODE/BORDER INVERTED/SHADE/FOR/GRAPHER LAYOUT/POSITION LINKPARAMETERS MANHATTANDIST MAX/RIGHT MAX/TOP MEASUREGRAPHNODE MEMBTONODES MIN/BOTTOM MIN/LEFT MOVENODE NODECREATE NODELST/AS/MENU NODEREGION PRINTDISPLAYNODE FILL/GRAPHNODE/LABEL FIX/SCALE PROMPTINWINDOW READ/NODE REDISPLAYGRAPH REMOVETONODES RESET/NODE/BORDER RESET/NODE/LABELSHADE SCALE/GRAPH SCALE/GRAPHNODE/BORDER SCALE/TONODES SET/LABEL/SIZE SET/LAYOUT/POSITION SHOWGRAPH SIZE/GRAPH/WINDOW TOGGLE/DIRECTEDFLG TOGGLE/SIDESFLG TOLINKS TRACKCURSOR TRACKNODE) (COMS (* functions for finding larger and smaller fonts) (FNS NEXTSIZEFONT DECREASING.FONT.LIST SCALE.FONT) (DECLARE%: DONTEVAL@LOAD DOCOPY (VARS (DECREASING.FONT.LIST ( DECREASING.FONT.LIST)))) (GLOBALVARS DECREASING.FONT.LIST)) (* functions for LAYOUTGRAPH And LAYOUTLATTICE) (FNS BRH/LAYOUT BRH/LAYOUT/DAUGHTERS BRH/OFFSET BRHC/INTERTREE/SPACE BRHC/LAYOUT BRHC/LAYOUT/DAUGHTERS BRHC/LAYOUT/TERMINAL BRHC/OFFSET BRHL/LAYOUT BRHL/LAYOUT/DAUGHTERS BRHL/MOVE/RIGHT BROWSE/LAYOUT/HORIZ BROWSE/LAYOUT/HORIZ/COMPACTLY BROWSE/LAYOUT/LATTICE BRV/OFFSET EXTEND/TRANSITION/CHAIN FOREST/BREAK/CYCLES INIT/NODES/FOR/LAYOUT INTERPRET/MARK/FORMAT LATTICE/BREAK/CYCLES LAYOUTFOREST LAYOUTGRAPH LAYOUTLATTICE LAYOUTSEXPR LAYOUTSEXPR1 MARK/GRAPH/NODE NEW/INSTANCE/OF/GRAPHNODE RAISE/TRANSITION/CHAIN REFLECT/GRAPH/DIAGONALLY REFLECT/GRAPH/HORIZONTALLY REFLECT/GRAPH/VERTICALLY SWITCH/NODE/HEIGHT/WIDTH) (CONSTANTS (LINKPARAMS (QUOTE Link% Parameters))) ( VARS DEFAULT.GRAPH.NODEBORDER DEFAULT.GRAPH.NODEFONT DEFAULT.GRAPH.NODELABELSHADE ScalableLinkParameters (CACHE/NODE/LABEL/BITMAPS) (EDITGRAPHMENU) (GRAPHEDITWINDOW) (NODEBORDERWIDTH 1 ) (ORIGIN (CREATEPOSITION 0 0))) (INITVARS (EDITGRAPHMENUCOMMANDS (QUOTE (("Move Node" (QUOTE MOVENODE )) ("Add Node" (QUOTE ADDNODE)) ("Delete Node" (QUOTE DELETENODE)) ("Add Link" (QUOTE ADDLINK)) ( "Delete Link" (QUOTE DELETELINK)) ("Change label" (QUOTE CHANGELABEL)) ("label smaller" (QUOTE SMALLER )) ("label larger" (QUOTE LARGER)) ("<-> Directed" (QUOTE DIRECTED)) ("<-> Sides" (QUOTE SIDES)) ( "<-> Border" (QUOTE BORDER)) ("<-> Shade" (QUOTE SHADE)) STOP)))) (LOCALVARS . T) (GLOBALVARS EDITGRAPHMENU GRAPHEDITWINDOW NODEBORDERWIDTH ORIGIN) (RECORDS GRAPHNODE GRAPH) (DECLARE%: DONTCOPY ( MACROS HALF)) (COMS (* Grapher image objects) (FNS GRAPHERCOPYBUTTONEVENTFN GRAPHOBJ.FINDGRAPH) (FNS ALIGNMENTNODE GRAPHOBJ.CHECKALIGN) (FNS GRAPHEROBJ GRAPHOBJ.BUTTONEVENTINFN GRAPHOBJ.COPYBUTTONEVENTFN GRAPHOBJ.COPYFN GRAPHOBJ.DISPLAYFN GRAPHOBJ.GETALIGN GRAPHOBJ.GETFN GRAPHOBJ.IMAGEBOXFN GRAPHOBJ.PUTALIGN GRAPHOBJ.PUTFN) (FNS COPYGRAPH DUMPGRAPH READGRAPH) (VARS (GRAPHERIMAGEFNS)) (ALISTS (IMAGEOBJGETFNS GRAPHOBJ.GETFN))))) (RPAQ DECREASING.FONT.LIST (DECREASING.FONT.LIST)) (RPAQQ LINKPARAMS Link% Parameters) (CONSTANTS (LINKPARAMS (QUOTE Link% Parameters))) (RPAQQ DEFAULT.GRAPH.NODEBORDER NIL) (RPAQQ DEFAULT.GRAPH.NODEFONT NIL) (RPAQQ DEFAULT.GRAPH.NODELABELSHADE NIL) (RPAQQ ScalableLinkParameters (LINEWIDTH)) (RPAQQ CACHE/NODE/LABEL/BITMAPS NIL) (RPAQQ EDITGRAPHMENU NIL) (RPAQQ GRAPHEDITWINDOW NIL) (RPAQQ NODEBORDERWIDTH 1) (RPAQ ORIGIN (CREATEPOSITION 0 0)) (RPAQ? EDITGRAPHMENUCOMMANDS (QUOTE (("Move Node" (QUOTE MOVENODE)) ("Add Node" (QUOTE ADDNODE)) ( "Delete Node" (QUOTE DELETENODE)) ("Add Link" (QUOTE ADDLINK)) ("Delete Link" (QUOTE DELETELINK)) ( "Change label" (QUOTE CHANGELABEL)) ("label smaller" (QUOTE SMALLER)) ("label larger" (QUOTE LARGER)) ("<-> Directed" (QUOTE DIRECTED)) ("<-> Sides" (QUOTE SIDES)) ("<-> Border" (QUOTE BORDER)) ( "<-> Shade" (QUOTE SHADE)) STOP))) (RECORD GRAPHNODE (NODEID NODEPOSITION NODELABELBITMAP NIL NODELABELSHADE NODEWIDTH NODEHEIGHT TONODES FROMNODES NODEFONT NODELABEL NODEBORDER) NODEBORDER _ DEFAULT.GRAPH.NODEBORDER NODELABELSHADE _ DEFAULT.GRAPH.NODELABELSHADE NODEFONT _ DEFAULT.GRAPH.NODEFONT) (RECORD GRAPH (GRAPHNODES SIDESFLG DIRECTEDFLG GRAPH.MOVENODEFN GRAPH.ADDNODEFN GRAPH.DELETENODEFN GRAPH.ADDLINKFN GRAPH.DELETELINKFN GRAPH.FONTCHANGEFN GRAPH.INVERTBORDERFN GRAPH.INVERTLABELFN GRAPH.CHANGELABELFN)) (RPAQQ GRAPHERIMAGEFNS NIL) (ADDTOVAR IMAGEOBJGETFNS (GRAPHOBJ.GETFN)) (PUTPROPS GRAPHER COPYRIGHT ("Xerox Corporation" 1983 1984 1985 1986)) NIL