(FILECREATED "23-May-85 16:39:41" ("compiled on " {PHYLUM}RELEASE1.2>NCBROWSERCARD.;49) "20-Dec-84 12:07:22" recompiled changes: NC.MakeBrowserCard NC.UpdateBrowserCard NC.ExpandBrowserNode NC.BrowserCreateCard in "INTERLISP-D 10-Jan-85 ..." dated "10-Jan-85 13:28:55") (FILECREATED "23-May-85 16:36:23" {PHYLUM}RELEASE1.2>NCBROWSERCARD.;49 123479 changes to: ( FNS NC.UpdateBrowserCard NC.ExpandBrowserNode NC.MakeBrowserCard NC.BrowserCreateCard) previous date: "22-May-85 16:23:46" {PHYLUM}RELEASE1.2>NCBROWSERCARD.;47) NC.MakeBrowserCard D1 (P 23Q NodeID P 22Q Node P 20Q RootID P 14Q DropVirtualNodesFlg P 13Q BrowserSpecs P 12Q LabelPairs P 11Q RootNodes P 10Q SpecialBrowserSpecs P 7 PropList P 6 Graph P 5 Window P 4 Lattice P 3 Depth P 2 BrowserFormat P 1 ListOfLinkLabels P 0 RootIDs I 3 ParamList I 2 NoDisplayFlg I 1 Title I 0 ID) .Cg ddhCg Cg Cg  @ B@ @ Hdd`Mhoi XdgMhKJiCg _d @ M hYO[OZ`Ji_`M dl hh_BMhl o @H-d_ LI@`K @O _O Oh_O&_O_BMg@ L!O"/LjOfLOg`J OOOO W_$M`O$@ O$_&O&g O"_"ddddddddddh^dMO _BMho @N @gI`h @gHh @gOh @gJh @gK @gOh @i B@NgNgNgNNMgghi Mgg M@g Mi M(1052Q NC.ClearMsg 1045Q NC.SetupTitleBarMenu 1035Q PUTWINDOWPROP 1022Q SHOWGRAPH 740Q NC.SetPropListDirtyFlg 733Q NC.PutProp 720Q NC.PutProp 710Q NC.PutProp 676Q NC.PutProp 663Q NC.PutProp 651Q NC.PutProp 632Q NC.SetSubstance 624Q NC.PrintMsg 607Q NC.MakeLinksLegend 541Q REMPROP 517Q NC.MakeLinkIcon 514Q NC.MakeLink 450Q LAYOUTGRAPH 422Q SUBST 363Q PUTWINDOWPROP 314Q PACK* 305Q NC.GrowLinkLattice 257Q NC.PrintMsg 250Q CHARACTER 223Q NC.AskSpecialBrowserSpecs 161Q CLOSEW 154Q NC.DeactivateCard 143Q NC.AskBrowserSpecs 124Q NC.HoldTTYProcess 111Q NC.SelectNoteCards 66Q CREATEW 63Q NC.FetchTitle 57Q NC.DetermineDisplayRegion 51Q NC.ActivateCard 42Q LISTGET 33Q LISTGET 24Q LISTGET 6 LISTGET) (1042Q Browser 1032Q NC.BrowserRightButtonFn 1027Q RIGHTBUTTONFN 1014Q NC.GraphCardMiddleButtonFn 1011Q NC.GraphCardLeftButtonFn 1001Q NC.GraphFontChangeFn 764Q NC.GraphMoveNodeFn 754Q NC.GraphAddNodeFn 724Q SpecialBrowserSpecs 714Q BrowserDepth 702Q BrowserFormat 667Q BrowserLinksLegend 655Q BrowserRoots 644Q NC.SubBoxLinkLabel 636Q BrowserLinkLabels 536Q TouchedFlg 473Q NC.BrowserContentsLinkLabel 416Q NC.*Graph*BrowserFormat 413Q LATTICE 357Q NoteCardID 300Q PSA.Database 215Q NC.SpecialBrowserSpecsFlg 203Q NC.*Graph*BrowserFormat 137Q DONTASK 116Q CANCELLED 76Q NC.SelectingBrowserSourceMenu 37Q DEPTH 30Q FORMAT 21Q LINKTYPES 3 ROOTCARDS) ( 621Q "Done!" 254Q "Computing browser graph. Please wait. ..." 104Q "Please select the Cards and/or Boxes the browser should start from.") NC.BringUpBrowserCard D1 (P 0 Window I 2 Region/Position I 1 Substance I 0 ID) .@AB Xd@g H@ g  Hgg H(52Q PUTWINDOWPROP 40Q NC.MakeLinksLegendMenu 34Q LISTGET 26Q NC.RetrievePropList 21Q NC.SetupTitleBarMenu 10Q NC.BringUpGraphCard) (47Q NC.BrowserRightButtonFn 44Q RIGHTBUTTONFN 31Q BrowserLinksLegend 16Q Browser) () NC.GrowLinkLatticeA0001 D1 (NAME ERRORSET F 0 RootID F 1 DatabaseStream F 2 RESETY F 3 ToLinks F 4 FromLinks) &Qo hi PQ P cP cci(36Q NC.FetchFromLinks 27Q NC.FetchToLinks 22Q NC.GetLinks 14Q OBTAIN.MONITORLOCK 7 NC.FetchMonitor) NIL ( 4 "NC.GrowLinkLattice") NC.GrowLinkLattice D1 (P 30Q DestinationID P 26Q OtherWayLinkFlg P 25Q ThisWayLinkFlg P 24Q DestTouchedFlg P 23Q InGraphFlg P 22Q DestID P 21Q Link P 14Q RESETZ P 13Q RESETY P 12Q LISPXHIST P 11Q NodeID P 10Q GraphNode P 6 ExpandingFlg P 5 GraphRootID P 4 DestinationIDs P 3 FromLinks P 2 ToLinks P 1 RootID P 0 StartingIDChar I 5 RemainingSearchDepth I 4 DatabaseStream I 3 GraphID I 2 ListOfLinkLabels I 1 CurrentGraph I 0 RootIDOrNode F 31Q LISPXHIST F 32Q RESETVARSLST F 33Q DEFAULT.GRAPH.NODEBORDER F 34Q DEFAULT.GRAPH.NODELABELSHADE F 35Q DEFAULT.GRAPH.NODEFONT) =C ka@ h^d/@] YAA! O!__OM O_@CI NMA I I I 'W2! W4og hg_ OMgM Mgi Ej'JO0OKOO \d N#@L:_"CO" _$A _&O$g_(O"B _*O"B _,O*O&O(O,MO$O"i O*O&O(O,O$_ OO h__O_\O &__"CO" _$A _&O$g_(O"B _*O"B _,O*O&0O(,O,(O(O&O$ O$gi O$MO"i O*O&O(O,O$_ OO h__O_O &_AMhddW8hdLhW:IW6hh bLO.A_0A O0H ABCDEk O._.(1063Q NC.GrowLinkLattice 1050Q SUBATOM 1040Q FASSOC 1013Q \NCONC2 670Q ADDPROP 651Q PUTPROP 637Q SETPROPLIST 601Q NC.LinkLabelP 570Q NC.ReverseLinkLabelP 546Q FASSOC 540Q PACK* 443Q ADDPROP 404Q NC.ReverseLinkLabelP 373Q NC.LinkLabelP 351Q FASSOC 343Q PACK* 303Q INTERSECTION 276Q \NCONC2 231Q PUTPROP 220Q SETPROPLIST 204Q ERROR! 175Q RESETRESTORE 162Q NC.GrowLinkLatticeA0001 136Q NC.FetchFromLinks 131Q NC.FetchToLinks 124Q NC.ActiveCardP 116Q FASSOC 106Q PACK* 67Q REMPROP 30Q NC.IDFromGraphNodeID 14Q NC.IDP 3 NCHARS) (645Q TouchedFlg 556Q TouchedFlg 361Q TouchedFlg 225Q TouchedFlg 212Q TouchedFlg 170Q ERROR 157Q INTERNAL) ( 154Q (NC.GrowLinkLatticeA0001)) NC.UpdateBrowserCardA0002 D1 (NAME ERRORSET F 0 Link F 1 LinkIcon F 2 RESETY) &` hi Q c` P`i ci(40Q NC.DelFromLink 27Q NC.DelToLink 17Q NC.FetchLinkFromLinkIcon 12Q OBTAIN.MONITORLOCK 5 NC.FetchMonitor) (34Q PSA.Database 24Q PSA.Database 2 PSA.Database) () NC.UpdateBrowserCard D1 (P 102Q AssocPair P 101Q Node P 73Q ToNode P 72Q ToNodeID P 65Q FromNode P 64Q FromNodeID P 57Q OldLabelNode P 56Q RESETZ P 55Q RESETY P 54Q LISPXHIST P 53Q NodeID P 52Q Node P 46Q RootID P 42Q ToNodes P 41Q Node P 34Q Win P 32Q OldRootIDs P 31Q OldLabelNodes P 30Q SavedFontChangeFn P 27Q SavedMoveNodeFn P 26Q SavedDeleteLinkFn P 25Q SavedAddLinkFn P 24Q SavedDeleteNodeFn P 23Q SavedAddNodeFn P 22Q LabelPairs P 21Q SpecialBrowserSpecs P 20Q Depth P 17Q DropVirtualNodesFlg P 16Q BrowserFormat P 15Q BrowserSpecs P 14Q PropList P 13Q Link P 12Q OldNode P 11Q NodeLabel P 10Q GraphNodes P 7 Graph P 6 OldToNodePairs P 5 LinkIcon P 4 Lattice P 3 RootNodes P 2 RootIDs P 1 LinkLabels P 0 ID I 1 OnlyLayoutFlg I 0 Window F 103Q LISPXHIST F 104Q RESETVARSLST) #CA@ O6@ Xd _dg YOg ddhZOg o_`Oi_Og o_ Og ddl hh_"@g __AJoooi@i  [@HOJ_4 hd`@hol o i @HOO4 Jg"h_8g O8 O8 O6_6@il o A*O@io n @i hQ"O:LO<O_&O_(O_*O_,O_.O_0@&J_BOB_D OB0)OD"ddg_NOP ONh_RON&_POR_@O>O@h_>_d_LAOLLIH`O HOL _FOH OFh_JOF&_HOJ[AOHi A-O!+ORL!+ORhLO2 O2 _T_VOVL COT] (W!.Wog hg_\ O\OTO2_2OR_R_T_VO _OTO&OT@`OTH OVg OR_R9d/O^O^Q5O`vObO^O^Q;OlOnL)K"LdA@OxOzK g`O O"O"O"O" _hL _j= OjO^OjOh_fOdOfh_d_bO`_`O:&_<O>O_O~Oh_~_|Oz_zpO&_~O@O _$OO&OO(OO*OO,OO.OO0O@gghi @gg H@g H A:HgIh HgJh HgOh HgO HgO$h @ g@g@gg @i h(3037Q NC.ClearMsg 3031Q PUTWINDOWPROP 3026Q PUTWINDOWPROP 3000Q \INSUREWINDOW 2773Q NC.PutProp 2757Q NC.PutProp 2745Q NC.PutProp 2731Q NC.PutProp 2716Q NC.PutProp 2701Q NC.MarkCardDirty 2675Q NC.SetSubstance 2672Q GETWINDOWUSERPROP 2662Q PUTWINDOWPROP 2650Q SHOWGRAPH 2527Q NC.MakeLinksLegend 2306Q FASSOC 2034Q NC.LinkIconImageObjP 2010Q FASSOC 1704Q NC.LinkIconImageObjP 1660Q FASSOC 1646Q LAYOUTGRAPH 1620Q SUBST 1605Q UNION 1412Q REMPROP 1400Q NC.MakeLinkIcon 1375Q NC.MakeLink 1275Q FASSOC 1240Q ERROR! 1231Q RESETRESTORE 1216Q NC.UpdateBrowserCardA0002 1173Q NC.LinkIconImageObjP 1150Q FASSOC 1123Q \NCONC2 1063Q NC.SetPropListDirtyFlg 1015Q PACK* 1006Q NC.GrowLinkLattice 630Q \APPEND2 461Q NC.ClearMsg 453Q DISMISS 444Q NC.PrintMsg 423Q NC.PrintMsg 414Q CHARACTER 374Q CLOSEW 366Q DETACHWINDOW 360Q GETWINDOWUSERPROP 335Q NC.BrowserFlipRoots 323Q NC.SelectNoteCards 316Q CONCAT 307Q CHARACTER 266Q NC.BrowserFlipRoots 252Q NC.YesP 247Q NC.AskUser 207Q GETWINDOWUSERPROP 162Q LISTGET 142Q LISTGET 106Q LISTGET 65Q LISTGET 53Q LISTGET 42Q NC.FetchPropList 35Q NC.IDFromWindow 14Q ATTACHEDWINDOWS) (3023Q NC.TitleBarButtonEventFn 3020Q BUTTONEVENTFN 3014Q OLDBUTTONEVENTFN 3005Q NC.TitleBarButtonEventFn 2764Q BrowserLinksLegend 2752Q BrowserDepth 2736Q BrowserFormat 2723Q BrowserRoots 2710Q BrowserLinkLabels 2667Q GRAPH 2657Q NC.BrowserRightButtonFn 2654Q RIGHTBUTTONFN 2642Q NC.GraphCardMiddleButtonFn 2637Q NC.GraphCardLeftButtonFn 2414Q Link% Parameters 1613Q NC.*Graph*BrowserFormat 1610Q LATTICE 1407Q TouchedFlg 1354Q NC.BrowserContentsLinkLabel 1224Q ERROR 1213Q INTERNAL 1000Q PSA.Database 660Q Link% Parameters 355Q GRAPHEDITMENU 342Q CANCELLED 274Q NC.SelectingBrowserSourceMenu 204Q GRAPH 157Q SpecialBrowserSpecs 137Q BrowserDepth 122Q NC.*Graph*BrowserFormat 103Q BrowserFormat 62Q BrowserRoots 50Q BrowserLinkLabels) ( 1210Q (NC.UpdateBrowserCardA0002) 441Q "No nodes to layout." 420Q "Computing browser graph. Please wait. ..." 313Q "(Current roots are highlighted.)" 302Q "Please select the Cards and/or Boxes the browser should start from." 240Q "No" 234Q "--" 230Q "Want to respecify roots? " 150Q 3641077Q 115Q (LATTICE)) NC.RelayoutBrowserCard D1 (I 0 Window) @i (4 NC.UpdateBrowserCard) NIL () NC.ConnectNodesInBrowser D1 (P 41Q ToNodeID P 34Q ToNodeID P 33Q SourceNodeID P 32Q Link P 30Q DestNodeID P 27Q Link P 25Q OldToNodeIDs P 24Q NodeID P 23Q Node P 21Q RealNodeID P 20Q NodeID P 16Q NodeID P 15Q Node P 10Q NodeIDs P 7 LabelPairs P 6 DropVirtualNodesFlg P 5 BrowserFormat P 4 PropList P 3 GraphNodes P 2 Graph P 1 LinkLabels P 0 ID I 0 Window) "@ Xd \dg YLg ]`Mi@g Z[dQOO_dd _d!OK1O$AK J@N _J@gghi @gg H@g H HgOh @ g@g@gg @i h_ O _ O_OOh__O_9O&__ H k _"` !O,O"` !O2:O__.I !HO. _0OO O0O.i O,_,_4I 'O4I HO4 _6dOO O4i O2_2_&_(O& 0 O&"ddg_O Oh_O&_O_*O&0 O( )dO8O* O8_O Oh_O&_OO*A!O:O< O$_$ _BHOB kH OB_@O>O@h_>_(1145Q SUBATOM 1142Q NCHARS 1135Q NC.CoerceToGraphNodeID 1111Q \NCONC2 1030Q FASSOC 1012Q GETPROPLIST 675Q NC.LinkIconImageObjP 632Q ADDPROP 606Q PACK* 574Q NC.LinkLabelP 564Q NC.ReverseLinkLabelP 545Q ADDPROP 520Q PACK* 505Q NC.LinkLabelP 455Q NC.RetrieveFromLinks 434Q NC.RetrieveToLinks 424Q SUBATOM 417Q NCHARS 345Q SETPROPLIST 340Q NC.CoerceToGraphNodeID 331Q NC.LinkIconImageObjP 306Q NC.ClearMsg 300Q PUTWINDOWPROP 275Q PUTWINDOWPROP 247Q \INSUREWINDOW 243Q NC.PutProp 230Q NC.MarkCardDirty 224Q NC.SetSubstance 221Q GETWINDOWUSERPROP 211Q PUTWINDOWPROP 177Q SHOWGRAPH 157Q NC.MakeLinksLegend 151Q NC.RebuildFromNodesInGraph 107Q INTERSECTION 55Q GETWINDOWUSERPROP 34Q LISTGET 23Q LISTGET 13Q NC.FetchPropList 6 NC.IDFromWindow) (727Q Link% Parameters 452Q PSA.Database 431Q PSA.Database 272Q NC.TitleBarButtonEventFn 267Q BUTTONEVENTFN 263Q OLDBUTTONEVENTFN 254Q NC.TitleBarButtonEventFn 234Q BrowserLinksLegend 216Q GRAPH 206Q NC.BrowserRightButtonFn 203Q RIGHTBUTTONFN 171Q NC.GraphCardMiddleButtonFn 166Q NC.GraphCardLeftButtonFn 52Q GRAPH 41Q NC.*Graph*BrowserFormat 31Q BrowserFormat 20Q BrowserLinkLabels) () NC.UnconnectNodesInBrowser D1 (P 10Q NodeID P 7 Node P 5 DropVirtualNodesFlg P 4 BrowserFormat P 3 PropList P 2 GraphNodes P 1 Graph P 0 ID I 0 Window) `@ Xd [dg \`Li@g YZd!N\I@M I@gghi @gg H@g H Hg @ g@g@gg @i h__d OhOhN^y(226Q SETPROPLIST 207Q NC.ClearMsg 201Q PUTWINDOWPROP 176Q PUTWINDOWPROP 150Q \INSUREWINDOW 144Q NC.PutProp 135Q NC.MarkCardDirty 131Q NC.SetSubstance 126Q GETWINDOWUSERPROP 116Q PUTWINDOWPROP 104Q SHOWGRAPH 66Q NC.MakeLinksLegend 44Q GETWINDOWUSERPROP 23Q LISTGET 13Q NC.FetchPropList 6 NC.IDFromWindow) (173Q NC.TitleBarButtonEventFn 170Q BUTTONEVENTFN 164Q OLDBUTTONEVENTFN 155Q NC.TitleBarButtonEventFn 141Q BrowserLinksLegend 123Q GRAPH 113Q NC.BrowserRightButtonFn 110Q RIGHTBUTTONFN 76Q NC.GraphCardMiddleButtonFn 73Q NC.GraphCardLeftButtonFn 41Q GRAPH 30Q NC.*Graph*BrowserFormat 20Q BrowserFormat) () NC.ExpandBrowserNode D1 (P 62Q ToNodeID P 61Q ToNode P 54Q Node P 47Q NodeID P 46Q Node P 44Q RootID P 40Q ToNode P 32Q SavedLabelNodes P 31Q SavedFontChangeFn P 30Q SavedMoveNodeFn P 27Q SavedDeleteLinkFn P 26Q SavedAddLinkFn P 25Q SavedDeleteNodeFn P 24Q SavedAddNodeFn P 23Q LabelPairs P 22Q SpecialBrowserSpecs P 21Q Depth P 20Q DropVirtualNodesFlg P 17Q BrowserFormat P 16Q BrowserSpecs P 15Q PropList P 14Q Link P 13Q OldNode P 12Q NodeLabel P 11Q GraphNodes P 10Q Graph P 7 OldToNodePairs P 6 LinkIcon P 5 Lattice P 4 RootNodes P 3 RootIDs P 2 LinkLabels P 1 ID P 0 NodeToExpand I 0 Window) 3@ Yd _dg ZOg ddh[Og _`Oi_ Og ddl hh_$@g __d@io n @i hO_(O_*O_,O_.O_0O_2@iol O@ Xd hio ` @i hooki@  _"dddj@io h@il o HA O8;O:_4HO JI`O" ]O4HO4H @$KT_@gO@ O@_>O<O>h_<_:O8_8O>&_O]BOVOJOA I HI O@A _KO O_OOh__O_O&_B4M ^k+AiNol ooghA  NI HI K @d O K Hg ddh\ILHgIL h OA Md O@A B&hioIo I hiol A hio0 M&d Og _O Oh_O&_O o h(770Q NC.PrintMsg 760Q CONCATLIST 721Q PACK* 667Q REDISPLAYW 662Q NC.PrintMsg 657Q CHARACTER 643Q NCP.DeleteCards 636Q NC.PrintMsg 607Q NC.GraphRemoveNode 571Q FLIPNODE 562Q NC.PutProp 555Q DREMOVE 527Q NC.GetProp 513Q REMPROP 507Q NC.CoerceToGraphNodeID 472Q SETPROPLIST 465Q NC.DelBrowserContentsLink 457Q NCP.ValidID 447Q NC.YesP 444Q NC.AskUser 422Q NC.PrintMsg 416Q CHARACTER 375Q LENGTH 322Q NC.CoerceToGraphNodeID 307Q NC.GraphRemoveNode 277Q NC.DelBrowserContentsLink 271Q NCP.ValidID 264Q FLIPNODE 202Q NC.MarkCardDirty 174Q FLIPNODE 165Q FLASHW 156Q NC.PrintMsg 145Q NC.PrintMsg 133Q FLIPNODE 123Q NC.YesP 120Q NC.AskUser 103Q CONCAT 74Q NC.FetchTitle 62Q NCP.ValidID 52Q SUBATOM 44Q NC.CoerceToGraphNodeID 34Q NCHARS 26Q NC.SelectGraphNode 3 NC.IDFromWindow) (716Q % 550Q BrowserRoots 524Q BrowserRoots 436Q Yes 162Q PROMPTWINDOW 112Q Yes) ( 764Q "removed." 675Q "Nodes: " 652Q "Done." 632Q " ... " 625Q "Deleting " 433Q "--" 427Q "Still want to remove? " 411Q " virtual companion nodes will be removed." 153Q "No card for that node." 142Q "Card & Node delete aborted." 107Q "--" 100Q " card? " 70Q "Want to delete the " 23Q "Choose node to remove." 16Q "Choose node of card to delete.") NC.DelBrowserContentsLink D1 (P 1 Link P 0 Links I 1 DestID I 0 GraphID) =@A` Hdoo@oA hY` I` Imh(65Q NC.DelToLink 56Q NC.DelFromLink 44Q NC.ReportError 41Q CONCAT 7 NCP.GetLinks) (62Q PSA.Database 53Q PSA.Database 4 NC.BrowserContentsLinkLabel) ( 35Q " and " 30Q "Multiple browser contents links between " 24Q "NC.DelBrowserContentsLink") NC.BrowserRemoveEdge D1 (P 7 LabelPairToRemove P 6 ReverseLinkParams P 5 LinkParams P 4 MenuItems P 3 LabelPairs P 2 ToNodeID P 1 FromNodeID P 0 GraphID I 3 Graph I 2 Window I 1 ToNode I 0 FromNode) B  @ A @ABC @ YA ZIJJIH 0 K'd_gOhh_O Oh_O&_O\dd:`dLdodg dgjdndh_dO  _d` hio h@A ]A@ ^@ABC IJOK IJJI@AM`@@1 O"OAIA dJ_OOh__O_O&_AA1 O!O@J@ .dI_OOh__O_O&_@ABC h(712Q NC.DisplayGraphLinksBetween 633Q DFIRSTREMOVE 475Q DFIRSTREMOVE 361Q PUTPROP 356Q DFIRSTREMOVE 346Q NC.DisplayGraphLinksBetween 336Q LINKPARAMETERS 330Q LINKPARAMETERS 321Q NC.PrintMsg 307Q FLASHW 274Q EVAL 265Q MENU 107Q NC.MarkCardDirty 67Q NC.CoerceToGraphNodeID 62Q NC.CoerceToGraphNodeID 55Q DELETE/AND/DISPLAY/LINK 45Q NC.LinkIconImageObjP 25Q NC.LinkIconImageObjP 3 NC.IDFromWindow) (304Q PROMPTWINDOW 233Q DEFAULTMENUHELDFN 224Q CLRPROMPT 202Q MENUTYPE# 125Q QUOTE) ( 316Q "No edge to delete." 215Q "Which edge to delete?") NC.GraphRemoveNode D1 (P 5 OtherNode P 4 FromNode P 2 OtherNode P 1 ToNode I 2 Window I 1 Graph I 0 Node) @ !H;@ !KU@oBA @AB hio@o @@IdgA ZBA @JAB HX\dgA ]@BA M@AB K[(210Q GRAPHDELETELINK 200Q NC.DisplayGraphLinksBetween 171Q GETNODEFROMID 143Q GRAPHDELETELINK 133Q NC.DisplayGraphLinksBetween 125Q GETNODEFROMID 101Q NC.PrintMsg 47Q GRAPHDELETENODE 41Q DISPLAYNODE 17Q FROMLINKS 3 TOLINKS) (160Q Link% Parameters 114Q Link% Parameters) ( 75Q " removed." 55Q "Node " 34Q (0 . 0)) NC.MakeLinksLegend D1 (P 40Q Pair P 37Q Label P 32Q Pair P 31Q Label P 24Q NotLabelNodeFlg P 23Q NewDestNode P 22Q DestNodeID P 21Q Labels P 20Q NewLabelPairs P 17Q DestNode P 6 NodeID P 5 Node P 4 LabelNum P 2 VirtualNodesToKeep P 1 LabelPairs P 0 MaxDashingStylesNum I 2 DropVirtualNodesFlg I 1 Win I 0 Graph) >!` !@j"K$@dQ OOI YAAI I] 4BMhMMMqO OK[_OOdg_OO_$BO$O_&O$ _(NO$O$NNO$_"NO$O"QO*)O, O$N_"O$NO"Q O6LO8 _2I _4O2HLLk\L_4IO4_0O.O0h_._,O*_*O0&_._>I _@O>HLLk\L_@IO@_ Shade" EDITTOGGLELABEL "Inverts label shade for a browser label.")))) (NC.GraphEditUnfixedMenuItems (APPEND NC.GraphEditMenuItems (QUOTE ((FIX% MENU NC.BrowserFixGraphEditMenuFn "Attach this menu to edge of browser window.")))))) (* * BROWSER mechanisms) (FNS NC.MakeBrowserCard NC.BringUpBrowserCard) (FNS NC.GrowLinkLattice NC.UpdateBrowserCard NC.RelayoutBrowserCard NC.ConnectNodesInBrowser NC.UnconnectNodesInBrowser NC.ExpandBrowserNode NC.NotBrowserHookP NC.AskBrowserSpecs NC.ChangeBrowserSpecs NC.AskSpecialBrowserSpecs NC.IDFromGraphNodeID NC.BrowserFlipRoots NC.CoerceToGraphNodeID NC.SelectGraphNode NC.GraphEdgesInconsistentP NC.DisplayGraphLinksBetween NC.RebuildFromNodesInGraph) (RECORDS SPECIALBROWSERSPECS) (* * Graph editor menu functions.) (FNS NC.GetGraphEditMenu NC.BrowserRightButtonFn NC.GraphEditMenuWhenSelectedFn NC.BrowserCreateCardFn NC.BrowserAddLabelFn NC.BrowserAddNodeFn NC.BrowserCreateLinkFn NC.BrowserAddLink NC.BrowserAddEdgeFn NC.BrowserDeleteCardFn NC.BrowserRemoveNodeFn NC.BrowserDeleteLinkFn NC.BrowserRemoveEdgeFn NC.BrowserShrinkLabelFn NC.BrowserGrowLabelFn NC.BrowserFixGraphEditMenuFn NC.BrowserCreateCard NC.BrowserCreateLink NC.BrowserDeleteCard NC.BrowserDeleteLink NC.BrowserAddNode NC.BrowserAddLabel NC.BrowserAddEdge NC.BrowserRemoveNode NC.DelBrowserContentsLink NC.BrowserRemoveEdge NC.GraphRemoveNode) (* * Grapher hacks for browser) (FNS NC.MakeLinksLegend NC.MakeLinksLegendMenu NC.LinksLegendRepaintFn NC.BrowserDrawLinkFn NC.DrawFlowerLinks NC.DrawFlowerLink NC.LinksLegendReshapeFn NC.DrawArrowHead) ( GLOBALVARS NC.ArrowHeadLength NC.ArrowHeadAngle NC.ArrowHeadXVal NC.ArrowHeadYVal) (VARS ( NC.ArrowHeadLength 7) (NC.ArrowHeadAngle 20) (NC.ArrowHeadXVal (TIMES NC.ArrowHeadLength (COS NC.ArrowHeadAngle))) (NC.ArrowHeadYVal (TIMES NC.ArrowHeadLength (SIN NC.ArrowHeadAngle)))) (FNS NC.AddBrowserCard) (P (NC.AddBrowserCard)))) (RPAQQ NC.SystemDate "23-May-85 16:36:28") (UNMARKASCHANGED (QUOTE NC.SystemDate) (QUOTE VARS)) (FILESLOAD NCGRAPHSUBSTANCE NCGRAPHCARD) (RPAQ? NC.LinkDashingInBrowser NIL) (RPAQ? NC.ArrowHeadsInBrowser (QUOTE None)) (RPAQQ NC.DashingStyles (NIL (4 4) (10 4 2 4) (1 4) (4 10) (8 4) (14 4) (10 4 2 4 2 4) (10 4 2 4 2 4 2 4))) (RPAQQ NC.GraphFlowerLinkSeparation 8) (RPAQ NC.BrowserSpecsStylesheet (CREATE.STYLE (QUOTE ITEMS) (LIST (create MENU ITEMS _ T) (create MENU ITEMS _ T) (create MENU ITEMS _ T) (create MENU ITEMS _ T) (create MENU ITEMS _ T)) (QUOTE SELECTIONS ) (QUOTE (T T T T T)) (QUOTE ITEM.TITLES) (QUOTE (Forward% Links Backward% Links Depth Format Orientation)) (QUOTE ITEM.TITLE.FONT) (FONTCOPY MENUFONT (QUOTE WEIGHT) (QUOTE BOLD)) (QUOTE NEED.NOT.FILL.IN) (QUOTE (MULTI MULTI NIL NIL NIL)) (QUOTE TITLE) "Browser Specs?")) (RPAQQ NC.BrowserFormatOptions ((*GRAPH* *GRAPH* "Build a directed graph (no virtual nodes).") ( LATTICE LATTICE "Build an acyclic directed graph (uses virtual nodes in case of cycles).") (COMPACT COMPACT "Build a forest using minimal screen space.") (FAST FAST "Build a forest, sacrificing screen space for speed."))) (RPAQQ NC.*Graph*BrowserFormat *GRAPH*) (RPAQQ NC.GraphEditMenuItems ((Create% Card% &% Node NC.BrowserCreateCardFn "Create a new card and a corresponding browser node.") (Create% Link% &% Edge NC.BrowserCreateLinkFn "Create a new link and a corresponding browser edge.") (Delete% Card% &% Node NC.BrowserDeleteCardFn "Delete an existing card and its browser node.") (Delete% Link% &% Edge NC.BrowserDeleteLinkFn "Delete an existing link and its browser edge.") (Add% Label NC.BrowserAddLabelFn "Add a string label to graph.") (Add% Node NC.BrowserAddNodeFn "Add a node to the browser corresponding to some existing card.") (Add% Edge NC.BrowserAddEdgeFn "Add an edge to the browser (no link created).") (Remove% Node NC.BrowserRemoveNodeFn "Remove a browser node (no card deleted).") (Remove% Edge NC.BrowserRemoveEdgeFn "Remove an edge from the browser (no link deleted).") (Move% Node EDITMOVENODE "Move a browser node.") (Label% Smaller NC.BrowserShrinkLabelFn "Reduce font size for a browser label.") (Label% Larger NC.BrowserGrowLabelFn "Increase font size for a browser label.") ("<-> Shade" EDITTOGGLELABEL "Inverts label shade for a browser label."))) (RPAQ NC.GraphEditUnfixedMenuItems (APPEND NC.GraphEditMenuItems (QUOTE ((FIX% MENU NC.BrowserFixGraphEditMenuFn "Attach this menu to edge of browser window."))))) (RECORD SPECIALBROWSERSPECS (Font MotherD PersonalD FamilyD) PersonalD _ 10) (RPAQQ NC.ArrowHeadLength 7) (RPAQQ NC.ArrowHeadAngle 20) (RPAQ NC.ArrowHeadXVal (TIMES NC.ArrowHeadLength (COS NC.ArrowHeadAngle))) (RPAQ NC.ArrowHeadYVal (TIMES NC.ArrowHeadLength (SIN NC.ArrowHeadAngle))) (NC.AddBrowserCard) (PUTPROPS NCBROWSERCARD COPYRIGHT ("Xerox Corporation" 1985)) NIL