(FILECREATED " 2-Dec-85 17:26:44" ("compiled on " {QV}RELEASE1.2I>NCBROWSERCARD.;40) "19-Mar-85 14:34:17" recompiled changes: NC.MakeLinksLegend in "INTERLISP-D 19-Jun-85 ..." dated "19-Jun-85 10:24:28") (FILECREATED " 2-Dec-85 17:24:14" {QV}RELEASE1.2I>NCBROWSERCARD.;40 136703 changes to: (FNS NC.MakeLinksLegend) previous date: "22-Oct-85 15:56:11" {QV}RELEASE1.2I>NCBROWSERCARD.;39) 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) 4Cg ddhCg Cg Cg  @ B!@ @ ]gg Mg@ HBhhd`Mhoi XgMhKJiCBg _d @ M hYO[OZ`Ji_`M dl hh_BMil o HhI@`K \@H"d_ @O _O Oh_O&_O_BMg@ L!O"3LO|LOg`J OOOO m_$O$M`O$@ O$_&O&g O&O&g O"_"zddddddddddh^dMO _BMho @N @gI`h @gHh @gOh @gJh @gK @gOh @i B@MgN M@g M M(1060Q NC.RelayoutBrowserCard 1054Q NC.SetupTitleBarMenu 1044Q PUTWINDOWPROP 1030Q NC.SetPropListDirtyFlg 1023Q NC.PutProp 1010Q NC.PutProp 1000Q NC.PutProp 766Q NC.PutProp 753Q NC.PutProp 741Q NC.PutProp 722Q NC.SetSubstance 714Q NC.PrintMsg 677Q NC.MakeLinksLegend 630Q REMPROP 612Q REMPROP 570Q NC.MakeLinkIcon 565Q NC.MakeLink 523Q BLOCK 512Q LAYOUTGRAPH 464Q SUBST 421Q PUTWINDOWPROP 352Q PACK* 330Q NC.GrowLinkLattice 313Q NC.PrintMsg 304Q CHARACTER 257Q NC.AskSpecialBrowserSpecs 215Q CLOSEW 210Q NC.DeactivateCard 177Q NC.AskBrowserSpecs 156Q NC.HoldTTYProcess 144Q NC.SelectNoteCards 112Q PUTWINDOWPROP 101Q WINDOWADDPROP 67Q CREATEW 64Q NC.FetchTitle 60Q NC.DetermineDisplayRegion 51Q NC.ActivateCard 42Q LISTGET 33Q LISTGET 24Q LISTGET 6 LISTGET) (1051Q Browser 1040Q GRAPH 1014Q SpecialBrowserSpecs 1004Q BrowserDepth 772Q BrowserFormat 757Q BrowserLinksLegend 745Q BrowserRoots 734Q NC.SubBoxLinkLabel 726Q BrowserLinkLabels 625Q VisitedFlg 607Q TouchedFlg 544Q NC.BrowserContentsLinkLabel 460Q NC.*Graph*BrowserFormat 455Q LATTICE 415Q NoteCardID 323Q PSA.Database 251Q NC.SpecialBrowserSpecsFlg 237Q NC.*Graph*BrowserFormat 173Q DONTASK 150Q CANCELLED 131Q NC.SelectingBrowserSourceMenu 106Q NoteCardID 76Q NC.GraphCardShrinkFn 73Q SHRINKFN 37Q DEPTH 30Q FORMAT 21Q LINKTYPES 3 ROOTCARDS) ( 711Q "Done!" 310Q "Computing browser graph. Please wait. ..." 137Q "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) V@AB H@g H@ g  Hgg Hgg Hggi Hg@ @HAi H H(122Q REDISPLAYW 115Q NC.GraphLinkIconUpdateCheck 106Q PUTWINDOWPROP 76Q WINDOWADDPROP 63Q WINDOWADDPROP 51Q PUTWINDOWPROP 37Q NC.MakeLinksLegendMenu 33Q LISTGET 25Q NC.RetrievePropList 20Q NC.SetupTitleBarMenu 5 NC.BringUpGraphCard) (102Q NoteCardID 72Q NC.BrowserRepaintFn 67Q REPAINTFN 60Q NC.GraphCardShrinkFn 55Q SHRINKFN 46Q NC.BrowserRightButtonFn 43Q RIGHTBUTTONFN 30Q BrowserLinksLegend 15Q Browser) () NC.GrowLinkLatticeA0001 D1 (NAME ERRORSET F 0 ID 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 46Q DestID P 45Q DestinationID P 43Q OtherWayLinkFlg P 42Q ThisWayLinkFlg P 41Q DestVisitedFlg P 40Q DestTouchedFlg P 37Q DestID P 36Q Link P 31Q OtherWayLinkFlg P 30Q ThisWayLinkFlg P 27Q DestTouchedFlg P 26Q DestVisitedFlg P 25Q DestID P 24Q Link P 17Q RESETZ P 16Q RESETY P 15Q LISPXHIST P 14Q GraphNode P 13Q GraphNodeID P 12Q DestinationIDs P 11Q FromLinks P 10Q ToLinks P 7 RemainingSearchDepth P 6 ID P 5 IDAndDepth P 1 IDsAndDepthsQueue P 0 StartingIDChar I 5 RemainingSearchDepth I 4 DatabaseStream I 3 GraphID I 2 ListOfLinkLabels I 1 CurrentGraph I 0 RootIDList F 47Q LISPXHIST F 50Q RESETVARSLST F 51Q DEFAULT.GRAPH.NODEBORDER F 52Q DEFAULT.GRAPH.NODELABELSHADE F 53Q DEFAULT.GRAPH.NODEFONT) 'C k0@dEKJh\J&LYdd Y I]M_IdIhNACCN _N N _N _'WN!WPog hg_ OOjKOgO Ogi OO ZO"O#O4O6 _Cd Od _Ogi OA _"OjAOO1_(CO( _*g_,O*g_.O(B _0O(B _2O0,O,O2%OO*O(i O*_&O$O&h_$_"O _ g_BO>g_@OO O> O>gi O>OO<i O>_:O8O:h_8_6O4_4O:&_8AOhddWThdOhWVNWRhh bO!&OH_JOJH _LOJgOLI IOLOk OH_H(1174Q TCONC 1160Q FASSOC 1136Q SUBATOM 1127Q BLOCK 1077Q \NCONC2 770Q ADDPROP 747Q PUTPROP 735Q SETPROPLIST 727Q REMPROP 671Q NC.LinkLabelP 660Q NC.ReverseLinkLabelP 630Q PACK* 616Q BLOCK 544Q ADDPROP 506Q NC.ReverseLinkLabelP 475Q NC.LinkLabelP 445Q PACK* 432Q BLOCK 366Q FASSOC 357Q PUTPROP 343Q DREMOVE 340Q INTERSECTION 332Q PACK* 322Q \NCONC2 260Q PUTPROP 246Q SETPROPLIST 222Q ERROR! 213Q RESETRESTORE 200Q NC.GrowLinkLatticeA0001 152Q NC.FetchFromLinks 143Q NC.FetchToLinks 136Q NC.ActiveCardP 127Q PACK* 62Q BLOCK 52Q LAST 3 NCHARS) (1146Q VisitedFlg 743Q TouchedFlg 646Q TouchedFlg 635Q VisitedFlg 463Q TouchedFlg 452Q VisitedFlg 353Q VisitedFlg 254Q TouchedFlg 237Q TouchedFlg 206Q ERROR 175Q INTERNAL) ( 172Q (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 66Q ToNode P 65Q ToNodeID P 60Q FromNode P 57Q FromNodeID P 52Q RESETZ P 51Q RESETY P 50Q LISPXHIST P 47Q NodeID P 46Q Node P 41Q OldLabelNode P 37Q OldNode P 36Q NodeID P 35Q Node P 33Q Link P 32Q NodeID P 31Q Node P 27Q RootID P 23Q Win P 21Q OldRootIDs P 20Q OldLabelNodes P 17Q LabelPairs P 16Q SpecialBrowserSpecs P 15Q Depth P 14Q DropVirtualNodesFlg P 13Q BrowserFormat P 12Q BrowserSpecs P 11Q PropList P 10Q NodeLabel P 7 GraphNodes P 6 Graph P 5 LinkIcon P 4 Lattice P 3 RootNodes P 2 RootIDs P 1 LinkLabels P 0 ID I 0 Window F 67Q LISPXHIST F 70Q RESETVARSLST) =70@ O$@ Xd _dg YOg ddhZOg o_`Oi_Og o_Og ddl hh_@g ^_Joooi@ihi  [@HOJ_" hd`@hol o i @HOO" Jg"h_&g O& O& O$_$@il o JhIH`O \@J"d_.HO. _(O* O(h_,O(&_*O,[Hi O1O0jL1O8LO \O !O@LkKdLdQ'ODOFg`O OOOO E_2O2_4O4L CO2] (Wn!*Wpog hg_T OTO2O _ O0_07_:O:_O:O>&O:@`O:H OO<O>h_<_:O8_8O>&_<_JHOJ kH OJ_HOFOHh_F_DOB_BOH&_F(1244Q SUBATOM 1241Q NCHARS 1234Q NC.CoerceToGraphNodeID 1225Q BLOCK 1152Q FASSOC 1142Q BLOCK 1121Q \NCONC2 1066Q GETPROPLIST 756Q NC.LinkIconImageObjP 725Q BLOCK 705Q ADDPROP 660Q PACK* 645Q NC.LinkLabelP 635Q NC.ReverseLinkLabelP 626Q BLOCK 607Q ADDPROP 560Q PACK* 544Q NC.LinkLabelP 535Q BLOCK 505Q NC.RetrieveFromLinks 464Q NC.RetrieveToLinks 454Q SUBATOM 447Q NCHARS 375Q SETPROPLIST 370Q NC.CoerceToGraphNodeID 361Q NC.LinkIconImageObjP 340Q BLOCK 327Q NC.ClearMsg 321Q PUTWINDOWPROP 316Q PUTWINDOWPROP 270Q \INSUREWINDOW 264Q NC.PutProp 251Q NC.MarkCardDirty 245Q NC.SetSubstance 242Q GETWINDOWUSERPROP 232Q WINDOWADDPROP 217Q PUTWINDOWPROP 205Q SHOWGRAPH 165Q NC.MakeLinksLegend 157Q NC.RebuildFromNodesInGraph 115Q INTERSECTION 66Q NC.GraphLinkIconUpdateCheck 55Q GETWINDOWUSERPROP 34Q LISTGET 23Q LISTGET 13Q NC.FetchPropList 6 NC.IDFromWindow) (1006Q Link% Parameters 502Q PSA.Database 461Q PSA.Database 313Q NC.TitleBarButtonEventFn 310Q BUTTONEVENTFN 304Q OLDBUTTONEVENTFN 275Q NC.TitleBarButtonEventFn 255Q BrowserLinksLegend 237Q GRAPH 226Q NC.BrowserRepaintFn 223Q REPAINTFN 214Q NC.BrowserRightButtonFn 211Q RIGHTBUTTONFN 177Q NC.GraphCardMiddleButtonFn 174Q 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!NgI@M I@gghi @gg @ggi H@g H Hg @ g@g@gg @i h_O_d OhOhN^g(250Q SETPROPLIST 233Q BLOCK 222Q NC.ClearMsg 214Q PUTWINDOWPROP 211Q PUTWINDOWPROP 163Q \INSUREWINDOW 157Q NC.PutProp 150Q NC.MarkCardDirty 144Q NC.SetSubstance 141Q GETWINDOWUSERPROP 131Q WINDOWADDPROP 116Q PUTWINDOWPROP 104Q SHOWGRAPH 66Q NC.MakeLinksLegend 44Q GETWINDOWUSERPROP 23Q LISTGET 13Q NC.FetchPropList 6 NC.IDFromWindow) (206Q NC.TitleBarButtonEventFn 203Q BUTTONEVENTFN 177Q OLDBUTTONEVENTFN 170Q NC.TitleBarButtonEventFn 154Q BrowserLinksLegend 136Q GRAPH 125Q NC.BrowserRepaintFn 122Q REPAINTFN 113Q NC.BrowserRightButtonFn 110Q RIGHTBUTTONFN 76Q NC.GraphCardMiddleButtonFn 73Q NC.GraphCardLeftButtonFn 41Q GRAPH 30Q NC.*Graph*BrowserFormat 20Q BrowserFormat) () NC.ExpandBrowserNode D1 (P 56Q ToNodeID P 55Q ToNode P 50Q NodeID P 47Q Node P 42Q NodeID P 41Q Node P 37Q RootID P 33Q ToNode P 24Q SavedLabelNodes 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) /@ Yd _dg ZOg ddh[Og _`Oi_ Og ddl hh_$@g __d@io n @i h@iol O@ Xd hio ` @i hooki@hdi  _"ddgho_"@il o HAO.YO0_(H hO JI`O" ]O(HO(H @KtdO"j@io h_6O6gO6 O6_4O2O4h_2_0O._.wO4&_2d_>IO> _8O: O8h_A@ @A hio ` H @ABC h(131Q ADD/AND/DISPLAY/LINK 121Q NC.MarkCardDirty 114Q FLASHW 105Q NC.PrintMsg 72Q MEMBTONODES 53Q MEMBTONODES 33Q FLASHW 24Q NC.PrintMsg 3 NC.IDFromWindow) (111Q PROMPTWINDOW 30Q PROMPTWINDOW) ( 102Q "There is already an edge between those two nodes." 21Q "Can't add edge from a node to itself.") NC.BrowserRemoveNode D1 (P 14Q Node P 7 NodeToRemove P 6 NumVirtuals P 5 NodesToRemove P 4 RootIDs P 3 NodeToRemoveID P 2 StartingIDChar P 1 ID P 0 GraphID I 2 DeleteCardFlg I 1 Window I 0 Graph)  A qA@Boo _H kZO [dJ YBUd 7oI o ogiAhdi  +OA hio io ` OA hH @A O>O]BOVOJOA I HI O@A _KO O_OOh__O_O&_B7M ^k.AiNol ooghAhdi  KI 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(776Q NC.PrintMsg 766Q CONCATLIST 727Q PACK* 675Q REDISPLAYW 670Q NC.PrintMsg 665Q CHARACTER 651Q NCP.DeleteCards 644Q NC.PrintMsg 615Q NC.GraphRemoveNode 577Q FLIPNODE 570Q NC.PutProp 563Q DREMOVE 535Q NC.GetProp 521Q REMPROP 515Q NC.CoerceToGraphNodeID 500Q SETPROPLIST 473Q NC.DelBrowserContentsLink 465Q NCP.ValidID 455Q NC.YesP 452Q NC.AskUser 425Q NC.PrintMsg 421Q CHARACTER 400Q LENGTH 325Q NC.CoerceToGraphNodeIDOrLabel 312Q NC.GraphRemoveNode 302Q NC.DelBrowserContentsLink 274Q NCP.ValidID 267Q FLIPNODE 205Q NC.MarkCardDirty 177Q FLIPNODE 170Q FLASHW 161Q NC.PrintMsg 150Q NC.PrintMsg 136Q FLIPNODE 126Q NC.YesP 123Q NC.AskUser 103Q CONCAT 74Q NC.FetchTitle 62Q NCP.ValidID 52Q SUBATOM 44Q NC.CoerceToGraphNodeIDOrLabel 34Q NCHARS 26Q NC.SelectGraphNode 3 NC.IDFromWindow) (724Q % 556Q BrowserRoots 532Q BrowserRoots 441Q Yes 165Q PROMPTWINDOW 112Q Yes) ( 772Q "removed." 703Q "Nodes: " 660Q "Done." 640Q " ... " 633Q "Deleting " 436Q "--" 432Q "Still want to remove? " 414Q " virtual companion nodes will be removed." 156Q "No card for that node." 145Q "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 44Q NumAppearances P 43Q UnderlyingNodeID P 42Q Pair P 41Q Label P 34Q Pair P 33Q Label P 26Q NotLabelNodeFlg P 25Q NewDestNode P 24Q DestNodeID P 23Q Labels P 22Q NewLabelPairs P 21Q DestNode P 16Q Node P 11Q NodeID P 10Q Node P 7 LabelNum P 5 UnderlyingNodeID P 4 OldNumAppearances P 3 NumAppearances P 2 ReferencedNodes P 1 LabelPairs P 0 MaxDashingStylesNum I 2 DropVirtualNodesFlg I 1 Win I 0 Graph) %` Q@j" N@dAO0O@_BOhO_O O]gMg\?k O "OOqOO N^ukذ_"O O"dg_"O"O"_(BO(O"_*O( _,OO(O(OOO(_&OO(O&QO.+O0 O(O_&O(OO&Q"O:PO< _6I _8O6HOOk_O_8IO8_4O2O4h_2_0O._.O4&_2_BI _DOBHOOk_O_DIOD_@O>O@h_>_h_$vO*JO*JO$gO*gggOgO(COO(gO*ggg`O$ h#gO*ggg`O$ gihhO(JO(JO,O(hh _ O_C_O O#OFg$OOJOHkOFgOHk hO_OOh__O_lO&_dO O#OFdgkOhOFg I YAAI I(1402Q NC.MakeLinksLegendMenu 1372Q DREVERSE 1360Q REMPROP 1304Q NC.CoerceToGraphNodeID 1222Q PUTPROP 1134Q NC.CoerceToGraphNodeID 1126Q BLOCK 1104Q \NCONC2 1034Q FNTH 777Q FNTH 571Q FASSOC 467Q FASSOC 455Q \APPEND2 452Q PUTPROP 415Q PUTPROP 322Q NC.IDFromGraphNodeID 250Q BLOCK 165Q NC.LinkIconImageObjP 144Q PUTPROP 120Q NC.CoerceToGraphNodeID 62Q BLOCK 5 LENGTH) (1355Q NumAppearances 1322Q NumAppearances 1213Q NumAppearances 1151Q NumAppearances 1040Q BACKWARDFLG 1025Q NC.DashingStyles 1022Q DASHING 1017Q NC.BrowserDrawLinkFn 1014Q DRAWLINKFN 1007Q Link% Parameters 770Q NC.DashingStyles 765Q DASHING 762Q NC.BrowserDrawLinkFn 757Q DRAWLINKFN 752Q Link% Parameters 734Q DESTNODEID 727Q NODEID 724Q NC.BrowserDrawLinkFn 721Q DRAWLINKFN 714Q Link% Parameters 262Q Link% Parameters 134Q NumAppearances 130Q NumAppearances 2 NC.DashingStyles) () NC.MakeLinksLegendMenu D1 (P 11Q AttachedWin P 3 MainWinPromptInfo P 2 PromptWin P 1 MenuWin P 0 Menu I 1 LabelPairs I 0 Win)  @  O``0 A5_g O O_dohh_OAO__OdLdgdldg dgjdndhdMe _O`0 Ad_O Oh_O&_OdNdgdkdg dgjdndh_dO @hdi Z@g J Hh` Y@ggg Igg Igg Igi @gA J&@d ` J J `I h@ggg @gK (605Q PUTWINDOWPROP 574Q ATTACHWINDOW 554Q NC.LinksLegendRepaintFn 542Q CLOSEW 535Q OPENWP 530Q MOVEW 525Q MAKEWITHINREGION 517Q WINDOWREGION 506Q PUTWINDOWPROP 475Q WINDOWADDPROP 464Q WINDOWADDPROP 451Q WINDOWADDPROP 436Q ATTACHWINDOW 417Q ADDMENU 406Q DETACHWINDOW 401Q GETWINDOWUSERPROP 370Q GETPROMPTWINDOW 215Q LAST 57Q CLOSEW 51Q GETWINDOWUSERPROP 6 ATTACHEDWINDOWS) (601Q PROMPTWINDOW 570Q HERE 565Q LEFT 562Q TOP 546Q NC.LinkDashingInBrowser 522Q WHOLESCREEN 502Q NCLABELPAIRS 471Q LINKSLEGENDWINP 461Q NC.LinksLegendReshapeFn 456Q RESHAPEFN 446Q NC.LinksLegendRepaintFn 443Q REPAINTFN 432Q LOCALCLOSE 427Q TOP 424Q RIGHT 414Q NC.OffScreenPosition 376Q PROMPTWINDOW 331Q DEFAULTMENUHELDFN 322Q CLRPROMPT 306Q Links 227Q MENUTYPE# 167Q DEFAULTMENUHELDFN 160Q CLRPROMPT 143Q Links 46Q LINKSLEGENDWINP 31Q MENUTYPE# 22Q NC.LinkDashingInBrowser) ( 76Q " ") NC.LinksLegendRepaintFn D1 (P 7 ItemRegion P 6 LabelPair P 5 Item P 2 Items P 1 LabelPairs P 0 Menu I 1 Region I 0 Win) @g @ g HZdIJ2LKhMH _lOlOOOlOlOkh@h`N  LK(170Q DRAWLINE 163Q FNTH 71Q MENUITEMREGION 21Q GETWINDOWUSERPROP 13Q MAINWINDOW 6 GETWINDOWUSERPROP) (156Q NC.DashingStyles 30Q MENU 16Q NCLABELPAIRS 3 MENU) () NC.BrowserDrawLinkFn D1 (P 3 ClippingRegion P 2 MidpointFlg P 1 DestNodeID P 0 NodeID I 11Q ParamList I 10Q Dashing I 7 Color I 6 Win I 5 Operation I 4 Width I 3 Y2 I 2 X2 I 1 Y1 I 0 X1)  @`%Gg XHGg Y@ABCDEFG b@B AC @B AC hF [`K`K`dK`d h@ABCDEFGG `g&`gGg BC@A@ABCDEFGJ h(265Q NC.DrawArrowHead 241Q LISTGET 210Q DRAWLINE 166Q REGIONSINTERSECTP 163Q CREATEREGION 116Q DSPCLIPPINGREGION 111Q CREATEREGION 106Q ABS 100Q ABS 72Q MIN 65Q MIN 54Q NC.DrawFlowerLinks 36Q LISTGET 22Q LISTGET 2 BLOCK) (236Q BACKWARDFLG 227Q AtMidpoint 224Q NC.ArrowHeadsInBrowser 216Q None 213Q NC.ArrowHeadsInBrowser 155Q NC.ArrowHeadLength 142Q NC.ArrowHeadLength 132Q NC.ArrowHeadLength 123Q NC.ArrowHeadLength 33Q DESTNODEID 17Q NODEID 10Q NC.LinkDashingInBrowser) () NC.DrawFlowerLinks D1 (P 1 Pair P 0 Count I 11Q Color I 10Q Stream I 7 Operation I 6 Width I 5 Y2 I 4 X2 I 3 Y1 I 2 X1 I 1 NodeID2 I 0 NodeID1) r m@A/dBCDEgFGh`I HkXGFGG A@/dDEBCgFGh`I HkXGFGG h(151Q NC.DrawFlowerLink 131Q FNTH 64Q NC.DrawFlowerLink 44Q FNTH) (124Q NC.DashingStyles 112Q ROUND 37Q NC.DashingStyles 25Q ROUND) () NC.DrawFlowerLink D1 (P 4 Scale P 3 YOffset P 2 XOffset P 1 MidpointY P 0 MidpointX I 12Q Color I 11Q Operation I 10Q Width I 7 Win I 6 Num I 5 Dashing I 4 Brush I 3 Y2 I 2 X2 I 1 Y1 I 0 X1)  @BlACl2Fj.F$B@ CA ]FkjD`FklְE @ABCGGGGE `g@ABCGGGGi `Fkl j#Fkj`Fkl֌`Fkl jhG JL KL @AHJIKGGGhE HJIKBCGGGhE `g@AHJIKGGGG h(377Q NC.DrawArrowHead 341Q DRAWLINE 314Q DRAWLINE 267Q FIXR 260Q FIXR 251Q DSPSCALE 240Q MINUS 175Q MINUS 155Q NC.DrawArrowHead 120Q DRAWLINE 75Q \FZEROP 44Q ABS 36Q ABS) (350Q None 345Q NC.ArrowHeadsInBrowser 226Q NC.GraphFlowerLinkSeparation 213Q NC.GraphFlowerLinkSeparation 163Q NC.GraphFlowerLinkSeparation 127Q None 124Q NC.ArrowHeadsInBrowser 61Q NC.GraphFlowerLinkSeparation) () NC.LinksLegendReshapeFn D1 (I 2 OldRegion I 1 OldImage I 0 Window) @ (3 REDISPLAYW) NIL () NC.DrawArrowHead D1 (P 16Q ArrowHeadLength P 15Q ArrowHeadYVal P 14Q ArrowHeadXVal P 13Q ClippingRegion P 12Q Tmp2 P 11Q Tmp1 P 10Q A22 P 7 A21 P 6 A12 P 5 A11 P 4 LineLength P 3 Scale P 2 WindowFlg P 1 YDiff P 0 XDiff I 12Q YOffset I 11Q XOffset I 10Q MidpointFlg I 7 Color I 6 Stream I 5 Operation I 4 Width I 3 Y2 I 2 X2 I 1 Y1 I 0 X1) # @BACF hF GjbGjb`K _`K _`K _GG@BlBbGAClCbhF _d7dOOOOOdOOd BGCG HdId \HL]IL_d ^M_dO_OO_BGbCGbBCBONOCOOODEFG BCBONO COOO DEFG h(437Q DRAWLINE 423Q MINUS 406Q MINUS 373Q DRAWLINE 300Q MINUS 254Q SQRT 234Q INSIDEP 221Q CREATEREGION 150Q DSPCLIPPINGREGION 101Q FIXR 67Q FIXR 55Q FIXR 24Q DSPSCALE 17Q WINDOWP) (270Q FLOATP 261Q FLOATP 74Q NC.ArrowHeadLength 62Q NC.ArrowHeadYVal 50Q NC.ArrowHeadXVal 13Q FLOATP 5 FLOATP) () NC.GraphLinkIconUpdateCheck D1 (P 3 Node P 2 DidWorkFlg P 1 CurGlobalParams P 0 OldGlobalParams I 3 UpdateIfNullCacheFlg I 2 Graph I 1 Window I 0 GraphID) @@g ```hHI#HCBdAK i@gI J(74Q NC.PutProp 55Q NC.GraphNodeLinkIconUpdate 6 NC.GetProp) (70Q CachedGlobalParams 17Q NC.LinkIconAttachBitmapFlg 14Q NC.LinkIconShowLinkTypeFlg 11Q NC.LinkIconShowTitleFlg 3 CachedGlobalParams) () NC.BrowserRepaintFn D1 (I 1 Region I 0 Window) @ @dg (16Q NC.GraphLinkIconUpdateCheck 13Q GETWINDOWUSERPROP 3 NC.IDFromWindow) (10Q GRAPH) () NC.CoerceToGraphNodeID D1 (I 0 NodeOrNodeID) @dgb@@bd @(32Q NC.IDFromGraphNodeID) (5 Link% Parameters) () NC.CoerceToGraphNodeIDOrLabel D1 (I 0 GraphNode) @ @d(3 NC.CoerceToGraphNodeID) NIL () NC.AddBrowserCard D1 NIL <ggggghgghhooogihh (71Q NC.AddCardType) (54Q CardDisplayedInMenuFlg 27Q NC.BringUpBrowserCard 24Q EditCardFn 16Q NC.MakeBrowserCard 13Q MakeCardFn 10Q GRAPH 5 Graph 2 Browser) ( 51Q (DefaultWidth 764Q) 45Q (DefaultHeight 536Q) 41Q (LinkDisplayMode Title)) (PRETTYCOMPRINT NCBROWSERCARDCOMS) (RPAQQ NCBROWSERCARDCOMS ((E (SETQ NC.SystemDate (DATE)) (PUTPROP (QUOTE NC.SystemDate) (QUOTE NewestFile) (ROOTFILENAME (FULLNAME (OUTPUT))))) (* * Stuff for the Notecards browser.) (FILES NCGRAPHSUBSTANCE NCGRAPHCARD) (GLOBALVARS NC.SelectingBrowserSourceMenu NC.SpecialBrowserSpecsFlg NC.BrowserContentsLinkLabel NC.SubBoxLinkLabel NC.FiledCardLinkLabel PSA.Database NC.SelectingCardMenu NC.BrowserTitleBarMenu NC.DashingStyles NC.GraphFlowerLinkSeparation NC.LinkDashingInBrowser NC.ArrowHeadsInBrowser NC.BrowserSpecsStylesheet NC.BrowserFormatOptions NC.*Graph*BrowserFormat NC.GraphEditMenuItems NC.GraphEditUnfixedMenuItems NC.LinkIconShowTitleFlg NC.LinkIconShowLinkTypeFlg NC.LinkIconAttachBitmapFlg) (INITVARS (NC.LinkDashingInBrowser NIL) (NC.ArrowHeadsInBrowser (QUOTE None))) (VARS (NC.DashingStyles (QUOTE (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)))) (NC.GraphFlowerLinkSeparation 8) (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?")) (NC.BrowserFormatOptions (QUOTE ((*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.")))) (NC.*Graph*BrowserFormat (QUOTE *GRAPH*)) ( NC.GraphEditMenuItems (QUOTE ((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." (SUBITEMS (Create% Global% Link% &% Edge NC.BrowserCreateGlobalLinkFn "Create a new global 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 NC.BrowserMoveNodeFn "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.")))) (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.ReorderVirtualGraphNodes NC.RelayoutBrowserCard NC.ConnectNodesInBrowser NC.UnconnectNodesInBrowser NC.ExpandBrowserNode NC.NotBrowserHookP NC.AskBrowserSpecs NC.ChangeBrowserSpecs NC.AskSpecialBrowserSpecs NC.IDFromGraphNodeID NC.BrowserFlipRoots NC.SelectGraphNode NC.GraphEdgesInconsistentP NC.DisplayGraphLinksBetween NC.RebuildFromNodesInGraph NC.RemoveDuplicateNodesFromGraph) (RECORDS SPECIALBROWSERSPECS) (* * Graph editor menu functions.) (FNS NC.GetGraphEditMenu NC.BrowserRightButtonFn NC.GraphEditMenuWhenSelectedFn NC.BrowserCreateCardFn NC.BrowserAddLabelFn NC.BrowserAddNodeFn NC.BrowserCreateLinkFn NC.BrowserCreateGlobalLinkFn NC.BrowserAddLink NC.BrowserAddGlobalLink NC.BrowserAddEdgeFn NC.BrowserDeleteCardFn NC.BrowserRemoveNodeFn NC.BrowserDeleteLinkFn NC.BrowserRemoveEdgeFn NC.BrowserShrinkLabelFn NC.BrowserGrowLabelFn NC.BrowserMoveNodeFn 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) (* * Miscellaneous) (FNS NC.GraphLinkIconUpdateCheck NC.BrowserRepaintFn NC.CoerceToGraphNodeID NC.CoerceToGraphNodeIDOrLabel) (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)))) (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." (SUBITEMS (Create% Global% Link% &% Edge NC.BrowserCreateGlobalLinkFn "Create a new global 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 NC.BrowserMoveNodeFn "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