(FILECREATED "21-Aug-86 12:12:40" ("compiled on " {QV}1.3K>LIBRARY>NOTEFILESTATS.;26) "12-Nov-85 14:59:23" recompiled changes: NFSTAT.SummarizeDataFiles in "INTERLISP-D 11-May-86 ..." dated "11-May-86 15:19:08") (FILECREATED "21-Aug-86 12:10:58" {QV}1.3K>LIBRARY>NOTEFILESTATS.;26 68595 changes to: (FNS NFSTAT.SummarizeDataFiles) previous date: "19-Aug-86 18:39:39" {QV}1.3K>LIBRARY>NOTEFILESTATS.;24) NFSTAT.AnalyzeRemoteNoteFileA0012 D1 (NAME ERRORSET F 0 FullFileName F 1 LocalFileName) PQ i(4 COPYFILE) NIL () NFSTAT.AnalyzeRemoteNoteFileA0013 D1 (NAME ERRORSET F 0 LocalFileName F 1 QuietFlg F 2 NoteFile) PidQhid ch(12Q NCP.OpenNoteFile) NIL () NFSTAT.AnalyzeRemoteNoteFileA0014 D1 (NAME ERRORSET F 0 NoteFile F 1 QuietFlg F 2 NoteFileData) PQ ci(4 NFSTAT.GatherNoteFileData) NIL () NFSTAT.AnalyzeRemoteNoteFileA0015 D1 (NAME ERRORSET F 0 NoteFile F 1 QuietFlg) PQ i(4 NCP.CloseNoteFiles) NIL () NFSTAT.AnalyzeRemoteNoteFileA0016 D1 (NAME ERRORSET F 0 OutputFile) Pg i(6 OPENFILE) (3 OUTPUT) () NFSTAT.AnalyzeRemoteNoteFile D1 (P 5 NoteFile P 4 ResultOfOper P 3 NoteFileData P 2 NoteFileAttributes P 1 LocalFileName P 0 FullFileName I 4 QuietFlg I 3 Don'tDeleteLocalCopyFlg I 2 OutputFile I 1 LocalHostAndDirectory I 0 NoteFileName) A @ ²hio@ ` @ ¡ `dH¿Hg ¾dN¿Hg _¿dO¿Hg _¿dO¿Hg _¿dO¿Hg _¿dOÌ ¿ZgHg gggA YD³hioHoIo ¿oi ³oHoI ¿oi \d’d¨oI ¿oi ¨oI ¿oi ¨oI ¿oi ¨oB ¿D¯hioBo ¿JKBi B C¤I ¿D¨hio B(475Q NCP.PrintMsg 461Q DELFILE 453Q CLOSEF 447Q HPRINT 436Q NCP.PrintMsg 414Q ERROR 403Q NFSTAT.AnalyzeRemoteNoteFileA0016 372Q ERROR 361Q NFSTAT.AnalyzeRemoteNoteFileA0015 350Q ERROR 337Q NFSTAT.AnalyzeRemoteNoteFileA0014 326Q ERROR 310Q NFSTAT.AnalyzeRemoteNoteFileA0013 277Q ERROR 274Q CONCAT 255Q NFSTAT.AnalyzeRemoteNoteFileA0012 244Q NCP.PrintMsg 214Q PACKFILENAME 176Q FILENAMEFIELD 152Q GETFILEINFO 132Q GETFILEINFO 112Q GETFILEINFO 72Q GETFILEINFO 55Q GETFILEINFO 32Q FULLNAME 25Q FLASHW 17Q NCP.PrintMsg 3 OPENP) (207Q BODY 204Q NOTEFILE 201Q EXTENSION 173Q NAME 167Q NAME 147Q SIZE 127Q READDATE 107Q WRITEDATE 67Q CREATIONDATE 52Q AUTHOR 40Q NOTEFILEATTRIBUTESTYPE# 22Q PROMPTWINDOW) ( 472Q "Done." 432Q " ..." 425Q "Writing out results to " 410Q "Trouble opening " 377Q (NFSTAT.AnalyzeRemoteNoteFileA0016) 366Q "Trouble closing " 355Q (NFSTAT.AnalyzeRemoteNoteFileA0015) 344Q "Trouble gathering data for " 333Q (NFSTAT.AnalyzeRemoteNoteFileA0014) 322Q "Trouble opening " 304Q (NFSTAT.AnalyzeRemoteNoteFileA0013) 270Q " to " 263Q "Trouble copying from " 251Q (NFSTAT.AnalyzeRemoteNoteFileA0012) 240Q " ..." 233Q " to " 226Q "Copying " 13Q "Must close notefile before analyzing: ") NFSTAT.GatherNoteFileData D1 (P 2 ExtraFileBoxData P 1 NoteFileDataRecord P 0 FileName I 1 QuietFlg I 0 NoteFile) 4@ÉIJ@A IÉ@A A©hio ¿IJh(53Q NCP.PrintMsg 40Q NFSTAT.ProcessFileBoxHierarchies 25Q NFSTAT.ProcessCards 13Q NFSTAT.MakeFreshExtraFileBoxDataRecord 10Q NFSTAT.MakeFreshNoteFileDataRecord) (31Q NOTEFILEDATA 3 NoteFile) ( 50Q "Done.") NFSTAT.MakeFreshNoteFileDataRecord D1 NIL é```gjd HdI¿`gjd HdI¿`hdj HdI¿`djÌ¿HdI¿HdI¿` HdI¿` HdI¿``hdj HdI¿`gjd HdI¿`gjd HdI ¿`gjd HdI¿HdI¿djÌ¿(315Q ARRAY 270Q ARRAY 243Q ARRAY 216Q ARRAY 167Q HASHARRAY 147Q HASHARRAY 72Q ARRAY 47Q ARRAY 22Q ARRAY) (310Q FIXP 305Q NFSTAT.HistSize 263Q FIXP 260Q NFSTAT.HistSize 236Q FIXP 233Q NFSTAT.HistSize 210Q NFSTAT.HistSize 204Q FILEBOXDATATYPE# 164Q NFSTAT.HashArraySize 144Q NFSTAT.HashArraySize 107Q CARDSTATSTYPE# 64Q NFSTAT.HistSize 42Q FIXP 37Q NFSTAT.HistSize 15Q FIXP 12Q NFSTAT.HistSize 6 ALLCARDSDATATYPE# 2 NOTEFILEDATATYPE#) () NFSTAT.ProcessCardsA0001 D1 (P 32Q Link P 31Q NumSubBoxLinks P 30Q NumFiledCardLinks P 27Q Link P 24Q Link P 21Q Link P 16Q NumGlobalLinks P 15Q NumFromLinks P 14Q NumToLinks P 13Q NumParents P 12Q SubstanceSize P 11Q FromLinks P 10Q ToLinks P 7 CardType P 6 Card P 0 Card I 1 Key I 0 Value F 33Q NoteFileDataRecord F 34Q CardNum F 35Q $$1 F 36Q RealCardTotal F 37Q QuietFlg F 40Q CardTotal F 41Q ExtraFileBoxData F 42Q $$2) ï@QH ´‚±ßHW8kØc8W>³*dld YjðªI²I ²hioW8oW@ ¿N N hN SOW6É ZÉ»W_oë_¿`kÙj"¿O2O0ó’±OO2(µj»OOÔ_6¿OOÔ_4¿Kjó²;O4JdÈýÈÑíýóšJO4íοO4JdÈýÈÑíóšJO4íοJJdÈýÈÑKíO4íììοKOóžK_¿JO4íÎ ¿oJdÈýÈ Ñíó²WKjó²RONô²JOíOíìn@jÑìΰ2NOKÔ_ýó²#JOíOíNíìOíìKíìì΃O6_¿OOÔ_¿O2kÔ_2¿±þóM½L¼±þ,_*¿Oµ‚±›JJdÈýÈÑJËíìοJ @`@ÉËHdIÌ¿dnGÃnO€Ñοdhοdhοdn¿€jÑοdhÎ ¿!kh@Éd£d‘hJËoëjooj7Oµ‚±J±P_,oë_.¿`kÙj"¿O:O8ó’±O*O:(\`ð—L˵j»O&O,Ô_>¿O&O.Ô_<¿Kjó²;O_$¿O&O,Ô_&¿O:kÔ_:¿±þãO_¿O_¿±üà_*¿Oµ*JJdÈýÈÑJËíìοJHI I_,oë_.¿`kÙj"¿O2O0ó’±O*O2(\`ð—L˵j»O&O,Ô_6¿O&O.Ô_4¿Kjó²;O4JdÈýÈÑíýóšJO4íοO4JdÈýÈÑíóšJO4íοJJdÈýÈÑKíO4íììοKO(óžK_(¿JO4íÎ ¿oJdÈýÈ Ñíó²ZKjó²UO"O ô²JO$íO&íìn@jÑìΰ4O O"KÔ_"ýó²$JO&íO"íO íìO,íìKíìì΃O6_$¿O&O,Ô_&¿O2kÔ_2¿±þãO_¿O_¿±ý>(2234Q BLOCK 1447Q BLOCK 524Q BLOCK 32Q NFSTAT.FillInCardStats 12Q NCP.PrintMsg) (2604Q STATSFROMHIST 2537Q STATSFROMHIST 2503Q STATSFROMHIST 2464Q STATSFROMHIST 2422Q STATSFROMHIST 2416Q STATSFROMHIST 2403Q STATSFROMHIST 2364Q STATSFROMHIST 2347Q STATSFROMHIST 2327Q STATSFROMHIST 2266Q FILEBOXHISTENTRY 2260Q FILEBOXHISTENTRYTYPE# 2223Q NFSTAT.HistSize 2161Q STATSFROMHIST 2146Q STATSFROMHIST 2142Q STATSFROMHIST 2017Q STATSFROMHIST 1752Q STATSFROMHIST 1716Q STATSFROMHIST 1677Q STATSFROMHIST 1635Q STATSFROMHIST 1631Q STATSFROMHIST 1616Q STATSFROMHIST 1577Q STATSFROMHIST 1562Q STATSFROMHIST 1542Q STATSFROMHIST 1501Q FILEBOXHISTENTRY 1473Q FILEBOXHISTENTRYTYPE# 1436Q NFSTAT.HistSize 1360Q STATSFROMHIST 1343Q SPECIALFBDATA 1252Q CARDSTATS 1245Q SPECIALFBDATA 1240Q STATSFROMHISTTYPE# 1235Q SPECIALFBDATA 1214Q STATSFROMHIST 1201Q STATSFROMHIST 1175Q STATSFROMHIST 1055Q STATSFROMHIST 1011Q STATSFROMHIST 756Q STATSFROMHIST 737Q STATSFROMHIST 675Q STATSFROMHIST 671Q STATSFROMHIST 656Q STATSFROMHIST 637Q STATSFROMHIST 622Q STATSFROMHIST 602Q STATSFROMHIST 513Q NFSTAT.HistSize 435Q STATSFROMHIST 420Q SPECIALFBDATA 327Q CARDSTATS 322Q SPECIALFBDATA 315Q STATSFROMHISTTYPE# 312Q SPECIALFBDATA 271Q STATSFROMHIST 256Q STATSFROMHIST 252Q STATSFROMHIST 200Q STATSFROMHIST 160Q SPECIALFBDATA 152Q SPECIALFBDATA 60Q CARDSTATS 53Q SPECIALFBDATA 46Q STATSFROMHISTTYPE# 43Q CARDSTATS 36Q SPECIALFBDATA 25Q SPECIALFBDATA 17Q SPECIALFBDATA) ( 2477Q -.5 2214Q 2.0 1712Q -.5 1427Q 2.0 1400Q -.5 1374Q -.5 1366Q 2.0 752Q -.5 504Q 2.0 455Q -.5 451Q -.5 443Q 2.0 220Q -.5 214Q -.5 206Q 2.0 146Q (144Q 1750Q) 7 "Computing statistics from special filebox data ... ") NFSTAT.CombineExtraFileBoxData D1 (I 1 NoteFileExtraFileBoxData I 0 SummaryExtraFileBoxData) >@ÉAÉ @ÉAÉ @ÉAÉ @ÉAÉ (73Q NFSTAT.CombineSpecialFBData 54Q NFSTAT.CombineSpecialFBData 35Q NFSTAT.CombineSpecialFBData 16Q NFSTAT.CombineSpecialFBData) (66Q EXTRAFILEBOXDATA 60Q EXTRAFILEBOXDATA 47Q EXTRAFILEBOXDATA 41Q EXTRAFILEBOXDATA 30Q EXTRAFILEBOXDATA 22Q EXTRAFILEBOXDATA 11Q EXTRAFILEBOXDATA 3 EXTRAFILEBOXDATA) () NFSTAT.CombineSpecialFBData D1 (I 1 NoteFileSpecialFBData I 0 SummarySpecialFBData) @@ÉAÉ @@ÉAÉ @@ÉAÉg @@ÉAÉg @ÉHHËAÉËÔYÌI(127Q NFSTAT.CombineHists 77Q NFSTAT.CombineHists 47Q NFSTAT.CombineHists 22Q NFSTAT.CombineHists) (165Q CARDSTATS 160Q SPECIALFBDATA 152Q CARDSTATS 146Q CARDSTATS 135Q SPECIALFBDATA 124Q FILEBOXHISTENTRY 117Q SPECIALFBDATA 111Q SPECIALFBDATA 105Q SPECIALFBDATA 74Q CARDHISTENTRY 67Q SPECIALFBDATA 61Q SPECIALFBDATA 55Q SPECIALFBDATA 42Q SPECIALFBDATA 34Q SPECIALFBDATA 30Q SPECIALFBDATA 15Q SPECIALFBDATA 7 SPECIALFBDATA 3 SPECIALFBDATA) () NFSTAT.AnalyzeSetsOfNoteFiles D1 (P 4 Prefix P 3 FileNames P 2 ArgNum P 0 NumArgs) $eHk"JdIó‘haJkØa¼[L ¿JlÔZ°é(32Q NFSTAT.AnalyzeListOfNoteFiles) NIL () NFSTAT.AnalyzeListOfNoteFiles D1 (P 0 NoteFile I 1 OutputNamePrefix I 0 NoteFiles) @°dHgHA µìh(23Q NFSTAT.AnalyzeRemoteNoteFile 20Q NFSTAT.MakeOutputFileName) (13Q {dsk1}) () NFSTAT.MakeOutputFileName D1 (I 1 Owner I 0 NoteFileName) ,ggghggghgAo@g (51Q PACKFILENAME 45Q CONCAT 42Q FILENAMEFIELD) (37Q NAME 26Q NAME 22Q VERSION 17Q data 14Q EXTENSION 10Q DIRECTORY 5 {dsk2} 2 HOST) ( 33Q "-") NFSTAT.InspectDataFile D1 (P 4 ThingRead P 0 File I 0 FileName) =@g 1Hd²/ `L¹dI¿LºdJ¿L»dK¿H ¿ (72Q INSPECT 66Q CLOSEF 20Q HREAD 6 OPENFILE) (26Q NOTEFILEINFOTYPE# 3 INPUT) () NFSTAT.NoteFileInfoHistPlot D1 (P 3 FileNamePrefix P 1 FullName I 0 NoteFileInfo) ¨@É!@ÉÉYd”¿g…g o `do¿dg ¿dg¿jdnÿdhºdJ ¿ dgð›¿HÉK dgð²¿HÉHÉK gð´@ÉgHÉHÉK (245Q NFSTAT.ExtraFileBoxDataHistPlot 204Q NFSTAT.CardDataHistPlot 153Q NFSTAT.FileBoxDataHistPlot 132Q MENU 51Q CONCAT 42Q FILENAMEFIELD) (237Q NOTEFILEDATA 230Q NOTEFILEDATA 224Q FileBox 217Q NOTEFILEINFO 210Q ExtraFileBoxData 176Q NOTEFILEDATA 170Q NOTEFILEDATA 160Q CardData 145Q NOTEFILEDATA 136Q FileBoxData 103Q DEFAULTMENUHELDFN 74Q CLRPROMPT 57Q MENUTYPE# 37Q NAME 33Q SUMMARY 21Q NOTEFILEATTRIBUTES 14Q NOTEFILEINFO 3 NOTEFILEINFO) ( 65Q ((FileBoxData (QUOTE FileBoxData) "Plot link or depth data for fileboxes") (CardData (QUOTE CardData) "Plot size, linking, or filing data for cards.") (ExtraFileBoxData (QUOTE ExtraFileBoxData) "Plot filing data for special kinds of fileboxes.")) 46Q ": ") NFSTAT.FileBoxDataHistPlot D1 (I 1 FileNamePrefix I 0 FileBoxData) ý`do¿dg ¿dg¿jdnÿdhHdI ¿ dgð²f¿`kÙjBIHó³1@ÉI(½IM`ð—M˵j¼Kµ Lh[ºIkÔY°ÔL&»°÷JAo µgog @É dgð²f¿`kÙjBIHó³1@ÉI(½IM`ð—M˵j¼Kµ Lh[ºIkÔY°ÔL&»°÷JAo µgog @É dgð²M¿`kÙjBIHó³'@ÉI(½IM3µj¼Kµ Lh[ºIkÔY°ÞL&»°÷JAo @É dgð²M¿`kÙjBIHó³'@É I(½IM3µj¼Kµ Lh[ºIkÔY°ÞL&»°÷JAo @É gð´K`kÙjBIHó³'@ÉI(½IM3µj¼Kµ Lh[ºIkÔY°ÞL&»°÷JAo @É (772Q NFSTAT.AttachStatsWindow 761Q HISTPLOT 756Q CONCAT 652Q NFSTAT.AttachStatsWindow 641Q HISTPLOT 636Q CONCAT 530Q NFSTAT.AttachStatsWindow 517Q HISTPLOT 514Q CONCAT 406Q NFSTAT.AttachStatsWindow 375Q HISTPLOT 372Q CONCAT 353Q CONCAT 233Q NFSTAT.AttachStatsWindow 222Q HISTPLOT 217Q CONCAT 200Q CONCAT 61Q MENU) (765Q FILEBOXDATA 703Q FILEBOXDATA 664Q NFSTAT.HistSize 656Q OrphansDepthData 645Q FILEBOXDATA 563Q FILEBOXDATA 544Q NFSTAT.HistSize 535Q ToBeFiledDepthData 523Q FILEBOXDATA 441Q FILEBOXDATA 422Q NFSTAT.HistSize 413Q TableOfContentsDepthData 401Q FILEBOXDATA 367Q FILEBOXHISTENTRY 360Q HISTENTRYSUBBOXLINKS 307Q FILEBOXHISTENTRY 301Q FILEBOXHISTENTRYTYPE# 266Q FILEBOXDATA 247Q NFSTAT.HistSize 240Q SubBoxLinksData 226Q FILEBOXDATA 214Q FILEBOXHISTENTRY 205Q HISTENTRYFILEDCARDLINKS 134Q FILEBOXHISTENTRY 126Q FILEBOXHISTENTRYTYPE# 113Q FILEBOXDATA 74Q NFSTAT.HistSize 65Q FiledCardLinksData 26Q DEFAULTMENUHELDFN 17Q CLRPROMPT 2 MENUTYPE#) ( 753Q "depths of cards under Orphans box" 633Q "depths of cards under ToBeFiled box" 511Q "depths of cards under TableOfContents box" 364Q " of " 350Q "SubBox links per filebox" 211Q " of " 175Q "FiledCard links per filebox" 10Q ((FiledCardLinksData (QUOTE FiledCardLinksData) "Plot data on number of FiledCard links per filebox.") (SubBoxLinksData (QUOTE SubBoxLinksData) "Plot data on number of SubBox links per filebox.") (TableOfContentsDepthData (QUOTE TableOfContentsDepthData) "Plot data on depths of cards under TableOfContents box.") (ToBeFiledDepthData (QUOTE ToBeFiledDepthData) "Plot data on depths of cards under ToBeFiled box.") (OrphansDepthData (QUOTE OrphansDepthData) "Plot data on depths of cards under Orphans box."))) NFSTAT.CardDataHistPlotA0001 D1 (L (1 Key 0 Value) F 0 CardTypes) APcNIL NIL () NFSTAT.CardDataHistPlot D1 (P 21Q MessagePrefix P 20Q Stats P 17Q Hist P 16Q CardTypeData P 5 DataType P 4 CardType P 3 ChoiceStyle P 0 CardTypes I 2 FileNamePrefix I 1 CardTypesHashArray I 0 AllCardsData) d:gogog`gAg ¿HIdJ¿dg ¿dg¿jdnÿdhIdJ ¿`do¿dg ¿dg¿jdnÿdhIdJ ¿hgo  ¡ K\K]Lgðhð´LA1OµM@É_¿@É_ ¿Bo _"¿Mdgð¢±Ø¿Lgð²n`kÙj2O&O$ó²+O(O"o±£É_¿OÉ_ ¿BLo °´@ÉO&(¾O&N3µj_,¿O*µO,h_*_(¿O&kÔ_&°©O,&_*¿°ò`kÙj2O0O.ó³9OÉO0(_¿O0O3µj_6¿O4µO6h_4_2¿O0kÔ_0°ÎO6&_4¿°òO2O"o O É g𢱼Lgð²S`kÙj2 O:O8ó³8@ÉO:(_¿O:O3µj_@¿O>µO@h_>_<¿O:kÔ_:°ÏO@&_>¿°òO<O"o°R`kÙj2%ODOBó³9OÉOD(_¿ODO3µj_J¿OHµOJh_H_F¿ODkÔ_D°ÎOJ&_H¿°òOFO"o O É Mdgð²y¿`kÙj2*ONOLó³?OON(_¿ONO`ð˜O˵j_T¿ORµOTh_R_P¿ONkÔ_N°ÈOT&_R¿°òOPO"o µgog O É gð²x`kÙj2/OXOVó³?OOX(_¿OXO`ð˜O˵j_^¿O\µO^h_\_Z¿OXkÔ_X°ÈO^&_\¿°òOZO"o µgog O É Mdgð²y¿`kÙj24ObO`ó³?OOb(_¿ObO`ð˜O˵j_h¿OfµOhh_f_d¿ObkÔ_b°ÈOh&_f¿°òOdO"o µgog O É gð´w`kÙj29OlOjó³?OOl(_¿OlO`ð˜O˵j_r¿OpµOrh_p_n¿OlkÔ_l°ÈOr&_p¿°òOnO"o µgog O É (2141Q NFSTAT.AttachStatsWindow 2127Q HISTPLOT 2124Q CONCAT 2105Q CONCAT 1745Q NFSTAT.AttachStatsWindow 1733Q HISTPLOT 1730Q CONCAT 1711Q CONCAT 1546Q NFSTAT.AttachStatsWindow 1534Q HISTPLOT 1531Q CONCAT 1512Q CONCAT 1352Q NFSTAT.AttachStatsWindow 1340Q HISTPLOT 1335Q CONCAT 1316Q CONCAT 1153Q NFSTAT.AttachStatsWindow 1141Q HISTPLOT 1136Q CONCAT 652Q NFSTAT.AttachStatsWindow 640Q HISTPLOT 635Q CONCAT 425Q CONCAT 311Q CONCAT 222Q STYLESHEET 217Q CREATE.STYLE 41Q MAPHASH) (2134Q CARDSTATS 2121Q CARDHISTENTRY 2112Q HISTENTRYGLOBALLINKS 2023Q CARDHISTENTRY 2014Q CARDHISTENTRYTYPE# 1757Q NFSTAT.HistSize 1751Q GlobalLinks 1740Q CARDSTATS 1725Q CARDHISTENTRY 1716Q HISTENTRYFROMLINKS 1627Q CARDHISTENTRY 1620Q CARDHISTENTRYTYPE# 1563Q NFSTAT.HistSize 1554Q FromLinks 1541Q CARDSTATS 1526Q CARDHISTENTRY 1517Q HISTENTRYTOLINKS 1430Q CARDHISTENTRY 1421Q CARDHISTENTRYTYPE# 1364Q NFSTAT.HistSize 1356Q ToLinks 1345Q CARDSTATS 1332Q CARDHISTENTRY 1323Q HISTENTRYPARENTS 1234Q CARDHISTENTRY 1225Q CARDHISTENTRYTYPE# 1170Q NFSTAT.HistSize 1161Q Parents 1146Q CARDSTATS 1040Q CARDTYPEDATA 1016Q NFSTAT.HistSize 716Q ALLCARDSDATA 675Q NFSTAT.HistSize 667Q ALL% CARDS 656Q LargeSizes 645Q CARDSTATS 537Q CARDTYPEDATA 515Q NFSTAT.HistSize 433Q ALLCARDSDATA 407Q CARDTYPEDATA 375Q CARDTYPEDATA 341Q NFSTAT.HistSize 333Q ALL% CARDS 321Q SmallSizes 274Q ALLCARDSDATA 263Q ALLCARDSDATA 240Q ALL% CARDS 207Q SELECTIONS 151Q DEFAULTMENUHELDFN 142Q CLRPROMPT 125Q MENUTYPE# 72Q DEFAULTMENUHELDFN 63Q CLRPROMPT 36Q NFSTAT.CardDataHistPlotA0001 27Q ALL% CARDS 23Q MENUTYPE# 20Q ITEMS 11Q ITEM.TITLES 2 TITLE) ( 2116Q " of " 2102Q "number of Global Links per card" 1722Q " of " 1706Q "number of From Links per card" 1523Q " of " 1507Q "number of To Links per card" 1327Q " of " 1313Q "number of parents per card" 1133Q "sizes over 10K in 1000 byte steps" 1011Q "sizes over 10K in 1000 byte steps" 632Q "sizes under 10K in 100 byte steps" 422Q "s: " 367Q "sizes under 10K in 100 byte steps" 306Q "All cards: " 213Q (ALL% CARDS NIL) 133Q (SmallSizes LargeSizes Parents ToLinks FromLinks GlobalLinks) 15Q ("Card Type" "Data type") 6 "Type of info to plot?") NFSTAT.ExtraFileBoxDataHistPlot D1 (P 21Q MessagePrefix P 20Q LinksHist P 17Q Hist P 16Q Stats P 15Q SpecialFBData P 4 DataType P 3 FileBoxType P 2 ChoiceStyle I 3 FileNamePrefix I 2 FileBoxLinksData I 1 FileBoxData I 0 ExtraFileBoxData) û:gogog`do¿dg ¿dg¿jdnÿdhHdI ¿`do¿dg ¿dg¿jdnÿdhHdI ¿hgo  ¡ J[J\Kdgð˜¿@É°*gð—@É°Kdgð—¿@É‹gð´@ÉAOµ]AÉ_¿AÉ_¿BÉ_ ¿Co _"¿Ldg𢱑¿`kÙj2O&O$ó²CO(O"o OÉ É_¿OÉ_¿OÉ_ ¿CKo °£Oµ5AÉO&(½O&M3µj_,¿O*µO,h_*_(¿O&kÔ_&°O,&_*¿°ò°Îgð²h`kÙj2O0O.ó³>Oµ5AÉO0(¾O0N3µj_6¿O4µO6h_4_2¿O0kÔ_0°ÎO6&_4¿°ò°ÎO2O"o OÉ Ldgð²y¿`kÙj2 O:O8ó³?OO:(_¿O:O`ð˜O˵j_@¿O>µO@h_>_<¿O:kÔ_:°ÈO@&_>¿°òO<O"o µgog OÉ gð²x`kÙj2%ODOBó³?OOD(_¿ODO`ð˜O˵j_J¿OHµOJh_H_F¿ODkÔ_D°ÈOJ&_H¿°òOFO"o µgog OÉ Ldgð²y¿`kÙj2*ONOLó³?OON(_¿ONO`ð˜O˵j_T¿ORµOTh_R_P¿ONkÔ_N°ÈOT&_R¿°òOPO"o µgog OÉ gð²x`kÙj2/OXOVó³?OOX(_¿OXO`ð˜O˵j_^¿O\µO^h_\_Z¿OXkÔ_X°ÈO^&_\¿°òOZO"o µgog OÉ Ldg𢱄¿`kÙj24ObO`ó³?O Ob(_¿ObO`ð˜O˵j_h¿OfµOhh_f_d¿ObkÔ_b°ÈOh&_f¿°òOdO"o µgog Oµ BÉ É °÷gð´z`kÙj29OlOjó³?O Ol(_¿OlO`ð˜O˵j_r¿OpµOrh_p_n¿OlkÔ_l°ÈOr&_p¿°òOnO"o µgog Oµ BÉ É °÷(2361Q NFSTAT.AttachStatsWindow 2344Q HISTPLOT 2341Q CONCAT 2322Q CONCAT 2153Q NFSTAT.AttachStatsWindow 2136Q HISTPLOT 2133Q CONCAT 2114Q CONCAT 1747Q NFSTAT.AttachStatsWindow 1735Q HISTPLOT 1732Q CONCAT 1713Q CONCAT 1553Q NFSTAT.AttachStatsWindow 1541Q HISTPLOT 1536Q CONCAT 1517Q CONCAT 1354Q NFSTAT.AttachStatsWindow 1342Q HISTPLOT 1337Q CONCAT 1320Q CONCAT 1160Q NFSTAT.AttachStatsWindow 1146Q HISTPLOT 1143Q CONCAT 1124Q CONCAT 761Q NFSTAT.AttachStatsWindow 747Q HISTPLOT 744Q CONCAT 510Q CONCAT 442Q NFSTAT.AttachStatsWindow 430Q HISTPLOT 425Q CONCAT 353Q CONCAT 177Q STYLESHEET 174Q CREATE.STYLE) (2365Q SPECIALFBDATA 2354Q FILEBOXDATA 2336Q FILEBOXHISTENTRY 2327Q HISTENTRYSUBBOXLINKS 2240Q FILEBOXHISTENTRY 2231Q FILEBOXHISTENTRYTYPE# 2174Q NFSTAT.HistSize 2166Q SubBoxLinks 2157Q SPECIALFBDATA 2146Q FILEBOXDATA 2130Q FILEBOXHISTENTRY 2121Q HISTENTRYFILEDCARDLINKS 2032Q FILEBOXHISTENTRY 2023Q FILEBOXHISTENTRYTYPE# 1766Q NFSTAT.HistSize 1755Q FiledCardLinks 1742Q CARDSTATS 1727Q CARDHISTENTRY 1720Q HISTENTRYGLOBALLINKS 1631Q CARDHISTENTRY 1622Q CARDHISTENTRYTYPE# 1565Q NFSTAT.HistSize 1557Q GlobalLinks 1546Q CARDSTATS 1533Q CARDHISTENTRY 1524Q HISTENTRYFROMLINKS 1435Q CARDHISTENTRY 1426Q CARDHISTENTRYTYPE# 1371Q NFSTAT.HistSize 1362Q FromLinks 1347Q CARDSTATS 1334Q CARDHISTENTRY 1325Q HISTENTRYTOLINKS 1236Q CARDHISTENTRY 1227Q CARDHISTENTRYTYPE# 1172Q NFSTAT.HistSize 1164Q ToLinks 1153Q CARDSTATS 1140Q CARDHISTENTRY 1131Q HISTENTRYPARENTS 1042Q CARDHISTENTRY 1033Q CARDHISTENTRYTYPE# 776Q NFSTAT.HistSize 767Q Parents 754Q CARDSTATS 726Q SPECIALFBDATA 644Q CARDTYPEDATA 617Q NFSTAT.HistSize 611Q LargeSizes 604Q SPECIALFBDATA 522Q CARDTYPEDATA 472Q SPECIALFBDATA 460Q SPECIALFBDATA 446Q SPECIALFBDATA 435Q CARDSTATS 374Q NFSTAT.HistSize 363Q SmallSizes 336Q FILEBOXDATA 325Q CARDTYPEDATA 314Q CARDTYPEDATA 277Q EXTRAFILEBOXDATA 270Q Other% FileBoxes 262Q EXTRAFILEBOXDATA 253Q FileBoxes% w/o% Children 242Q EXTRAFILEBOXDATA 234Q FileBoxes% w/o% FiledCards 225Q EXTRAFILEBOXDATA 216Q FileBoxes% w/o% SubBoxes 164Q SELECTIONS 126Q DEFAULTMENUHELDFN 117Q CLRPROMPT 102Q MENUTYPE# 47Q DEFAULTMENUHELDFN 40Q CLRPROMPT 23Q MENUTYPE# 20Q ITEMS 11Q ITEM.TITLES 2 TITLE) ( 2333Q " of " 2317Q "SubBox links per filebox" 2125Q " of " 2111Q "FiledCard links per filebox" 1724Q " of " 1710Q "number of Global Links per card" 1530Q " of " 1514Q "number of From Links per card" 1331Q " of " 1315Q "number of To Links per card" 1135Q " of " 1121Q "number of parents per card" 741Q "sizes over 10K in 1000 byte steps" 505Q ": " 422Q "sizes under 10K in 100 byte steps" 350Q "All fileboxes: " 170Q (ALL% FILEBOXES NIL) 110Q (SmallSizes LargeSizes Parents ToLinks FromLinks GlobalLinks FiledCardLinks SubBoxLinks) 31Q (ALL% FILEBOXES FileBoxes% w/o% SubBoxes FileBoxes% w/o% FiledCards FileBoxes% w/o% Children Other% FileBoxes) 15Q ("FileBox Type" "Data type") 6 "Type of info to plot?") NFSTAT.AttachStatsWindow D1 (I 1 Stats I 0 HistPlot) Aho @ ggg (31Q ATTACHWINDOW 14Q GETPLOTWINDOW 10Q INSPECT) (25Q LOCALCLOSE 22Q TOP 17Q RIGHT) ( 5 (2734Q . 2734Q)) NFSTAT.SummarizeDataFilesA0014 D1 (NAME ERRORSET F 0 OutputFile) Pg i(6 OPENFILE) (3 OUTPUT) () NFSTAT.SummarizeDataFiles D1 (P 17Q NoteFileExtraFileBoxData P 16Q NoteFileInfo P 15Q ThingRead P 14Q File P 13Q FileName P 5 ExtraFileBoxData P 4 Result P 3 SummaryDataFileData P 2 SummaryDataFileAttributes P 1 SummaryDataFileInfo P 0 SummaryFile I 3 QuietFlg I 2 SummaryFileName I 1 OutputFile I 0 Files) À@¦@ b¿Bd•g ‘ H”H ¹Iµ‚±Á`d@¿dh¿dh¿dh¿dh¿@ _¿dOÌ ¿ZI²(dJÉ@ ¿JJË @ ÔÌ ¿Iµe[Iµ‚±ž]@ Oµ‚±•KC MC oi ¢±C¯hioAo ¿JKMh\Ai A C¨hio LÉ°›d`ð³)¿`I¾dN¿I_¿dO¿I_¿dO¿Y¢±ÿIɱÿ3ɱÿc_¿¿Og  O²rC³hiol Oo ¿O !Od`ð²É_¿OÉ_¿°ŸO_¿O_¿…O_¿KO ¿O–MO ¿O ¿O_±þÚoA (675Q ERROR 653Q CLOSEF 644Q NFSTAT.CombineExtraFileBoxData 632Q NFSTAT.CombineNoteFileData 532Q HREAD 524Q NCP.PrintMsg 512Q CHARACTER 465Q OPENFILE 454Q BLOCK 330Q NCP.PrintMsg 315Q CLOSEF 311Q HPRINT 273Q NCP.PrintMsg 246Q NFSTAT.SummarizeDataFilesA0014 236Q NFSTAT.ComputeExtraFileBoxStats 231Q NFSTAT.ComputeNoteFileStats 205Q NFSTAT.MakeFreshExtraFileBoxDataRecord 172Q NFSTAT.MakeFreshNoteFileDataRecord 160Q LENGTH 137Q \APPEND2 104Q LENGTH 33Q HREAD 22Q OPENFILE 6 DIRECTORY) (564Q NOTEFILEINFO 552Q NOTEFILEINFO 544Q NOTEFILEINFOTYPE# 462Q INPUT 440Q NOTEFILEINFO 430Q NOTEFILEINFO 355Q NOTEFILEINFOTYPE# 346Q NOTEFILEINFOTYPE# 335Q NOTEFILEINFO 152Q NOTEFILEATTRIBUTES 146Q NOTEFILEATTRIBUTES 131Q NOTEFILEATTRIBUTES 125Q NOTEFILEATTRIBUTES 46Q NOTEFILEATTRIBUTESTYPE# 17Q INPUT) ( 671Q "Trouble opening " 520Q " ..." 505Q "Combining data from file ..." 325Q "Done." 267Q " ..." 262Q "Writing out results to " 242Q (NFSTAT.SummarizeDataFilesA0014)) NFSTAT.CombineNoteFileData D1 (P 3 NoteFileFileBoxData P 2 SummaryFileBoxData P 1 NoteFileAllCardsData P 0 SummaryAllCardsData I 1 NoteFileData I 0 SummaryData) @ÉAÉ@ÉAÉ$HHÉIÉ HHÉIÉ HHÉIÉg @ÉAÉ JJÉKÉg JJÉKÉ JJÉ KÉ  JJÉKÉ @ÉAÉ @@ËAËÔÌHÉ\LËIÉËÔ]ÌM(321Q NFSTAT.CombineHashArrays 300Q NFSTAT.CombineHists 253Q NFSTAT.CombineHists 226Q NFSTAT.CombineHists 201Q NFSTAT.CombineHists 153Q NFSTAT.CombineCardTypesData 132Q NFSTAT.CombineHists 102Q NFSTAT.CombineHists 55Q NFSTAT.CombineHists) (375Q CARDSTATS 370Q ALLCARDSDATA 362Q CARDSTATS 356Q CARDSTATS 350Q ALLCARDSDATA 337Q NOTEFILEDATA 331Q NOTEFILEDATA 325Q NOTEFILEDATA 314Q NOTEFILEDATA 306Q NOTEFILEDATA 273Q FILEBOXDATA 265Q FILEBOXDATA 261Q FILEBOXDATA 246Q FILEBOXDATA 240Q FILEBOXDATA 234Q FILEBOXDATA 221Q FILEBOXDATA 213Q FILEBOXDATA 207Q FILEBOXDATA 176Q FILEBOXHISTENTRY 171Q FILEBOXDATA 163Q FILEBOXDATA 157Q FILEBOXDATA 146Q NOTEFILEDATA 140Q NOTEFILEDATA 127Q CARDHISTENTRY 122Q ALLCARDSDATA 114Q ALLCARDSDATA 110Q ALLCARDSDATA 75Q ALLCARDSDATA 67Q ALLCARDSDATA 63Q ALLCARDSDATA 50Q ALLCARDSDATA 42Q ALLCARDSDATA 36Q ALLCARDSDATA 25Q NOTEFILEDATA 17Q NOTEFILEDATA 11Q NOTEFILEDATA 3 NOTEFILEDATA) () NFSTAT.CombineCardTypesDataA0001 D1 (P 0 CurVal I 1 CardType I 0 CardTypeData F 3 SummaryCardTypesHashArray) vAS!Hµ A@S HÉ@É HHÉ@É HHÉ@Ég HÉYIË@ÉËÔZÌJ(121Q NFSTAT.CombineHists 71Q NFSTAT.CombineHists 44Q NFSTAT.CombineHists 21Q PUTHASH 10Q BLOCK) (154Q CARDSTATS 147Q CARDTYPEDATA 141Q CARDSTATS 135Q CARDSTATS 127Q CARDTYPEDATA 116Q CARDHISTENTRY 111Q CARDTYPEDATA 103Q CARDTYPEDATA 77Q CARDTYPEDATA 64Q CARDTYPEDATA 56Q CARDTYPEDATA 52Q CARDTYPEDATA 37Q CARDTYPEDATA 31Q CARDTYPEDATA 25Q CARDTYPEDATA) () NFSTAT.CombineCardTypesData D1 (I 1 NoteFileCardTypesHashArray I 0 SummaryCardTypesHashArray) Ago (15Q MAPHASH 12Q FUNCTION) (3 NFSTAT.CombineCardTypesDataA0001) ( 7 (SummaryCardTypesHashArray)) NFSTAT.CombineHashArraysA0001 D1 (P 0 CurVal I 1 Key I 0 Value F 1 SummaryHashArray) AQAHµ@Q @Ô°ù(21Q PUTHASH 10Q BLOCK) NIL () NFSTAT.CombineHashArrays D1 (I 1 NoteFileHashArray I 0 SummaryHashArray) Ago (15Q MAPHASH 12Q FUNCTION) (3 NFSTAT.CombineHashArraysA0001) ( 7 (SummaryHashArray)) NFSTAT.CombineHists D1 (P 4 FieldName P 3 HistEntry P 2 SummaryHistEntry P 1 i I 2 RecordName I 1 Hist I 0 SummaryHist) †B²a`kÙj¿IHó³M@I(AI(K²:J¨@IB Z*¿B °&dLJhgLJhg LKhg Ô µÛIkÔ¹°®@`kÙj¿IHó³î@I@I(AI(Ô*¿IkÔ¹°è(155Q BLOCK 123Q RECORDACCESS 116Q RECORDACCESS 105Q RECORDACCESS 57Q RECORDFIELDNAMES 50Q NFSTAT.MakeFreshHistRecord 16Q BLOCK) (144Q NFSTAT.HistSize 113Q FETCH 102Q FETCH 74Q REPLACE 5 NFSTAT.HistSize) () NFSTAT.ComputeStatsFromDepthHist D1 (P 22Q EndBox P 21Q MidBox P 20Q i P 16Q HalfBox P 15Q BoxWidth P 14Q Hist P 13Q ModeVal P 12Q StartBox P 11Q LastNonEmptyEndBox P 10Q NumSeen P 7 TotalDivBy2 P 3 StatsFromHist I 0 DepthHist) Ð``kÙjdIHó«J@I(ÔºIkÔY°óJHdIÌ¿dnGÃnO€Ñοdhοdhοdn¿€jÑοdhÎ ¿kh@d£d‘hKËoëjooj7Nµ‡_¿Mµ KKdÈýÈÑKËíìÎK_oë_¿`kÙj"¿O Oó’± OO (µj¼OOÔ_$¿OOÔ_"¿Ljó²;O"KdÈýÈÑíýóšKO"íοO"KdÈýÈÑíóšKO"íοKKdÈýÈÑLíO"íììοLOóžL_¿KO"íÎ ¿oKdÈýÈ Ñíó²ZLjó²UOOô²KOíOíìn@jÑìΰ4OOLÔ_ýó²$KOíOíOíìOíìLíìì΃O$_¿OOÔ_¿O kÔ_ ¿±þðN¾M½±þ§(264Q BLOCK) (617Q STATSFROMHIST 552Q STATSFROMHIST 516Q STATSFROMHIST 477Q STATSFROMHIST 435Q STATSFROMHIST 431Q STATSFROMHIST 416Q STATSFROMHIST 377Q STATSFROMHIST 362Q STATSFROMHIST 342Q STATSFROMHIST 253Q NFSTAT.HistSize 223Q STATSFROMHIST 210Q STATSFROMHIST 204Q STATSFROMHIST 136Q STATSFROMHIST 6 NFSTAT.HistSize 2 STATSFROMHISTTYPE#) ( 512Q -.5 244Q 2.0 156Q -.5 152Q -.5 144Q 2.0) (PRETTYCOMPRINT NOTEFILESTATSCOMS) (RPAQQ NOTEFILESTATSCOMS ((* * This code computes statistics for a notefile.) (GLOBALVARS NFSTAT.HistSize NFSTAT.HashArraySize) (VARS (NFSTAT.HistSize 100) (NFSTAT.HashArraySize 100)) (RECORDS NOTEFILEINFO NOTEFILEATTRIBUTES NOTEFILEDATA ALLCARDSDATA CARDTYPEDATA FILEBOXDATA CARDHISTENTRY FILEBOXHISTENTRY CARDSTATS STATSFROMHIST EXTRAFILEBOXDATA SPECIALFBDATA) (* * Top level functions.) ( FNS NFSTAT.AnalyzeRemoteNoteFile NFSTAT.GatherNoteFileData) (* * Helper functions.) (FNS NFSTAT.MakeFreshNoteFileDataRecord NFSTAT.ProcessCards NFSTAT.ProcessFileBoxHierarchies NFSTAT.ComputeNoteFileStats) (FNS NFSTAT.AddCardDataToHist NFSTAT.AddFileBoxDataToHist NFSTAT.AddCardSizeDataToHist NFSTAT.MakeFreshHistRecord NFSTAT.TraverseFileBoxHierarchy NFSTAT.ComputeSubstanceSize NFSTAT.IncrementHashItem NFSTAT.FetchCardTypeData NFSTAT.FillInCardStats) (MACROS NFSTAT.AddFieldEntryToHist NFSTAT.AnalyzeHist) (* * Stuff for dealing with extra file box data.) (FNS NFSTAT.MakeFreshExtraFileBoxDataRecord NFSTAT.MakeFreshSpecialFBDataRecord NFSTAT.InstallExtraFileBoxData NFSTAT.InstallSpecialFBData NFSTAT.ComputeExtraFileBoxStats NFSTAT.ComputeSpecialFBStats NFSTAT.CombineExtraFileBoxData NFSTAT.CombineSpecialFBData) (* * Miscellaneous accelerators.) (FNS NFSTAT.AnalyzeSetsOfNoteFiles NFSTAT.AnalyzeListOfNoteFiles NFSTAT.MakeOutputFileName NFSTAT.InspectDataFile) (* * Functions for plotting.) (FILES PLOTEXAMPLES) ( FNS NFSTAT.NoteFileInfoHistPlot NFSTAT.FileBoxDataHistPlot NFSTAT.CardDataHistPlot NFSTAT.ExtraFileBoxDataHistPlot NFSTAT.AttachStatsWindow) (MACROS NFSTAT.HistPlot) (* * Functions for combining stats from multiple notefiles.) (FNS NFSTAT.SummarizeDataFiles NFSTAT.CombineNoteFileData NFSTAT.CombineCardTypesData NFSTAT.CombineHashArrays NFSTAT.CombineHists NFSTAT.ComputeStatsFromDepthHist) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS ( ADDVARS (NLAMA) (NLAML) (LAMA NFSTAT.AnalyzeSetsOfNoteFiles))))) (RPAQQ NFSTAT.HistSize 100) (RPAQQ NFSTAT.HashArraySize 100) (DATATYPE NOTEFILEINFO (NOTEFILEATTRIBUTES NOTEFILEDATA EXTRAFILEBOXDATA)) (DATATYPE NOTEFILEATTRIBUTES (FULLNAME AUTHOR CREATIONDATE WRITEDATE READDATE (SIZE INTEGER))) (DATATYPE NOTEFILEDATA (ALLCARDSDATA CARDTYPESHASHARRAY FILEBOXDATA LINKTYPESHASHARRAY (NUMLINKS INTEGER))) (DATATYPE ALLCARDSDATA (ALLCARDSSIZEHIST1 ALLCARDSSIZEHIST2 ALLCARDSHIST ALLCARDSSTATS)) (DATATYPE CARDTYPEDATA (CARDTYPESIZEHIST1 CARDTYPESIZEHIST2 CARDTYPEHIST CARDTYPESTATS)) (DATATYPE FILEBOXDATA (FILEBOXHIST FILEDCARDSTATS SUBBOXSTATS TOCDEPTHHIST TOCDEPTHSTATS TBFDEPTHHIST TBFDEPTHSTATS ORPHDEPTHHIST ORPHDEPTHSTATS)) (DATATYPE CARDHISTENTRY ((HISTENTRYPARENTS INTEGER) (HISTENTRYTOLINKS INTEGER) (HISTENTRYFROMLINKS INTEGER) (HISTENTRYGLOBALLINKS INTEGER))) (DATATYPE FILEBOXHISTENTRY ((HISTENTRYFILEDCARDLINKS INTEGER) (HISTENTRYSUBBOXLINKS INTEGER))) (DATATYPE CARDSTATS ((TOTAL INTEGER) PARENTSSTATS TOLINKSSTATS FROMLINKSSTATS GLOBALLINKSSTATS SIZESTATS)) (DATATYPE STATSFROMHIST ((TOTAL INTEGER) (MIN FLOATING) (MAX FLOATING) (MEAN FLOATING) (MEDIAN FLOATING) (MODE FLOATING))) (DATATYPE EXTRAFILEBOXDATA (FBW/OSUBBOXESDATA FBW/OFILEDCARDSDATA FBW/OCHILDRENDATA OTHERFBDATA)) (DATATYPE SPECIALFBDATA (SPECIALFBSIZEHIST1 SPECIALFBSIZEHIST2 SPECIALFBHIST SPECIALFBSTATS SPECIALFBLINKSHIST SPECIALFBFILEDCARDSTATS SPECIALFBSUBBOXSTATS)) (/DECLAREDATATYPE (QUOTE NOTEFILEINFO) (QUOTE (POINTER POINTER POINTER)) (QUOTE ((NOTEFILEINFO 0 POINTER) (NOTEFILEINFO 2 POINTER) (NOTEFILEINFO 4 POINTER))) (QUOTE 6)) (/DECLAREDATATYPE (QUOTE NOTEFILEATTRIBUTES) (QUOTE (POINTER POINTER POINTER POINTER POINTER FIXP)) ( QUOTE ((NOTEFILEATTRIBUTES 0 POINTER) (NOTEFILEATTRIBUTES 2 POINTER) (NOTEFILEATTRIBUTES 4 POINTER) ( NOTEFILEATTRIBUTES 6 POINTER) (NOTEFILEATTRIBUTES 8 POINTER) (NOTEFILEATTRIBUTES 10 FIXP))) (QUOTE 12) ) (/DECLAREDATATYPE (QUOTE NOTEFILEDATA) (QUOTE (POINTER POINTER POINTER POINTER FIXP)) (QUOTE (( NOTEFILEDATA 0 POINTER) (NOTEFILEDATA 2 POINTER) (NOTEFILEDATA 4 POINTER) (NOTEFILEDATA 6 POINTER) ( NOTEFILEDATA 8 FIXP))) (QUOTE 10)) (/DECLAREDATATYPE (QUOTE ALLCARDSDATA) (QUOTE (POINTER POINTER POINTER POINTER)) (QUOTE ((ALLCARDSDATA 0 POINTER) (ALLCARDSDATA 2 POINTER) (ALLCARDSDATA 4 POINTER) (ALLCARDSDATA 6 POINTER))) (QUOTE 8)) (/DECLAREDATATYPE (QUOTE CARDTYPEDATA) (QUOTE (POINTER POINTER POINTER POINTER)) (QUOTE ((CARDTYPEDATA 0 POINTER) (CARDTYPEDATA 2 POINTER) (CARDTYPEDATA 4 POINTER) (CARDTYPEDATA 6 POINTER))) (QUOTE 8)) (/DECLAREDATATYPE (QUOTE FILEBOXDATA) (QUOTE (POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER)) (QUOTE ((FILEBOXDATA 0 POINTER) (FILEBOXDATA 2 POINTER) (FILEBOXDATA 4 POINTER) ( FILEBOXDATA 6 POINTER) (FILEBOXDATA 8 POINTER) (FILEBOXDATA 10 POINTER) (FILEBOXDATA 12 POINTER) ( FILEBOXDATA 14 POINTER) (FILEBOXDATA 16 POINTER))) (QUOTE 18)) (/DECLAREDATATYPE (QUOTE CARDHISTENTRY) (QUOTE (FIXP FIXP FIXP FIXP)) (QUOTE ((CARDHISTENTRY 0 FIXP) ( CARDHISTENTRY 2 FIXP) (CARDHISTENTRY 4 FIXP) (CARDHISTENTRY 6 FIXP))) (QUOTE 8)) (/DECLAREDATATYPE (QUOTE FILEBOXHISTENTRY) (QUOTE (FIXP FIXP)) (QUOTE ((FILEBOXHISTENTRY 0 FIXP) ( FILEBOXHISTENTRY 2 FIXP))) (QUOTE 4)) (/DECLAREDATATYPE (QUOTE CARDSTATS) (QUOTE (FIXP POINTER POINTER POINTER POINTER POINTER)) (QUOTE (( CARDSTATS 0 FIXP) (CARDSTATS 2 POINTER) (CARDSTATS 4 POINTER) (CARDSTATS 6 POINTER) (CARDSTATS 8 POINTER) (CARDSTATS 10 POINTER))) (QUOTE 12)) (/DECLAREDATATYPE (QUOTE STATSFROMHIST) (QUOTE (FIXP FLOATP FLOATP FLOATP FLOATP FLOATP)) (QUOTE (( STATSFROMHIST 0 FIXP) (STATSFROMHIST 2 FLOATP) (STATSFROMHIST 4 FLOATP) (STATSFROMHIST 6 FLOATP) ( STATSFROMHIST 8 FLOATP) (STATSFROMHIST 10 FLOATP))) (QUOTE 12)) (/DECLAREDATATYPE (QUOTE EXTRAFILEBOXDATA) (QUOTE (POINTER POINTER POINTER POINTER)) (QUOTE (( EXTRAFILEBOXDATA 0 POINTER) (EXTRAFILEBOXDATA 2 POINTER) (EXTRAFILEBOXDATA 4 POINTER) ( EXTRAFILEBOXDATA 6 POINTER))) (QUOTE 8)) (/DECLAREDATATYPE (QUOTE SPECIALFBDATA) (QUOTE (POINTER POINTER POINTER POINTER POINTER POINTER POINTER)) (QUOTE ((SPECIALFBDATA 0 POINTER) (SPECIALFBDATA 2 POINTER) (SPECIALFBDATA 4 POINTER) ( SPECIALFBDATA 6 POINTER) (SPECIALFBDATA 8 POINTER) (SPECIALFBDATA 10 POINTER) (SPECIALFBDATA 12 POINTER))) (QUOTE 14)) (DEFMACRO NFSTAT.AddFieldEntryToHist (HistType Hist FieldName Num) (* * First make sure that Hist has a non-nil Num entry. Then increment FieldName field of the record in that entry. This is a macro so as to avoid call to RECORDACCESS.) (BQUOTE (LET* ((Index (if (GEQ , Num NFSTAT.HistSize) then (SUB1 NFSTAT.HistSize) else , Num)) (Val (ELT , Hist Index))) (if (NULL Val) then (SETQ Val (SETA , Hist Index (NFSTAT.MakeFreshHistRecord (QUOTE , HistType))))) (replace (, HistType , FieldName) of Val with (ADD1 (fetch (, HistType , FieldName) of Val)))))) (DEFMACRO NFSTAT.AnalyzeHist (Hists BoxWidths Total RecordType Field) (* * Compute statistics on the data in Hist into a STATSFROMHIST record. If Field is non-nil, then hist entries are records of type RecordType and we're interested in Field of that record. Otherwise, hist entries are numbers. This is a macro to avoid doing RECORDACCESS.) (* * Hists can be a list of histograms which should be the same length as IntervalWidths. The latter gives the width of a histogram entry or box, one for each histogram.) (BQUOTE (LET ((StatsFromHist (create STATSFROMHIST TOTAL _ , Total MIN _ 99999.0 MAX _ 0.0 MEAN _ 0.0 MEDIAN _ -1.0 MODE _ 0))) (with STATSFROMHIST StatsFromHist (for Hist in (MKLIST , Hists) as BoxWidth in (MKLIST , BoxWidths) bind TotalDivBy2 _ (FQUOTIENT TOTAL 2) NumSeen _ 0 LastNonEmptyEndBox _ -.5 StartBox _ -.5 ModeVal _ 0 HalfBox do (SETQ HalfBox (FQUOTIENT BoxWidth 2)) ( for i from 0 to (SUB1 NFSTAT.HistSize) eachtime (BLOCK) bind MidBox EndBox do (LET* ((Entry (ELT Hist i)) (Val , (if (OR (NULL RecordType) (NULL Field)) then (BQUOTE (OR Entry 0)) else (BQUOTE (OR (AND ( type? , RecordType Entry) (fetch (, RecordType , Field) of Entry)) 0))))) (SETQ EndBox (PLUS StartBox BoxWidth)) (SETQ MidBox (PLUS StartBox HalfBox)) (* Update MAX and MIN.) (if (GREATERP Val 0) then (if (LESSP MidBox MIN) then (SETQ MIN MidBox)) (if (GREATERP MidBox MAX) then (SETQ MAX MidBox))) (* Keep running total in MEAN.) (add MEAN (TIMES Val MidBox)) (* Update MODE.) (if (GREATERP Val ModeVal) then (SETQ ModeVal Val) (SETQ MODE MidBox)) (* Compute MEDIAN if not already done.) (if (AND (LESSP MEDIAN -.5) (GREATERP Val 0)) then (if (EQUAL NumSeen TotalDivBy2) then (SETQ MEDIAN (FQUOTIENT (PLUS LastNonEmptyEndBox StartBox) 2)) elseif (LESSP TotalDivBy2 (add NumSeen Val)) then (SETQ MEDIAN (FPLUS StartBox (FQUOTIENT (TIMES (DIFFERENCE NumSeen TotalDivBy2) BoxWidth) Val))) else (SETQ LastNonEmptyEndBox EndBox))) (* Set up StartBox for next iteration.) (add StartBox BoxWidth)))) (* Divide total in MEAN by num cards.) (SETQ MEAN (FQUOTIENT MEAN TOTAL)) StatsFromHist)))) (FILESLOAD PLOTEXAMPLES) (DEFMACRO NFSTAT.HistPlot (Hist Label &OPTIONAL RecordName &OPTIONAL FieldName) (* * Create a histogram plot using HISTPLOT from the PLOTEXAMPLES package of that field of Hist given by FieldName. If FieldName is nil, then Hist is assumed to contain integers rather than datatype entries.) (if RecordName then (BQUOTE (HISTPLOT (for i from 0 to (SUB1 NFSTAT.HistSize) collect (LET ((HistEntry ( ELT , Hist i))) (CONS i (OR (AND (type? , RecordName HistEntry) (fetch (, RecordName , FieldName) of HistEntry)) 0)))) (OR , Label (CONCAT (QUOTE , FieldName) " of " (QUOTE , RecordName))))) else (BQUOTE (HISTPLOT (for i from 0 to (SUB1 NFSTAT.HistSize) collect (LET ((HistEntry (ELT , Hist i))) (CONS i ( OR (NUMBERP HistEntry) 0)))) , Label)))) (PUTPROPS NOTEFILESTATS COPYRIGHT ("Xerox Corporation" 1986)) NIL