(FILECREATED "20-Mar-85 11:02:09" ("compiled on " {PHYLUM}BIRTHDAY84>SOURCES>TRI-EDITFRAME.;1) "19-Mar-85 14:34:17" tcompl'd in "INTERLISP-D 19-Mar-85 ..." dated "19-Mar-85 14:48:35") (FILECREATED "19-Nov-84 18:30:27" {AZTEC}BIRTHDAY84>RERELEASE>TRI-EDITFRAME.;2 39737 changes to: (FNS COPY.FRAME RENAME.FRAME EDIT.FRAME GET.FRAME.EDITOR.COMMAND.MENU.LONG GET.FRAME.EDITOR.COMMAND.MENU.SHORT) previous date: "13-Sep-84 14:17:37" {AZTEC}BIRTHDAY84>RERELEASE>TRI-EDITFRAME.;1) ACQUIRE.FRAME.NAMES D1 (P 2 FRAME.NAME P 1 FRAME.LIST P 0 NOT.DONE I 0 MESSAGE) >i1@²gg [ ¿@K ¿K ¿H²` ZµII¹o X°èI(67Q CONFIRM 50Q ACQUIRE.FRAME.NAME 36Q TERPRI 31Q PRIN1 23Q TERPRI 17Q GET.TRILLIUM.PRINTOUT.WINDOW) (45Q CURRENT.INTERFACE 14Q NEW.BLOCK 11Q PROMPTWINDOW) ( 64Q "ANY MORE FRAMES?") ADD.NEW.FRAME D1 (P 0 NAMES I 1 NEW.FRAME I 0 INTERFACE) +Ag ` X@g Ah g H h(47Q SET.CURRENT.FRAME.NAMES 43Q SORT 35Q \NCONC2 27Q LISTGET 17Q MERGEINSERT 11Q LISTGET) (40Q SORT.FRAMES 24Q FRAMES 14Q CURRENT.FRAME.NAMES 6 NAME) () COPY.FRAME D1 (P 3 CLASSES P 2 ITEMS P 1 SUPERFRAMES P 0 NAME I 0 FRAME) h@@g X@g Y@g [0@g °d ¼MµLh^L&½µíNZgggHgIgKgJh(61Q COPY.ITEM 52Q LISTGET 37Q COPY 34Q LISTGET 24Q COPY 21Q LISTGET 11Q LISTGET) (131Q ITEMS 125Q CLASSES 121Q SUPERFRAMES 115Q NAME 112Q FRAME 107Q \TYPE 47Q ITEMS 31Q CLASSES 16Q SUPERFRAMES 6 NAME) () CREATE.NEW.FRAME D1 (P 1 NEW.NAME I 0 INTERFACE) |gg oH !Ilñ²gg ºoJ ¿°*@I ²%gg »oK ¿IK ¿oK h@gggIh ¿@ I(170Q MARK.INTERFACE 163Q ADD.NEW.FRAME 136Q PRIN1 125Q PRIN1 117Q PRIN1 106Q GET.TRILLIUM.PRINTOUT.WINDOW 73Q FIND.FRAME 63Q PRIN1 52Q GET.TRILLIUM.PRINTOUT.WINDOW 27Q PROMPT.READ 23Q PRIN1 10Q GET.TRILLIUM.PRINTOUT.WINDOW) (152Q NAME 147Q FRAME 144Q \TYPE 103Q NEW.BLOCK 100Q TRILLIUM.WARNINGS 47Q NEW.BLOCK 44Q TRILLIUM.WARNINGS 5 NEW.BLOCK 2 PROMPTWINDOW) ( 132Q " is already in use" 113Q "The name " 57Q "Name must be one word" 17Q "Creating new frame; Name of new frame: ") DELETE.FRAME D1 (I 1 FRAME.NAME I 0 INTERFACE) @A @g A` @ (34Q MARK.INTERFACE 30Q SET.CURRENT.FRAME.NAMES 25Q DREMOVE 16Q DREMOVE 13Q LISTGET 4 FIND.FRAME) (22Q CURRENT.FRAME.NAMES 10Q FRAMES) () EDIT.FRAMEA0001 D1 (NAME ERRORSET F 0 MACROY) ci(2 FORGET.EDIT.WINDOWS) NIL () EDIT.FRAMEA0002 D1 (NAME ERRORSET F 0 FRAME F 1 MACROY) P ¿P ¿P ¿P ci(22Q DISPLAY.FRAME 15Q MARK.FRAME.CONTEXT.OBSOLETE 10Q ANALYZE.FRAME.IF.NECESSARY* 3 RESET.FRAME) NIL () EDIT.FRAMEA0003 D1 (NAME ERRORSET F 0 FRAME F 1 MACROY) Pi ci(4 DISPLAY.FRAME) NIL () EDIT.FRAMEA0004 D1 (NAME ERRORSET F 0 FRAME F 1 MACROY) P ¿P ci(10Q DISPLAY.FRAME 3 MARK.FRAME.CONTEXT.OBSOLETE) NIL () EDIT.FRAMEA0005 D1 (NAME ERRORSET F 0 FRAME F 1 MACROY) P ci(3 HARDCOPY.FRAME) NIL () EDIT.FRAME D1 (P 4 RESETSTATE P 3 MACROY P 1 OLDVALUE P 0 FRAME I 0 INTERFACE.WINDOW F 5 RESETVARSLST F 6 TRILLIUM.CURSOR) n@g µ±Ydgð˜¿hH ±Jdgð›¿H H ±8dgð—¿H ±*dgð›¿H H ±dgð—¿H ± dgð²¿`Èl@åjð–H ±ðH ±édgð—¿H ±Ûdgð—¿H ±Ídgð—¿H ±¿dgð—¿H ±±dgð—¿H ±£dgð—¿H ±•dgð—¿H ±‡dgð—¿H ±ydgð—¿H ±kdgð—¿H ±]dgð—¿H ±Odgð—¿H ±Adgð—¿H ±3dgðœ¿H ¿H ± dgðœ¿H ¿H ± dgð—¿H ±ÿdgð—¿H ±ñdgð—¿H ±ãdgð—¿H ±Õdgð—¿H ±Çdgð—¿H ±¹dgð–¿±¬dgð²B¿hV 1gIhhUc ºog £g¼Jc ¿gJ ¿L“¿±edgð–¿±Xdgð–¿±Kdgð–¿±>dgð™¿` ±.dgð²B¿hV 1gIhhUc ºog £g¼Jc ¿gJ ¿L“¿±çdgð²B¿hV 1gIhhUc ºog £g¼Jc ¿gJ ¿L“¿± dgð²A¿hV 1gIhhUc ºog £g¼Jc ¿gJ ¿L“¿°Ydgð²A¿hV 1gIhhUc ºog £g¼Jc ¿gJ ¿L“¿°gð”H †o h(1552Q SHOULDNT 1542Q INSPECT/PLIST 1525Q ERROR! 1517Q APPLY 1473Q EDIT.FRAMEA0005 1440Q SWAP.CURSOR.AUX 1417Q ERROR! 1411Q APPLY 1365Q EDIT.FRAMEA0004 1332Q SWAP.CURSOR.AUX 1310Q ERROR! 1302Q APPLY 1256Q EDIT.FRAMEA0003 1223Q SWAP.CURSOR.AUX 1201Q ERROR! 1173Q APPLY 1147Q EDIT.FRAMEA0002 1114Q SWAP.CURSOR.AUX 1074Q MANIPULATE.INTERFACE 1054Q MANIPULATE.CLASSES 1037Q MANIPULATE.FRAMES 1022Q DEFINE.ITEM.TYPE 1003Q ERROR! 775Q APPLY 751Q EDIT.FRAMEA0001 716Q SWAP.CURSOR.AUX 676Q EXPOSE.ITEM.EDITORS 661Q PRINT.FRAME.CLASSES 643Q FORGET.FRAME.CLASS 625Q DELETE.CLASS.FROM.CURRENT.FRAME 607Q ADD.CLASS.TO.CURRENT.FRAME 571Q ADD.FRAME.CLASS 553Q PRINT.SUPERFRAMES 535Q DISPLAY.FRAME 530Q FORGET.SUPERFRAMES 512Q DISPLAY.FRAME 505Q ADD.SUPERFRAME 467Q MANIPULATE.SUPERFRAMES 451Q RETRIEVE.SAVED.ITEM 433Q SAVE.ITEM 415Q MODIFY.ITEMS 377Q ALIGN.ITEMS 361Q GROUP.ITEMS 343Q INTERACT&THAW.ITEM 325Q INTERACT&FREEZE.ITEM 307Q BURY.ITEM 271Q DELETE.ITEM 253Q EXPAND.ITEM 235Q GRAPH.ITEMS 217Q PRINT.ITEMS 201Q INTERACT&EDIT.ITEM 172Q REFORM.ITEM 140Q NAME.ITEM 122Q SHAPE.ITEM 116Q ACQUIRE.ITEM 100Q MOVE.ITEM 62Q INTERACT©.ITEM 56Q ACQUIRE.ITEM 40Q CREATE.NEW.ITEM 17Q MENU 14Q GET.FRAME.EDITOR.COMMAND.MENU 6 GETWINDOWUSERPROP) (1534Q INSPECT.FRAME 1510Q SWAP.CURSOR.AUX 1477Q ERROR 1470Q INTERNAL 1446Q SWAP.CURSOR.AUX 1427Q HARDCOPY.FRAME 1402Q SWAP.CURSOR.AUX 1371Q ERROR 1362Q INTERNAL 1340Q SWAP.CURSOR.AUX 1321Q DISPLAY.FRAME 1273Q SWAP.CURSOR.AUX 1262Q ERROR 1253Q INTERNAL 1231Q SWAP.CURSOR.AUX 1212Q INITIALIZE.FRAME 1164Q SWAP.CURSOR.AUX 1153Q ERROR 1144Q INTERNAL 1122Q SWAP.CURSOR.AUX 1103Q ANALYZE.FRAME 1071Q CURRENT.INTERFACE 1063Q MANIPULATE.INTERFACE 1046Q MANIPULATE.CLASSES 1031Q MANIPULATE.FRAMES 1014Q DEFINE.ITEM.TYPE 766Q SWAP.CURSOR.AUX 755Q ERROR 746Q INTERNAL 724Q SWAP.CURSOR.AUX 705Q FORGET.ITEM.EDITORS 670Q EXPOSE.ITEM.EDITORS 652Q PRINT.FRAME.CLASSES 634Q FORGET.FRAME.CLASS 616Q DELETE.CLASS.FROM.CURRENT.FRAME 600Q ADD.CLASS.TO.CURRENT.FRAME 562Q ADD.FRAME.CLASS 544Q PRINT.SUPERFRAMES 521Q FORGET.SUPERFRAME 476Q ADD.SUPERFRAME 460Q MANIPULATE.SUPERFRAMES 442Q RETRIEVE.SAVED.ITEM 424Q SAVE.ITEM 406Q MODIFY.ITEMS 370Q ALIGN.ITEMS 352Q GROUP.ITEMS 334Q THAW.ITEM 316Q FREEZE.ITEM 300Q BURY.ITEM 262Q DELETE.ITEM 244Q EXPAND.ITEM 226Q GRAPH.ITEMS 210Q PRINT.ITEMS 156Q \EM.KBDAD2 147Q EDIT.ITEM 131Q NAME.ITEM 107Q SHAPE.ITEM 71Q MOVE.ITEM 47Q COPY.ITEM 30Q CREATE.NEW.ITEM 3 CURRENT.FRAME) ( 1547Q "Unrecognized command in EDIT.FRAME" 1465Q (EDIT.FRAMEA0005) 1357Q (EDIT.FRAMEA0004) 1250Q (EDIT.FRAMEA0003) 1141Q (EDIT.FRAMEA0002) 743Q (EDIT.FRAMEA0001)) FORGET.FRAME.CLASS D1 (P 2 CLASS.NAME P 1 CLASSES P 0 FRAME.NAME I 0 FRAME) ¬`@g X@g Yd³gg »oK ¿±€`dI¿do¿di¿di¿dg ¿dg¿jdnÿdh¼dL ¿ Z²-oJo ²@gJI ¿` ¿higg ½oM h(250Q PRIN1 237Q GET.TRILLIUM.PRINTOUT.WINDOW 217Q MARK.INTERFACE 210Q LISTPUT 205Q REMOVE 172Q CONFIRM 167Q CONCAT 150Q MENU 47Q PRIN1 36Q GET.TRILLIUM.PRINTOUT.WINDOW 21Q LISTGET 11Q LISTGET) (234Q NEW.BLOCK 231Q TRILLIUM.WARNINGS 224Q FRAME.NAME.MENU 214Q CURRENT.INTERFACE 200Q CLASSES 121Q DEFAULTMENUHELDFN 112Q CLRPROMPT 56Q MENUTYPE# 33Q NEW.BLOCK 30Q TRILLIUM.WARNINGS 16Q CLASSES 6 NAME) ( 244Q "FORGET.FRAME.CLASS command aborted" 164Q "?" 157Q "Forget class" 71Q "Classes" 43Q "This frame has no classes; can't forget one") FRAME.GRAPH.WINDOW.MIDDLEBUTTONFN D1 (P 5 NEW.WINDOW P 4 FRAME P 3 INTERFACE P 2 INTERFACE.WINDOW P 1 COMMAND P 0 COMMAND.MENU I 1 GRAPH.WINDOW I 0 GRAPHNODE) ¸`@´‚±¯Ag ºX Yµ±™gð²"@A ]gJ¿Mgg¿JM °rIgð®Igð¨Idgð²N¿J ¿J`ð¤J ¿@ ¼Idgð™¿`L °!gð˜`L °Igð—`L ‚¿A gð—@ ‚h(264Q SHOULDNT 260Q INSPECT 255Q MAKE.GRAPH.DATUM 243Q TOTOPW 236Q SHOULDNT 232Q POP.TO.FRAME 213Q PUSH.TO.FRAME 175Q MOVE.TO.FRAME 155Q MAKE.GRAPH.DATUM 150Q RESTORE.INTERFACE.CONTEXT 135Q TOTOPW 102Q ADD.DEPENDENT.WINDOW 74Q PUTWINDOWPROP 61Q PUTWINDOWPROP 51Q MAKE.GRAPH.MAKE.SUBGRAPH 30Q MENU 24Q GET.FRAME.GRAPH.WINDOW.MIDDLEBUTTONFN.MENU 20Q GETWINDOWUSERPROP) (247Q INSPECT 226Q CURRENT.INTERFACE 221Q POP.TO.FRAME 207Q CURRENT.INTERFACE 202Q PUSH.TO.FRAME 171Q CURRENT.INTERFACE 163Q MOVE.TO.FRAME 142Q CURRENT.INTERFACE.WINDOW 125Q POP.TO.FRAME 116Q PUSH.TO.FRAME 110Q MOVE.TO.FRAME 71Q GRAPH.FRAME.WINDOW 66Q TRILLIUM.WINDOW.TYPE 55Q INTERFACE.WINDOW 41Q MAKE.SUBGRAPH 15Q INTERFACE.WINDOW) () FREEZE.FRAME D1 (P 0 PRIMITIVES I 0 FRAME) @g ³uhh!`²*gg ¹oI ¿@g I ¿oI ¿H@g @i @g@g @gH`²gg ºoJ ih(171Q PRIN1 160Q GET.TRILLIUM.PRINTOUT.WINDOW 142Q LISTPUT 131Q LISTPUT 126Q LISTGET 113Q RESET.FRAME 106Q FREEZE.SUBITEMS 103Q LISTGET 72Q PRIN1 61Q PRIN1 55Q LISTGET 45Q PRIN1 34Q GET.TRILLIUM.PRINTOUT.WINDOW 6 LISTGET) (155Q SAME.LINE 152Q TRILLIUM.TRACE 145Q REPORT.FRAMES 135Q ITEMS 123Q ITEMS 117Q FROZEN 100Q ITEMS 52Q NAME 31Q NEW.BLOCK 26Q TRILLIUM.TRACE 21Q REPORT.FRAMES 3 FROZEN) ( 165Q " done." 66Q ". . ." 41Q "Freezing frame: ") GET.FRAME.EDITOR.COMMAND.MENU D1 NIL `µ`“‚(17Q GET.FRAME.EDITOR.COMMAND.MENU.SHORT 13Q GET.FRAME.EDITOR.COMMAND.MENU.LONG) (22Q FRAME.EDITOR.COMMAND.MENU 7 FULL.MENU 2 FRAME.EDITOR.COMMAND.MENU) () GET.FRAME.EDITOR.COMMAND.MENU.LONG D1 NIL B`do¿do¿di¿di¿dg ¿dg¿jdnÿdhHdI ¿NIL (50Q DEFAULTMENUHELDFN 41Q CLRPROMPT 2 MENUTYPE#) ( 20Q ((CREATE.NEW.ITEM (QUOTE CREATE.NEW.ITEM) "For adding a new item to the frame") (COPY.ITEM (QUOTE COPY.ITEM) "For making a copy of an item in the frame") (MOVE.ITEM (QUOTE MOVE.ITEM) "For repositioning an item in the frame") (SHAPE.ITEM (QUOTE SHAPE.ITEM) "For reshaping/repositioning an item in the frame") (NAME.ITEM (QUOTE NAME.ITEM) "For attaching a name to an item") (EDIT.ITEM (QUOTE EDIT.ITEM) "For opening an editor window for an item in the frame") (DELETE.ITEM (QUOTE DELETE.ITEM) "For removing an item from the frame") (EXPAND.ITEM (QUOTE EXPAND.ITEM) "For replacing an item with the set of items which is its first-level expansion") (BURY.ITEM (QUOTE BURY.ITEM) "For changing the overlaying of items in the frame") (FREEZE.ITEM (QUOTE FREEZE.ITEM) "For freezing (condensing) an item") (THAW.ITEM (QUOTE THAW.ITEM) "For restoring a FROZEN item") (SAVE.ITEM (QUOTE SAVE.ITEM) "For saving a copy of an item in the frame in the SAVE register") (RETRIEVE.SAVED.ITEM (QUOTE RETRIEVE.SAVED.ITEM) "For adding of copy of the item in the SAVE register to the frame") ("" NIL) (GROUP.ITEMS (QUOTE GROUP.ITEMS) "For creating an item of type GROUP from a set of items in the frame") (ALIGN.ITEMS (QUOTE ALIGN.ITEMS) "Pops up a menu for aligning items.") (MODIFY.ITEMS (QUOTE MODIFY.ITEMS) "For changing all items match a pattern in a uniform way") (PRINT.ITEMS (QUOTE PRINT.ITEMS) "For browsing the items in the frame") (GRAPH.ITEMS (QUOTE GRAPH.ITEMS) "Produces a graph of the items in the frame") (" " NIL) (DEFINE.ITEM.TYPE (QUOTE DEFINE.ITEM.TYPE) "For defining a new item.type from an example") (" " NIL) (MANIPULATE.SUPERFRAMES (QUOTE MANIPULATE.SUPERFRAMES) "For general manipulation of SUPERFRAMES") (ADD.SUPERFRAME (QUOTE ADD.SUPERFRAME) "For including in this frame all items in another frame (recursively)") (FORGET.SUPERFRAME (QUOTE FORGET.SUPERFRAME) "For removing a superframe from this frame") (PRINT.SUPERFRAMES (QUOTE PRINT.SUPERFRAMES) "For showing the superframes of this frame") (" " NIL) (MANIPULATE.CLASSES (QUOTE MANIPULATE.CLASSES) "For entering the section of TRILLIUM used for manipulating frames within the interface") (ADD.CLASS.TO.CURRENT.FRAME (QUOTE ADD.CLASS.TO.CURRENT.FRAME) "For adding a CLASS to the Current Frame") (DELETE.CLASS.FROM.CURRENT.FRAME (QUOTE DELETE.CLASS.FROM.CURRENT.FRAME) "For deleting a CLASS to the Current Frame") (PRINT.FRAME.CLASSES (QUOTE PRINT.FRAME.CLASSES) "For showing the classes of this frame") (" " NIL) (EXPOSE.ITEM.EDITORS (QUOTE EXPOSE.ITEM.EDITORS) "For displaying the item editor windows for items in the frame") (FORGET.ITEM.EDITORS (QUOTE FORGET.ITEM.EDITORS) "For destroying all the item editor windows for items in the frame") (" " NIL) (MANIPULATE.FRAMES (QUOTE MANIPULATE.FRAMES) "For entering the section of TRILLIUM used for manipulating frames within the interface") (MANIPULATE.INTERFACE (QUOTE MANIPULATE.INTERFACE) "For operating on the interface as a whole") (" " NIL) (ANALYZE.FRAME (QUOTE ANALYZE.FRAME) "For re-expanding all the items in the frame; a reset/cleanup operation") (INITIALIZE.FRAME (QUOTE INITIALIZE.FRAME) "Run the initializations and re-display the frame") (DISPLAY.FRAME (QUOTE DISPLAY.FRAME) "For re-displaying the frame") (HARDCOPY.FRAME (QUOTE HARDCOPY.FRAME) "For making hardcopy of the frame") (INSPECT.FRAME (QUOTE INSPECT.FRAME) "For opening an INSPECT window on the frame; a maintenance operation")) 10Q "Frame editor commands") GET.FRAME.EDITOR.COMMAND.MENU.SHORT D1 NIL B`do¿do¿di¿di¿dg ¿dg¿jdnÿdhHdI ¿NIL (50Q DEFAULTMENUHELDFN 41Q CLRPROMPT 2 MENUTYPE#) ( 20Q ((CREATE.NEW.ITEM (QUOTE CREATE.NEW.ITEM) "For adding a new item to the frame") (COPY.ITEM (QUOTE COPY.ITEM) "For making a copy of an item in the frame") (MOVE.ITEM (QUOTE MOVE.ITEM) "For repositioning an item in the frame") (SHAPE.ITEM (QUOTE SHAPE.ITEM) "For reshaping/repositioning an item in the frame") (EDIT.ITEM (QUOTE EDIT.ITEM) "For opening an editor window for an item in the frame") (DELETE.ITEM (QUOTE DELETE.ITEM) "For removing an item from the frame") (EXPAND.ITEM (QUOTE EXPAND.ITEM) "For replacing an item with the set of items which is its first-level expansion") (GROUP.ITEMS (QUOTE GROUP.ITEMS) "For creating an item of type GROUP from a set of items in the frame") (PRINT.ITEMS (QUOTE PRINT.ITEMS) "For browsing the items in the frame") (" " NIL) (MANIPULATE.FRAMES (QUOTE MANIPULATE.FRAMES) "For entering the section of TRILLIUM used for manipulating frames within the interface") (DEFINE.ITEM.TYPE (QUOTE DEFINE.ITEM.TYPE) "For defining a new item.type from an example") (" " NIL) (ANALYZE.FRAME (QUOTE ANALYZE.FRAME) "For re-expanding all the items in the frame; a reset/cleanup operation")) 10Q "Frame editor commands") GET.GRAPH.FRAMES.MENU D1 NIL K`µF`do¿do¿di¿di¿dg ¿dg¿jdnÿdhHdI ¿NIL (110Q GRAPH.FRAMES.MENU 55Q DEFAULTMENUHELDFN 46Q CLRPROMPT 7 MENUTYPE# 2 GRAPH.FRAMES.MENU) ( 25Q (CHANGE.FRAME.STRUCTURE SUPERFRAME.STRUCTURE THIS.FRAME.AND.FRIENDS) 15Q "Graph type") GET.MANIPULATE.FRAMES.COMMAND.MENU D1 NIL K`µF`do¿do¿di¿di¿dg ¿dg¿jdnÿdhHdI ¿NIL (110Q MANIPULATE.FRAMES.COMMAND.MENU 55Q DEFAULTMENUHELDFN 46Q CLRPROMPT 7 MENUTYPE# 2 MANIPULATE.FRAMES.COMMAND.MENU) ( 25Q "Frame manipulation" 15Q (PUSH.TO.FRAME MOVE.TO.FRAME POP.TO.FRAME SHOW.FRAME.STACK CLEAR.FRAME.STACK CREATE.NEW.FRAME COPY.FRAME RENAME.FRAME DELETE.FRAME SAVE.FRAME RETRIEVE.FRAME FREEZE.FRAME THAW.FRAME SET.FIRST.FRAME GRAPH.FRAMES QUIT)) GET.RENAME.FRAME.MENU D1 NIL F`µA`do¿do¿di¿dg ¿dg¿jdnÿdhHdI ¿NIL (103Q RENAME.FRAME.MENU 50Q DEFAULTMENUHELDFN 41Q CLRPROMPT 7 MENUTYPE# 2 RENAME.FRAME.MENU) ( 25Q ((YES T "Change references to the old frame in all items of the interface") (NO (QUOTE NIL) "Only change the name of the frame")) 15Q "Change All Item References") GRAPH.FRAME.SUPERFRAMES D1 (P 5 FRAME P 4 FRAME.NAME I 1 INTERFACE I 0 FRAME) /@g QHµI¼AL ]µˆ»JµKhZ¹HX°äK&º°ø(26Q FIND.FRAME 6 LISTGET) (3 SUPERFRAMES) () GRAPH.FRAMESA0001 D1 (NAME ERRORSET L (0 NIL) F 3 GRAPH.SPEC F 4 POSSIBLE.ROOTS F 5 REAL.ROOTS F 6 TITLE F 7 DEPTH F 10Q FRAMES F 11Q GRAPH.FRAME.WINDOW F 12Q COMMAND F 13Q MACROY) ( `g c¿Wdgð²P¿`c¿0W°dg¸IµHhZH&¹µìJc¿ST`c ¿o`g c¿l c±dgð²O¿`c¿0W°dg¸IµHhZH&¹µìJc¿ST`c ¿o`g c¿l c°;gð²,`c¿`ghc ¿o`g c¿l cˆWo ¿hVSU`hghW cg`¿Wgg¿`W ci(442Q ADD.DEPENDENT.WINDOW 431Q PUTWINDOWPROP 415Q PUTWINDOWPROP 402Q MAKE.GRAPH 357Q ERROR 336Q CONCAT 333Q LISTGET 255Q CONCAT 252Q LISTGET 232Q MAKE.GRAPH.FIND.ROOTS 130Q CONCAT 125Q LISTGET 105Q MAKE.GRAPH.FIND.ROOTS 10Q LISTGET) (435Q CURRENT.INTERFACE.WINDOW 426Q GRAPH.FRAME.WINDOW 423Q TRILLIUM.WINDOW.TYPE 412Q CURRENT.INTERFACE.WINDOW 407Q INTERFACE.WINDOW 373Q FRAME.GRAPH.WINDOW.MIDDLEBUTTONFN 367Q CURRENT.INTERFACE 330Q NAME 325Q CURRENT.FRAME 310Q FRAME 305Q CURRENT.FRAME 277Q FRAME.FRIENDS.GRAPH.SPEC 271Q THIS.FRAME.AND.FRIENDS 247Q NAME 244Q CURRENT.INTERFACE 227Q CURRENT.INTERFACE 174Q FRAME 155Q SUPERFRAME.STRUCTURE.GRAPH.SPEC 146Q SUPERFRAME.STRUCTURE 122Q NAME 117Q CURRENT.INTERFACE 102Q CURRENT.INTERFACE 47Q FRAME 30Q CHANGE.FRAME.STRUCTURE.GRAPH.SPEC 21Q CHANGE.FRAME.STRUCTURE 5 FRAMES 2 CURRENT.INTERFACE) ( 354Q ": unrecognized command in GRAPH.FRAMES" 322Q "Friends of frame " 241Q "Superframe structure for interface " 114Q "Change frame structure for interface ") GRAPH.FRAMES D1 (P 16Q RESETSTATE P 15Q MACROY P 13Q OLDVALUE P 12Q GRAPH.FRAME.WINDOW P 11Q DEPTH P 10Q TITLE P 7 REAL.ROOTS P 6 POSSIBLE.ROOTS P 5 FRAMES P 4 GRAPH.SPEC P 3 ITYPES P 2 COMMAND P 1 COMMAND.MENU P 0 NAME F 17Q RESETVARSLST F 20Q TRILLIUM.CURSOR) X° Yd Zd¡hhW 1gOhhWc_¿og ¥g_¿Oc¿gO ¿O’O(123Q ERROR! 114Q APPLY 64Q GRAPH.FRAMESA0001 25Q SWAP.CURSOR.AUX 12Q MENU 5 GET.GRAPH.FRAMES.MENU) (104Q SWAP.CURSOR.AUX 70Q ERROR 61Q INTERNAL 33Q SWAP.CURSOR.AUX) ( 56Q (GRAPH.FRAMESA0001)) GRAPH.FRAMES.MENTION.AS.SUPERFRAME D1 (P 6 FRAME P 5 FRAME.NAME P 0 FRAMES.NAMES I 1 INTERFACE I 0 FRAME) C@g A Xdd Xd XdQIµJ½AM ^µˆ¼KµLh[ºIY°äL&»°ø(52Q FIND.FRAME 30Q SORT 23Q INTERSECTION 15Q USED.AS.SUPERFRAME.BY 11Q LISTGET) (6 NAME) () GRAPH.FRAMES.MENTIONED.FRAMES D1 (P 6 FRAME P 5 FRAME.NAME P 0 FRAMES.NAMES I 1 INTERFACE I 0 FRAME) <@ Xdd Xd XdQIµJ½AM ^µˆ¼KµLh[ºIY°äL&»°ø(43Q FIND.FRAME 21Q SORT 14Q INTERSECTION 6 GET.FRAME.SONS) NIL () INTERACT&ADD.FRAME.CLASS D1 (P 3 SUPER.FRAME P 2 CLASS P 1 CLASSES P 0 FRAME.NAME I 0 FRAME) @P@g X@g Y` Zd³gg ¼oL h@J ¿` i(74Q MARK.INTERFACE 65Q ADD.FRAME.CLASS 56Q PRIN1 45Q GET.TRILLIUM.PRINTOUT.WINDOW 30Q ACQUIRE.CLASS.NAME 21Q LISTGET 11Q LISTGET) (71Q CURRENT.INTERFACE 42Q NEW.BLOCK 37Q TRILLIUM.WARNINGS 25Q CURRENT.INTERFACE 16Q CLASSES 6 NAME) ( 52Q "ADD.FRAME.CLASS command aborted") INTERACT©.FRAME D1 (P 1 NEW.FRAME P 0 NEW.NAME I 1 FRAME I 0 INTERFACE) °pgg ºoJ ¿Ag J ¿gg »oK ¿Xdµgg ¼oL ¿°Elñ²gg ½oM ¿°*@H ²%gg ¾oN ¿HN ¿oN hA YgH¿@I ¿@ H(254Q MARK.INTERFACE 247Q ADD.NEW.FRAME 241Q LISTPUT 231Q COPY.FRAME 223Q PRIN1 212Q PRIN1 204Q PRIN1 173Q GET.TRILLIUM.PRINTOUT.WINDOW 160Q FIND.FRAME 150Q PRIN1 137Q GET.TRILLIUM.PRINTOUT.WINDOW 115Q PRIN1 104Q GET.TRILLIUM.PRINTOUT.WINDOW 67Q PROMPT.READ 63Q PRIN1 52Q GET.TRILLIUM.PRINTOUT.WINDOW 40Q PRIN1 34Q LISTGET 24Q PRIN1 13Q GET.TRILLIUM.PRINTOUT.WINDOW) (235Q NAME 170Q NEW.BLOCK 165Q TRILLIUM.WARNINGS 134Q NEW.BLOCK 131Q TRILLIUM.WARNINGS 101Q NEW.BLOCK 76Q TRILLIUM.WARNINGS 47Q NEW.BLOCK 44Q PROMPTWINDOW 31Q NAME 10Q NEW.BLOCK 5 TRILLIUM.TRACE) ( 217Q " is already in use" 200Q "The name " 144Q "Name must be one word" 111Q "Copy command aborted" 57Q "Name of copy: " 20Q "Copying frame ") INTERACT&FREEZE.FRAMEA0001 D1 (NAME ERRORSET L (0 NIL) F 1 FRAME F 2 INTERFACE F 3 FRAME.NAME F 4 MACROY) 9Q šQ ¿R °&gg oH ¿SH ¿oH ci(62Q PRIN1 51Q PRIN1 43Q PRIN1 30Q GET.TRILLIUM.PRINTOUT.WINDOW 15Q MARK.INTERFACE 10Q MARK.FRAME.CONTEXT.OBSOLETE 3 FREEZE.FRAME) (25Q NEW.BLOCK 22Q TRILLIUM.WARNINGS) ( 56Q " is already frozen." 37Q "Frame ") INTERACT&FREEZE.FRAME D1 (P 6 RESETSTATE P 5 MACROY P 3 OLDVALUE P 1 FRAME P 0 FRAME.NAME I 0 INTERFACE F 7 RESETVARSLST F 10Q TRILLIUM.CURSOR) g@ !H²J@H Y²BhW 1gKhhWc¼og £g¾Lc¿gL ¿N“¿°gg ºoJ h(143Q PRIN1 132Q GET.TRILLIUM.PRINTOUT.WINDOW 115Q ERROR! 107Q APPLY 63Q INTERACT&FREEZE.FRAMEA0001 27Q SWAP.CURSOR.AUX 16Q FIND.FRAME 3 ACQUIRE.FRAME.NAME) (127Q NEW.BLOCK 124Q TRILLIUM.WARNINGS 100Q SWAP.CURSOR.AUX 67Q ERROR 60Q INTERNAL 35Q SWAP.CURSOR.AUX) ( 137Q "FREEZE.FRAME aborted." 55Q (INTERACT&FREEZE.FRAMEA0001)) INTERACT&RETRIEVE.FRAME D1 (P 2 NEW.FRAME P 1 NEW.NAME I 0 INTERFACE) ”gg oH AIµgg »oK ¿°Elñ²gg ¼oL ¿°*@I ²%gg ½oM ¿IM ¿oM h` ZgI¿@J ¿@ I(220Q MARK.INTERFACE 213Q ADD.NEW.FRAME 205Q LISTPUT 175Q COPY.FRAME 165Q PRIN1 154Q PRIN1 146Q PRIN1 135Q GET.TRILLIUM.PRINTOUT.WINDOW 122Q FIND.FRAME 112Q PRIN1 101Q GET.TRILLIUM.PRINTOUT.WINDOW 57Q PRIN1 46Q GET.TRILLIUM.PRINTOUT.WINDOW 27Q PROMPT.READ 23Q PRIN1 10Q GET.TRILLIUM.PRINTOUT.WINDOW) (201Q NAME 172Q TRILLIUM.SAVED.FRAME 132Q NEW.BLOCK 127Q TRILLIUM.WARNINGS 76Q NEW.BLOCK 73Q TRILLIUM.WARNINGS 43Q NEW.BLOCK 40Q TRILLIUM.WARNINGS 5 NEW.BLOCK 2 PROMPTWINDOW) ( 161Q " is already in use" 142Q "The name " 106Q "Name must be one word" 53Q "Retrieve command aborted" 17Q "Retrieving a copy of the saved frame; name for the copy: ") INTERACT&THAW.FRAMEA0001 D1 (NAME ERRORSET L (0 NIL) F 1 FRAME F 2 INTERFACE F 3 FRAME.NAME F 4 MACROY) `QR ²2Q ¿R ¿gg oH ¿SH ¿oH °&gg oH ¿SH ¿oH ci(131Q PRIN1 120Q PRIN1 112Q PRIN1 77Q GET.TRILLIUM.PRINTOUT.WINDOW 63Q PRIN1 52Q PRIN1 44Q PRIN1 31Q GET.TRILLIUM.PRINTOUT.WINDOW 17Q MARK.INTERFACE 12Q MARK.FRAME.CONTEXT.OBSOLETE 4 THAW.FRAME) (74Q NEW.BLOCK 71Q TRILLIUM.WARNINGS 26Q NEW.BLOCK 23Q TRILLIUM.TRACE) ( 125Q " couldn't be thawed." 106Q "Frame " 57Q " thawed." 40Q "Frame ") INTERACT&THAW.FRAME D1 (P 6 RESETSTATE P 5 MACROY P 3 OLDVALUE P 1 FRAME P 0 FRAME.NAME I 0 INTERFACE F 7 RESETVARSLST F 10Q TRILLIUM.CURSOR) g@ !H²J@H Y²BhW 1gKhhWc¼og £g¾Lc¿gL ¿N“¿°gg ºoJ h(143Q PRIN1 132Q GET.TRILLIUM.PRINTOUT.WINDOW 115Q ERROR! 107Q APPLY 63Q INTERACT&THAW.FRAMEA0001 27Q SWAP.CURSOR.AUX 16Q FIND.FRAME 3 ACQUIRE.FRAME.NAME) (127Q NEW.BLOCK 124Q TRILLIUM.WARNINGS 100Q SWAP.CURSOR.AUX 67Q ERROR 60Q INTERNAL 35Q SWAP.CURSOR.AUX) ( 137Q "THAW.FRAME aborted." 55Q (INTERACT&THAW.FRAMEA0001)) MANIPULATE.FRAMESA0008 D1 (NAME ERRORSET F 0 INTERFACE F 1 FRAME.NAME F 2 FRAME F 3 MACROY) PQ c ci(11Q COPY.FRAME 4 FIND.FRAME) (14Q TRILLIUM.SAVED.FRAME) () MANIPULATE.FRAMES D1 (P 31Q RESETSTATE P 30Q MACROY P 26Q OLDVALUE P 25Q FRAME.NAME P 11Q SUBFRAMES P 10Q STACK P 7 FRAME P 6 REFERENCES.TOO P 5 NEW.FRAME.NAME P 4 OLD.FRAME.NAME P 3 FRAME.NAME P 2 COMMAND P 1 COMMAND.MENU P 0 INTERFACE F 32Q RESETVARSLST F 33Q TRILLIUM.CURSOR) ˆð``XYI º¿Jµ°ôgð’±dJdgð²¿H [²ÜHK _ ¿Oi ¿°Ègð²H [²»HK _ ¿O ¿°¨Jdgð²c¿`do¿`g _¿dO¿dg ¿dg¿jdnÿdh_¿dO ¿ [¢±ÿWHK _¢±ÿIO ¿±ÿ@gð²Kgg _¿oO ¿`g °$dgg _¿khO¿O*O µÝ±þñJdgð²1¿`g`g h¿gg _¿oO ¿±þºgð²H [¢±þ«HdK ¿±þžJdgð²<¿H \¢±þŒgg _¿oO ¿]¢±þn ¾LMHN¿±þ\gð¢±¥H [¢±þKKH _²vgg _ ¿oO ¿KO ¿oO ¿O ¿O°&dgg _"¿oO" ¿O*O" µÛoKo ¢±ý×HK ¿±ýÎoKo ¢±ý»HK ¿±ý²Jdgð˜¿H ¿±ý¢gð²{H [¢±ý“hW6 1gO,hhW4c4_.¿og ¥g_2¿O.c4¿gO. ¿O2“¿gg _$¿oO$ ¿KO$ ¿oO$ ¿±ý#Jdgð²(¿`—H »±ýgg _&¿oO& ¿±üõgð—H ¿±üèJdgð˜¿H ¿±üØgð²4H [¢±üÉHgK¿gg _(¿oO( ¿KO( ¿±ü Jgð–¿±ü“¿±üŒh(1600Q SHOULDNT 1571Q GRAPH.FRAMES 1554Q PRIN1 1545Q PRIN1 1531Q GET.TRILLIUM.PRINTOUT.WINDOW 1517Q LISTPUT 1502Q ACQUIRE.FRAME.NAME 1464Q INTERACT&THAW.FRAME 1444Q INTERACT&FREEZE.FRAME 1427Q PRIN1 1413Q GET.TRILLIUM.PRINTOUT.WINDOW 1376Q INTERACT&RETRIEVE.FRAME 1351Q PRIN1 1337Q PRIN1 1330Q PRIN1 1314Q GET.TRILLIUM.PRINTOUT.WINDOW 1301Q ERROR! 1272Q APPLY 1242Q MANIPULATE.FRAMESA0008 1203Q SWAP.CURSOR.AUX 1170Q ACQUIRE.FRAME.NAME 1152Q CREATE.NEW.FRAME 1132Q DELETE.FRAME 1121Q CONFIRM 1116Q CONCAT 1076Q DELETE.FRAME 1065Q CONFIRM 1062Q CONCAT 1041Q PRIN1 1031Q PRIN1 1015Q GET.TRILLIUM.PRINTOUT.WINDOW 772Q TERPRI 764Q PRIN1 752Q PRIN1 743Q PRIN1 727Q GET.TRILLIUM.PRINTOUT.WINDOW 712Q USED.AS.SUPERFRAME.BY 700Q ACQUIRE.FRAME.NAME 660Q RENAME.FRAME 650Q MENU 645Q GET.RENAME.FRAME.MENU 635Q PROMPT.READ 631Q PRIN1 615Q GET.TRILLIUM.PRINTOUT.WINDOW 577Q ACQUIRE.FRAME.NAME 556Q INTERACT©.FRAME 553Q FIND.FRAME 540Q ACQUIRE.FRAME.NAME 522Q PRIN1 506Q GET.TRILLIUM.PRINTOUT.WINDOW 474Q PUTWINDOWPROP 467Q LISTGET 427Q PRIN1 417Q TAB 405Q GET.TRILLIUM.PRINTOUT.WINDOW 365Q GETWINDOWUSERPROP 353Q PRIN1 337Q GET.TRILLIUM.PRINTOUT.WINDOW 314Q START.FRAME 301Q FRAME.DO.POP 276Q FIND.FRAME 264Q MENU 205Q GETWINDOWUSERPROP 144Q START.FRAME 136Q FRAME.DO.GOTO 131Q FIND.FRAME 121Q ACQUIRE.FRAME.NAME 104Q START.FRAME 75Q FRAME.DO.PUSH 70Q FIND.FRAME 60Q ACQUIRE.FRAME.NAME 25Q TRILLIUM.CLEAR.ALL.PROMPTING 21Q MENU 14Q GET.MANIPULATE.FRAMES.COMMAND.MENU) (1564Q GRAPH.FRAMES 1526Q NEW.BLOCK 1523Q TRILLIUM.TRACE 1513Q FIRST.FRAME 1473Q SET.FIRST.FRAME 1455Q THAW.FRAME 1436Q FREEZE.FRAME 1410Q NEW.BLOCK 1405Q TRILLIUM.WARNINGS 1371Q TRILLIUM.SAVED.FRAME 1362Q RETRIEVE.FRAME 1311Q NEW.BLOCK 1306Q TRILLIUM.TRACE 1262Q SWAP.CURSOR.AUX 1246Q ERROR 1237Q INTERNAL 1211Q SWAP.CURSOR.AUX 1161Q SAVE.FRAME 1143Q CREATE.NEW.FRAME 1012Q SAME.LINE 1007Q TRILLIUM.WARNINGS 724Q NEW.BLOCK 721Q TRILLIUM.WARNINGS 667Q DELETE.FRAME 612Q NEW.BLOCK 607Q PROMPTWINDOW 567Q RENAME.FRAME 531Q COPY.FRAME 503Q NEW.BLOCK 500Q TRILLIUM.TRACE 464Q NAME 461Q CURRENT.FRAME 456Q TRILLIUM.STACK 453Q CURRENT.INTERFACE.WINDOW 444Q CLEAR.FRAME.STACK 402Q SAME.BLOCK 377Q TRILLIUM.TRACE 362Q TRILLIUM.STACK 357Q CURRENT.INTERFACE.WINDOW 334Q NEW.BLOCK 331Q TRILLIUM.TRACE 323Q SHOW.FRAME.STACK 232Q DEFAULTMENUHELDFN 223Q CLRPROMPT 202Q TRILLIUM.STACK 177Q CURRENT.INTERFACE.WINDOW 163Q MENUTYPE# 154Q POP.TO.FRAME 112Q MOVE.TO.FRAME 50Q PUSH.TO.FRAME 36Q QUIT 10Q CURRENT.INTERFACE) ( 1540Q "First frame is now " 1422Q "No saved frame" 1344Q "saved" 1323Q "Frame " 1234Q (MANIPULATE.FRAMESA0008) 1113Q "?" 1106Q "Delete frame named " 1057Q " used as superframe; delete anyway?" 1052Q "Frame " 1024Q " " 757Q " is used as a superframe on " 736Q "Frame " 624Q "New Frame Name: " 515Q "Frame stack is now empty" 346Q "Frame stack: " 171Q "Stack frames") MOVE.TO.FRAME D1 (I 1 FRAME I 0 DIALOG) )Aµgg oH h A Ag (46Q LISTGET 37Q START.FRAME 33Q FRAME.DO.GOTO 26Q PRIN1 13Q GET.TRILLIUM.PRINTOUT.WINDOW) (43Q NAME 10Q NEW.BLOCK 5 TRILLIUM.WARNINGS) ( 22Q "I find no frame with that name") PRINT.FRAME.CLASSES D1 (P 5 CLASS P 1 CLASSES P 0 FRAME.NAME I 0 FRAME) yP@g X@g Yd²Jgg ºoJ ¿HJ ¿oJ ¿I° dgg »lhK¿MK µá°gg ¼HL ¿oL h(165Q PRIN1 154Q PRIN1 146Q GET.TRILLIUM.PRINTOUT.WINDOW 126Q PRIN1 120Q TAB 110Q GET.TRILLIUM.PRINTOUT.WINDOW 66Q PRIN1 55Q PRIN1 47Q PRIN1 36Q GET.TRILLIUM.PRINTOUT.WINDOW 21Q LISTGET 11Q LISTGET) (143Q NEW.BLOCK 140Q TRILLIUM.DESCRIPTIONS 105Q NEW.BLOCK 102Q TRILLIUM.DESCRIPTIONS 33Q NEW.BLOCK 30Q TRILLIUM.DESCRIPTIONS 16Q CLASSES 6 NAME) ( 161Q " has no classes" 62Q ": " 43Q "Classes of frame ") PRINT.FRAMESA0001 D1 (NAME ERRORSET P 0 FRAME.NAME F 3 FLG F 4 SUPERFRAMES F 5 FRAME.LIST F 6 FRAMES F 7 INTERFACE F 10Q SELECTED.SUPERS F 11Q MACROY) GV°*d!ic¿WH g c¿WYµS•HUc ¿µ×hciºS²óJT £hc¿I°Ù(74Q MEMB 27Q LISTGET 21Q FIND.FRAME) (24Q SUPERFRAMES) () PRINT.FRAMES D1 (P 20Q FRAME P 17Q SUPER.FRAME P 16Q RESETSTATE P 15Q MACROY P 13Q OLDVALUE P 3 FRAME.LIST P 2 SUPERFRAMES P 1 FLG P 0 SELECTED.SUPERS I 1 INTERFACE I 0 FRAMES F 21Q RESETVARSLST F 22Q TRILLIUM.CURSOR) 9A¥`b¿@¥`b¿° o XhW$ 1gOhhW"c"_¿og ¥g_¿Oc"¿gO ¿O“¿K³=gg ¼oL ¿H°!dgg ½lhM¿OM µà±”gg ¾oN ¿H°%dgg _¿lhO¿OO µÜgg _¿oO ¿gg _¿oO ¿K°%dgg _¿lhO¿O O µÜh(460Q PRIN1 450Q TAB 435Q GET.TRILLIUM.PRINTOUT.WINDOW 413Q PRIN1 377Q GET.TRILLIUM.PRINTOUT.WINDOW 365Q PRIN1 351Q GET.TRILLIUM.PRINTOUT.WINDOW 333Q PRIN1 323Q TAB 310Q GET.TRILLIUM.PRINTOUT.WINDOW 266Q PRIN1 255Q GET.TRILLIUM.PRINTOUT.WINDOW 234Q PRIN1 225Q TAB 215Q GET.TRILLIUM.PRINTOUT.WINDOW 173Q PRIN1 162Q GET.TRILLIUM.PRINTOUT.WINDOW 146Q CLRPROMPT 141Q ERROR! 132Q APPLY 102Q PRINT.FRAMESA0001 43Q SWAP.CURSOR.AUX 34Q ACQUIRE.FRAME.NAMES 25Q CLRPROMPT) (432Q NEW.BLOCK 427Q TRILLIUM.DESCRIPTIONS 374Q NEW.BLOCK 371Q TRILLIUM.DESCRIPTIONS 346Q NEW.BLOCK 343Q TRILLIUM.DESCRIPTIONS 305Q NEW.BLOCK 302Q PROMPTWINDOW 252Q NEW.BLOCK 247Q TRILLIUM.DESCRIPTIONS 212Q NEW.BLOCK 207Q PROMPTWINDOW 157Q NEW.BLOCK 154Q TRILLIUM.DESCRIPTIONS 122Q SWAP.CURSOR.AUX 106Q ERROR 77Q INTERNAL 51Q SWAP.CURSOR.AUX 14Q CURRENT.FRAME.NAMES 4 CURRENT.INTERFACE) ( 406Q "Are the following:" 360Q " " 262Q "FRAMES containing the SUPERFRAME(S):" 167Q "No FRAMES have the following SUPERFRAMES:" 74Q (PRINT.FRAMESA0001) 31Q "Select SUPERFRAME names") PUSH.TO.FRAME D1 (I 1 FRAME I 0 DIALOG) A A (7 START.FRAME 3 FRAME.DO.PUSH) NIL () RENAME.FRAMEA0001 D1 (NAME ERRORSET P 2 FRAME P 1 SUPERFRAME.NAMES P 0 FRAME F 3 NEW.FRAME.NAME F 4 OLD.FRAME.NAME F 5 INTERFACE F 6 MACROY F 7 REFERENCES.TOO) N UT XgS¿h¿W²/Ug °#dJhgTS¿Jg ¹STIµÞSci(101Q DSUBST 72Q LISTGET 62Q WALK.FRAME 40Q LISTGET 17Q LISTPUT 7 FIND.FRAME) (67Q SUPERFRAMES 54Q RENAME.FRAME.IN.OBJECT 35Q FRAMES 24Q FRAME.NAME.MENU 13Q NAME) () RENAME.FRAME D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 3 REFERENCES.TOO I 2 INTERFACE I 1 NEW.FRAME.NAME I 0 OLD.FRAME.NAME F 4 RESETVARSLST F 5 TRILLIUM.CURSOR) <hU 1gHhhTcYog £g»IcgI K“J(67Q ERROR! 62Q APPLY 37Q RENAME.FRAMEA0001 4 SWAP.CURSOR.AUX) (53Q SWAP.CURSOR.AUX 43Q ERROR 34Q INTERNAL 12Q SWAP.CURSOR.AUX) ( 31Q (RENAME.FRAMEA0001)) RENAME.FRAME.IN.OBJECT D1 (P 3 ITEM P 2 PNAME P 1 NEW.NAME P 0 OLD.NAME I 4 ACTIONFNARG I 3 ACTIONFN I 2 CONTEXT I 1 PTYPE I 0 OBJECT) @DDBBAµhdgð²¿@Hð´óJlð´ìKJI¿°âgð´ÝIH@¿°Ó(73Q DSUBST 54Q LISTPUT) (62Q FORM 26Q FRAME) () RESET.FRAME D1 (P 0 ITEM I 1 RESET.ITEMS I 0 FRAME) /A²@g dH ¿H µï@ @g @ (54Q COMPRESS.PROPLIST 50Q LISTPUT 41Q RESET.6LISTS 30Q COMPRESS.PROPLIST 23Q RESET.ITEM 11Q LISTGET) (45Q ANALYZED 6 ITEMS) () RESET.FRAMES D1 (P 0 FRAME I 1 RESET.ITEMS I 0 FRAMES) @‹dHA µóh(13Q RESET.FRAME) NIL () RESET.PRIMITIVE.LISTS D1 (I 0 FRAME) 0@g @g @g @g @g @g @ (55Q COMPRESS.PROPLIST 51Q LISTPUT 42Q LISTPUT 33Q LISTPUT 24Q LISTPUT 15Q LISTPUT 6 LISTPUT) (46Q IMPLICATIONS 37Q DISPLAYERS 30Q INHIBITORS 21Q SENSORS 12Q ARTWORK 3 INITIALIZATION) () SET.CURRENT.BITMAP.FRAMES D1 (P 4 FRAME) b`g AHµIdµC`g h¼gLg gLg ™L»JµKhZ¹HX°»K&º°ød (134Q INTERSECTION 103Q MEMB 100Q LISTGET 65Q MEMB 62Q LISTGET 40Q FIND.FRAME 10Q LISTGET) (137Q CURRENT.BITMAP.FRAMES 75Q CLASSES 71Q BITMAP.FRAMES 57Q CLASSES 53Q BITMAPS 45Q CURRENT.BITMAP.FRAMES 35Q BITMAPS 32Q CURRENT.INTERFACE 24Q CURRENT.BITMAP.FRAMES 5 FRAMES 2 CURRENT.INTERFACE) () SET.CURRENT.FRAME.NAMES D1 (L (0 NAMES)) @hdNIL (13Q FRAME.NAME.MENU 7 CURRENT.BITMAP.FRAMES 3 CURRENT.FRAME.NAMES) () SORT.FRAMES D1 (I 1 B I 0 A) @g Ag (20Q ALPHORDER 15Q LISTGET 6 LISTGET) (12Q NAME 3 NAME) () THAW.FRAME D1 (P 0 ORIGITEMS I 1 INTERFACE I 0 FRAME) -@g Hd²ið³@gH¿@g ¿@i ih(47Q RESET.FRAME 41Q LISTPUT 31Q LISTPUT 6 LISTGET) (36Q FROZEN 25Q ITEMS 3 FROZEN) () TOP.ADD.SUPERFRAME D1 (I 0 FRAME) @ @ (7 DISPLAY.FRAME 3 ADD.SUPERFRAME) NIL () TOP.ANALYZE.FRAMEA0001 D1 (NAME ERRORSET F 0 FRAME F 1 MACROY) P ¿P ¿P ¿P ci(22Q DISPLAY.FRAME 15Q MARK.FRAME.CONTEXT.OBSOLETE 10Q ANALYZE.FRAME.IF.NECESSARY* 3 RESET.FRAME) NIL () TOP.ANALYZE.FRAME D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 0 FRAME F 4 RESETVARSLST F 5 TRILLIUM.CURSOR) <hU 1gHhhTcYog £g»IcgI K“J(67Q ERROR! 62Q APPLY 37Q TOP.ANALYZE.FRAMEA0001 4 SWAP.CURSOR.AUX) (53Q SWAP.CURSOR.AUX 43Q ERROR 34Q INTERNAL 12Q SWAP.CURSOR.AUX) ( 31Q (TOP.ANALYZE.FRAMEA0001)) TOP.DISPLAY.FRAMEA0001 D1 (NAME ERRORSET F 0 FRAME F 1 MACROY) P ¿P ci(10Q DISPLAY.FRAME 3 MARK.FRAME.CONTEXT.OBSOLETE) NIL () TOP.DISPLAY.FRAME D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 0 FRAME F 4 RESETVARSLST F 5 TRILLIUM.CURSOR) <hU 1gHhhTcYog £g»IcgI K“J(67Q ERROR! 62Q APPLY 37Q TOP.DISPLAY.FRAMEA0001 4 SWAP.CURSOR.AUX) (53Q SWAP.CURSOR.AUX 43Q ERROR 34Q INTERNAL 12Q SWAP.CURSOR.AUX) ( 31Q (TOP.DISPLAY.FRAMEA0001)) TOP.EDIT.ITEM D1 (I 0 FRAME) `Èl@åjð”@ @ (23Q INTERACT&EDIT.ITEM 16Q REFORM.ITEM) (2 \EM.KBDAD2) () TOP.FORGET.SUPERFRAMES D1 (I 0 FRAME) @ @ (7 DISPLAY.FRAME 3 FORGET.SUPERFRAMES) NIL () TOP.HARDCOPYA0001 D1 (NAME ERRORSET F 0 MACROY) ci(2 HARDCOPY.WINDOW) NIL () TOP.HARDCOPY D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 0 FRAME F 4 RESETVARSLST F 5 TRILLIUM.CURSOR) <hU 1gHhhTcYog £g»IcgI K“J(67Q ERROR! 62Q APPLY 37Q TOP.HARDCOPYA0001 4 SWAP.CURSOR.AUX) (53Q SWAP.CURSOR.AUX 43Q ERROR 34Q INTERNAL 12Q SWAP.CURSOR.AUX) ( 31Q (TOP.HARDCOPYA0001)) TOP.INITIALIZE.FRAMEA0001 D1 (NAME ERRORSET F 0 FRAME F 1 MACROY) Pi ci(4 DISPLAY.FRAME) NIL () TOP.INITIALIZE.FRAME D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 0 FRAME F 4 RESETVARSLST F 5 TRILLIUM.CURSOR) <hU 1gHhhTcYog £g»IcgI K“J(67Q ERROR! 62Q APPLY 37Q TOP.INITIALIZE.FRAMEA0001 4 SWAP.CURSOR.AUX) (53Q SWAP.CURSOR.AUX 43Q ERROR 34Q INTERNAL 12Q SWAP.CURSOR.AUX) ( 31Q (TOP.INITIALIZE.FRAMEA0001)) (PRETTYCOMPRINT TRI-EDITFRAMECOMS) (RPAQQ TRI-EDITFRAMECOMS ((FNS ACQUIRE.FRAME.NAMES ADD.NEW.FRAME COPY.FRAME CREATE.NEW.FRAME DELETE.FRAME EDIT.FRAME FORGET.FRAME.CLASS FRAME.GRAPH.WINDOW.MIDDLEBUTTONFN FREEZE.FRAME GET.FRAME.EDITOR.COMMAND.MENU GET.FRAME.EDITOR.COMMAND.MENU.LONG GET.FRAME.EDITOR.COMMAND.MENU.SHORT GET.GRAPH.FRAMES.MENU GET.MANIPULATE.FRAMES.COMMAND.MENU GET.RENAME.FRAME.MENU GRAPH.FRAME.SUPERFRAMES GRAPH.FRAMES GRAPH.FRAMES.MENTION.AS.SUPERFRAME GRAPH.FRAMES.MENTIONED.FRAMES INTERACT&ADD.FRAME.CLASS INTERACT©.FRAME INTERACT&FREEZE.FRAME INTERACT&RETRIEVE.FRAME INTERACT&THAW.FRAME MANIPULATE.FRAMES MOVE.TO.FRAME PRINT.FRAME.CLASSES PRINT.FRAMES PUSH.TO.FRAME RENAME.FRAME RENAME.FRAME.IN.OBJECT RESET.FRAME RESET.FRAMES RESET.PRIMITIVE.LISTS SET.CURRENT.BITMAP.FRAMES SET.CURRENT.FRAME.NAMES SORT.FRAMES THAW.FRAME TOP.ADD.SUPERFRAME TOP.ANALYZE.FRAME TOP.DISPLAY.FRAME TOP.EDIT.ITEM TOP.FORGET.SUPERFRAMES TOP.HARDCOPY TOP.INITIALIZE.FRAME) (VARS CHANGE.FRAME.STRUCTURE.GRAPH.SPEC FRAME.FRIENDS.GRAPH.SPEC ( CURRENT.FRAME.NAMES) (CURRENT.BITMAP.FRAMES) (FRAME.EDITOR.COMMAND.MENU) (FRAME.NAME.MENU) ( RENAME.FRAME.MENU) (GRAPH.FRAMES.MENU) (MANIPULATE.FRAMES.COMMAND.MENU) (TRILLIUM.SAVED.FRAME)))) (RPAQQ CHANGE.FRAME.STRUCTURE.GRAPH.SPEC (FRAME (LABEL (GET.FIELDQ DATUM NAME) SONS (( GRAPH.FRAMES.MENTIONED.FRAMES DATUM CONTEXT) (QUOTE FRAME))))) (RPAQQ FRAME.FRIENDS.GRAPH.SPEC (FRAME (LABEL (GET.FIELDQ DATUM NAME) SONS (EVAL ( GRAPH.FRAMES.FRIENDS.SONS DATUM CONTEXT))) REFERENCES (LABEL (QUOTE REFERENCES) SONS (DATUM (QUOTE FRAME))) SUPERFRAMES (LABEL (QUOTE SUPERFRAMES) SONS (DATUM (QUOTE FRAME))))) (RPAQQ CURRENT.FRAME.NAMES NIL) (RPAQQ CURRENT.BITMAP.FRAMES NIL) (RPAQQ FRAME.EDITOR.COMMAND.MENU NIL) (RPAQQ FRAME.NAME.MENU NIL) (RPAQQ RENAME.FRAME.MENU NIL) (RPAQQ GRAPH.FRAMES.MENU NIL) (RPAQQ MANIPULATE.FRAMES.COMMAND.MENU NIL) (RPAQQ TRILLIUM.SAVED.FRAME NIL) (PUTPROPS TRI-EDITFRAME COPYRIGHT ("Xerox Corporation" 1984)) NIL