(FILECREATED "16-Oct-86 15:16:56" ("compiled on " {ERIS}SOURCES>DWIMIFY.;38) "15-Oct-86 10:15:45" bcompl'd in NIL dated NIL) (FILECREATED "12-Sep-86 18:58:39" {ERIS}SOURCES>DWIMIFY.;38 346951 changes to: (FNS WTFIX1) previous date: "29-Jul-86 03:36:42" {ERIS}SOURCES>DWIMIFY.;37) \FORBLOCK/CLISPFORVARS D1 (L (0 PTRS) P 0 CLISPCONTEXT F 9 VARS F 10 I.S.TYPE F 11 MAKEPROGFLG F 12 LEFT.ARROWS.BITTABLE F 13 I.V. F 14 INITVARS F 15 UNDOLST F 16 FIRSTI.V. F 17 LEFT.ARROW F 18 IVINITFLG)  g@@[\LdMlPLdgdgLgLLhLdɿ`WL LKhid YILddgdgdgdgLLi LdggLLgLLC`AL_hl+WO !i#LMK Ld4d/d'OLKMLLi WfLW L\ڿhhKK\dMO@gWOcc N dgdgihiZcL\$Ldgdgih iZcLLYd3dl,WcOI_@g@O&JIN^dgdgi)dgdgIgIgIhihnicIWcO6I_@dg%dgic$g@Oihg JIWcINLIW"IhLWcIh LLgLL L@gLc@h@LKKddg%dgdgdgdgdgQiN(667 /RPLNODE 649 CLISPFORERR 603 SHOULDNT 359 DREVERSE 310 CLISPFORERR 306 CLISPFORERR 293 \FORBLOCK/CLISPFORVARS1 254 \FORBLOCK/CLISPFORVARS1 240 STRPOSL 163 DWIMIFY2 103 DWIMIFY2 90 STRPOSL) (746 SAVESETQQ 740 SAVESETQ 734 old 727 OLD 720 SETQQ 713 SETQ 674 I.S.TYPE 659 DO 600 CLISPFORVARS 583 AS 572 FOR 565 BIND 520 QUOTE 512 SETQ 504 SAVESETQQ 498 SETQQ 488 SAVESETQ 482 SETQ 455 AS 403 old 397 OLD 371 old 365 OLD 343 BIND 213 CLISPFLG 197 SETQ 183 175 _ 150 SAVESETQ 144 SETQ 135 SAVESETQQ 126 SETQQ 79 CLISPFLG 55 SETQ 47 41 _ 2 FOR/BIND) () \FORBLOCK/CLISPFOR0 D1 (P 47 VARS P 40 I.S.OPRSLST P 27 UNDOLST P 18 TERMINATEFLG P 17 MAKEPROGFLG P 16 INITVARS P 15 PROGVARS P 14 IVINITFLG P 13 FIRSTI.V. P 12 I.V. P 11 I.S.TYPE1 P 7 I.S.PTRS P 6 LASTPTR P 5 I.S.TYPE P 4 DWIMIFYCHANGE P 3 VARS P 2 DUMMYVARS I 0 EXP F 51 DWIMESSGAG F 52 VARS F 53 DWIMIFYFLG F 54 NOFIXFNSLST F 55 NOFIXVARSLST F 56 HISTENTRY F 57 LISPXHIST) 3@o`oWh !.WjWlWnH_dl$ ONg`"OHONd_THHOTH ONg gN;OR*ONd>_dgYNgcNdN5?HN h_RqNHh _g _N`Ng OggHh^Og _ROdg ׿@ +ORhHh^OHh^MO_gH]h^}Odg HMO_MHH NhXOg9HgHg*O8&O_gH]hgO_gO_8MHgOdg%dgdgdgdgdgggH_8hOdg"OBOD_OHg gH_>hg$O>O@OD_OHg gH_BhiOdg%O>O@OB_OHg gH_Dh=g OBOD_OHg gH_@hOggH_Fhg ^O_OOBODO@ i __h_B_D_>_@_FgH_OBODO@i _O _Md1d+g _gOg gMMh_O.xO0tMWfo@ O@ZOBODWfJO$FOg 9oi 02@dhk _`Ob O`h_dO`&_bOdid OgHgg X:OH_XgOX _ _KO [,O>O_@_FOdgO_>JdgO_F9dgO_B(dgO_DdgO_@gO_I_*OBODOBOD_gOdgOBODgOg;O_3Odl_*%gOgO_*O g ODO_*O O*OhO_OO*O.gO*hh _.?O&gOOBi_"O*go O.gO*hh _.O*hh _&O(gO*OF!OOBODhO*dhOFh ugO*hhO>OO_0OO> i_O@OFd3jOFgOO>hѲrggi OF hh_FgOggOhggOhgO OO@hhigO OO@hhhhh+O>3 O@3 O@O>o_Fgg_OO gOkhh _ O@ hO_O.OdO OOhh _.OFO>O@=O(gOO>O@OFd3gO OOFkhhh _(O WBcA`bhW1 gO _d__jh_O8gOh_gW Wc]og Mc NdWMcgO W WkN MOgOgg O OO hZIKShW$hc"gW )d_AbOZ@JJ@@J@ iA` bKAL,H OLL ZJAlA` AB (315 \DWIMIFYBLOCK/CLISPATOM0 310 DUNPACK 289 \DWIMIFYBLOCK/FIX89 286 LENGTH 260 DUNPACK 245 /RPLNODE 206 MEMB 175 UNDONLSETQ1 161 UNDOSAVE 157 LISTPUT1 138 ERROR! 130 NLEFT 122 TAILP 115 LISTPUT1 87 \DWIMIFYBLOCK/CLISPATOM0A0001 28 MEMB) (307 WTFIXCHCONLST1 257 WTFIXCHCONLST 201 RESPELLS 185 NOFIXVARSLST0 154 NOSAVE 151 SIDE 144 NOSAVE 110 SIDE 84 INTERNAL 67 #UNDOSAVES 56 SIDE 23 SIDE 10 NOFIXVARSLST0) ( 81 (\DWIMIFYBLOCK/CLISPATOM0A0001)) \DWIMIFYBLOCK/CLISPATOM1A0003 D1 (L (1 Y 0 X)) @Ao (14 CONCAT 11 RETDWIM2) NIL ( 7 "()") \DWIMIFYBLOCK/CLISPATOM1A0004 D1 (L (1 Y 0 X)) @A  (8 MKSTRING 4 RETDWIM2) NIL () \DWIMIFYBLOCK/CLISPATOM1 D1 (P 16 BRACKET P 14 TENTATIVE P 13 NOSAVEFLG P 11 TYP P 8 BACKUPFLG P 7 BROADSCOPE P 6 ENDTAIL P 4 CLTYP P 2 BRACKETCNT I 0 TAIL F 17 CURRTAIL F 18 PARENT F 19 89FLG F 20 CHARLST F 21 DWIMIFYFLG F 22 NOSPELLFLG F 23 CLISPCONTEXT F 24 TYPE-IN? F 25 SUBPARENT F 26 FORMSFLG F 27 FAULTX F 28 NEWTAIL F 29 CLISPCHANGES F 30 ONEFLG F 31 CLISPCHANGE F 32 NEXTAIL) W(djW"g ]2W"dgO bW"gW" gg ]Hh_HOdW&OOh _h_OHh _NjO%H_MOg _Og g_CO MHg _Hg g_!MLHHIhO HW(W"O O HO _H,W"(O HO HgW"dH W" hXc&HHghHXi(1735 /RPLNODE 1728 PACK 1677 FLAST 1663 \DWIMIFYBLOCK/STOPSCAN? 1638 GETPROP 1627 GETPROP 1604 GETPROP 1593 GETPROP 1568 \NCONC2 1552 \NCONC2 1540 DWIMERRORRETURN 1512 \DWIMIFYBLOCK/CLISPATOM1B 1442 \DWIMIFYBLOCK/STOPSCAN? 1400 \DWIMIFYBLOCK/CLISPATOM1A 1370 GETPROP 1343 GETPROP 1332 \DWIMIFYBLOCK/CLISPATOM2 1322 NLEFT 1310 DWIMERRORRETURN 1285 GETPROP 1242 GETPROP 1226 GETPROP 1214 GETPROP 1193 GETPROP 1182 GETPROP 1158 DWIMERRORRETURN 1088 GETP 1023 /RPLNODE 1001 CLISPFUNCTION? 978 CLISPFUNCTION? 929 \FZEROP 883 NLEFT 856 GETPROP 850 NTHCHAR 839 GETPROP 817 \FZEROP 810 \DWIMIFYBLOCK/CLRPLNODE 803 PACK 798 PACK 795 LDIFF 753 UNPACK 727 GETPROP 714 CLISPNOTVARP 704 \DWIMIFYBLOCK/CLBINARYMINUS? 601 /RPLNODE 598 \NCONC2 544 \FZEROP 515 MEMB 473 NLEFT 442 PACK 439 LDIFF 390 DWIMERRORRETURN 356 GETPROP 294 GETPROP 275 \DWIMIFYBLOCK/CLUNARYMINUS? 249 GETPROP 201 \NCONC2 189 PACK 173 \DWIMIFYBLOCK/FIX89 160 \DWIMIFYBLOCK/FIX89A 154 LENGTH 141 \DWIMIFYBLOCK/FIX89TYPEIN 132 LDIFF 113 FLAST 61 GETPROP 51 /RPLNODE 36 \DWIMIFYBLOCK/CLUNARYMINUS? 15 GETPROP) (1749 ' 1716 ~ 1641 NOT 1635 LISPFN 1624 BROADSCOPE 1607 NOT 1601 LISPFN 1590 BROADSCOPE 1520 NOFIXVARSLST0 1504 CERTAINLY 1390 FOR/BIND 1382 FORWORD 1375 FORWORD 1367 CLISPWORD 1340 CLISPTYPE 1282 UNARYOP 1239 CLISPCLASS 1229 NOT 1223 LISPFN 1211 BROADSCOPE 1190 LISPFN 1179 BROADSCOPE 1144 BRACKET 1085 CLISPBRACKET 1062 : 1053 => 1047 -> 1006 CERTAINLY 994 \DWIMIFYBLOCK/CLISPATOM1A0004 991 \DWIMIFYBLOCK/CLISPATOM1A0003 988 NOTVAR 975 OKVAR 955 : 946 ' 853 CLISPTYPE 836 CLISPTYPE 736 BRACKET 724 CLISPTYPE 655 ' 510 SEPARATOR 494 - 487 +- 477 E 462 +- 455 + 422 RPARKEY 415 LPARKEY 376 BRACKET 353 CLISPBRACKET 345 BRACKET 301 ' 291 CLISPTYPE 288 +- 283 +- 260 - 246 CLISPTYPE 236 CLISPCHARS 125 LPARKEY 119 RPARKEY 105 LPARKEY 58 CLISPTYPE 55 +- 45 +- 25 - 12 CLISPTYPE) () \DWIMIFYBLOCK/CLISPATOM1A D1 (P 5 BRACKET P 4 BRACKETCNT P 2 BROADSCOPE P 0 ENDTAIL I 3 NOSAVEFLG I 2 TAIL I 1 CLTYP I 0 TYP F 6 CLISPCONTEXT F 7 TENTATIVE F 8 DWIMIFYFLG F 9 ONEFLG F 10 PARENT) C`@g @g ]kj@BBB@dgHg [@g hHdgibHHGHbg bWVWHg g{VgVgfg [wHg MHdMLk\<M6Lk\/Kdg)Hg HMLk\gMhWh KAHI SKg,HM#ILjLL J*i WgcB(301 \FZEROP 262 \DWIMIFYBLOCK/STOPSCAN? 253 DWIMERRORRETURN 225 GETPROP 177 GETPROP 166 GETPROP 129 GETPROP 104 GETPROP 93 \DWIMIFYBLOCK/CLISPATOM2 60 GETPROP 50 GETPROP 17 GETP 9 GETPROP) (317 PROBABLY 270 BRACKET 240 BRACKET 222 CLISPBRACKET 213 BRACKET 174 CLISPCLASS 163 CLISPTYPE 151 FOR/BIND 142 FORWORD 133 FORWORD 126 CLISPWORD 101 CLISPTYPE 69 ' 57 BROADSCOPE 47 CLISPTYPE 38 ~ 14 CLISPBRACKET 6 CLISPCLASS) () \DWIMIFYBLOCK/CLISPATOM1B D1 (F 3 UNDOSIDE F 4 UNDOSIDE0) PSTHXdIJHHHJHdgٿgHH` `hJ(65 GETHASH) (68 CLISPARRAY 62 CLISPARRAY 51 /PUTHASH 44 /PUTHASH) () \DWIMIFYBLOCK/CLISPATOM2 D1 (P 8 NEGFLG P 5 VAR2 P 4 VAR1 P 2 LISPFN P 1 UNARYFLG P 0 PARENT F 17 TAIL F 18 ENDTAIL F 19 TYP F 20 DWIMIFYFLG F 21 CLISPCHANGE F 22 CLTYP F 23 BRACKET F 24 CLISPCONTEXT F 25 FORMSFLG F 26 BACKUPFLG F 27 TENTATIVE F 28 BRACKETCNT F 29 TYPE-IN? F 30 PARENT F 31 BROADSCOPE F 32 SUBPARENT) WgW0g oi "W" lW$Hh IW"W" W,gEIW"W"O dhihdW( W0gW0 gW. _dgW. _0N'd_OOOhOh_O"O_ _O J gW. IN _OW"N#IOgN NkOW"NlOW$W2HHW"W"NN iW"NW$ gW(zNc*sW"HW"_gOg }Og sic4HkW" c"dW" hW"c&g Oh_W&dgW"dW&c"igW&ggc&W"gW"W" W$W"l IW"W"W$ ]Ik W>IW&MKggH W"W@H_OdW" W" ic4Oc"W(W*W"HW4 W"W&dgGJM hL _W(W*BOc*M_Ol *MM W6NgLW&dggsdgggdgdgLVdgdghLMi ſLg _L Lg _hOL LM  g _g LOLhJ ZgMgMgMW:uLgngi `\id ZW&LMJ I5MM*W:$JgMdggi `id MhMdMh_Jdg:M)JLM _Hd_Ol W"d uMqgZlg'LOdkgZUgKmgZAJdg𲜿LOkgZ(gMM3M gMhhghah\HJ W(Oc*W(W*I$Oc*N_Ol JgNH IlLTJLNJg1Jg*Jg#JgJgJgJgJgL`NLLM MW(NdlNH N#NZg c,NJg l NNZg c,JW,NW$ OHgHHh Hg:H_2HO _'HW"W"OW"OW"OO W6gc6W"(1726 \DWIMIFYBLOCK/CLRPLNODE 1693 NEGATE 1670 \DWIMIFYBLOCK/CLRPLNODE 1652 \DWIMIFYBLOCK/CLISPATOM1A 1640 GETPROP 1623 DWIMERRORRETURN 1616 GETPROP 1602 GETPROP 1589 \DWIMIFYBLOCK/CLISPATOM2A 1569 \DWIMIFYBLOCK/CLRPLNODE 1566 \APPEND2 1480 \DWIMIFYBLOCK/CLISPATOM2A 1468 \TYPEMASK.UFN 1427 CLISPNOEVAL 1394 MINUS 1289 \DWIMIFYBLOCK/CLISPATOM2A 1279 \TYPEMASK.UFN 1260 \DWIMIFYBLOCK/CLISPATOM2D 1221 PRINT 1212 PRIN1 1174 CLISPLOOKUP 1162 PRINT 1152 PRIN1 1109 CLISPLOOKUP 1096 GETPROP 1088 DWIMERRORRETURN 1079 \DWIMIFYBLOCK/CLISPATOM2D 1075 \APPEND2 1069 CLISPLOOKUP 1056 GETPROP 1047 DWIMIFY1? 1039 GETPROP 1027 \DWIMIFYBLOCK/CLISPATOM2D 1024 CLISPRECORD 934 \DWIMIFYBLOCK/CLISPATOM2A 924 \TYPEMASK.UFN 892 \DWIMIFYBLOCK/CLISPATOM2D 886 \DWIMIFYBLOCK/CLISPCAR/CDR 862 \DWIMIFYBLOCK/CLISPBROADSCOPE1 838 \DWIMIFYBLOCK/CLRPLNODE 832 LDIFF 810 \DWIMIFYBLOCK/CLISPBROADSCOPE 787 DWIMERRORRETURN 779 LDIFF 764 DWIMERRORRETURN 751 \DWIMIFYBLOCK/CLRPLNODE 676 GETPROP 661 \DWIMIFYBLOCK/CLRPLNODE 650 NLEFT 637 GETPROP 627 GETPROP 581 \DWIMIFYBLOCK/CLRPLNODE 570 \DWIMIFYBLOCK/CLRPLNODE 526 \DWIMIFYBLOCK/CLISPANGLEBRACKETS 497 LAST 488 MEMB 422 MEMB 408 MEMB 399 DWIMIFY2? 376 LDIFF 351 \DWIMIFYBLOCK/CLISPATOM2C 339 DWIMERRORRETURN 325 \DWIMIFYBLOCK/CLISPATOM2C 317 RETEVAL 309 \DWIMIFYBLOCK/RETDWIM0 306 \DWIMIFYBLOCK/RETDWIM0 286 \DWIMIFYBLOCK/CLISPRESPELL 267 RETEVAL 259 \DWIMIFYBLOCK/RETDWIM0 252 \DWIMIFYBLOCK/CLISPRESPELL 215 DWIMERRORRETURN 199 \DWIMIFYBLOCK/CLISPATOM2C 188 GETPROP 166 GETPROP 147 GETPROP 123 DWIMERRORRETURN 112 DWIMERRORRETURN 52 GETP 25 GETPROP 17 GETPROP 9 GETPROP) (1733 PROBABLY 1676 NOT 1660 NOT 1637 CLISPTYPE 1613 UNARYOP 1599 CLISPTYPE 1552 CLISPLASTSUB 1545 TIMES 1539 PLUS 1533 FTIMES 1526 FPLUS 1519 ITIMES 1512 IPLUS 1505 OR 1498 AND 1473 SETQ 1409 IPLUS 1398 IMINUS 1377 IPLUS 1370 SUB1 1353 IDIFFERENCE 1345 SUB1 1332 IPLUS 1325 ADD1 1308 IPLUS 1302 NULL 1246 EQ 1216 LASTWORD 1208 = 1201  1192 QUOTE 1156 LASTWORD 1148 = 1142  1130 SETQQ 1121 ' 1113 SETQ 1093 LISPFN 1085 _ 1053 SETFN 1036 SETFN 1014 REPLACE 1008 replace 997 NCONC1 991 NCONC 985 RPLACD 979 CDR 973 RPLACA 967 CAR 948 _ 873 : 805 IS 800 ISWORD 737 NOT 727 AND 721 nor 714 NOR 690 ~ 673 LISPFN 634 UNARYOP 624 CLISPTYPE 616 ~ 585 PARTIAL 520 CLISPANGLEBRACKETS 483 LISPFN 417 SEPARATOR 403 DWIMIFY 390 IFWORD 357 BRACKET 303 WTFIX 295 CLISPATOM1 283 CLISPINFIXSPLST 256 CLISPIF0 249 CLISPIFWORDSPLST 241 IFWORD 185 CLISPTYPE 176 ~ 163 UNARYOP 144 CLISPTYPE 90 BRACKET 84 BRACKET 49 CLISPBRACKET 22 CLISPCLASS 14 LISPFN 6 UNARYOP) ( 313 (PROGN (SETQ CLISPRESPELL T) NIL) 263 (PROGN (SETQ CLISPRESPELL T) NIL)) \DWIMIFYBLOCK/CLISPATOM2A D1 (P 2 DWIMIFYCHANGE P 1 CLISPCONTEXT P 0 DWIMIFYING I 1 PARENT I 0 TAIL F 4 VAR1 F 5 DWIMIFYFLG F 6 TYP F 7 VARS F 8 TENTATIVE F 9 NOSPELLFLG F 10 BROADSCOPE F 11 FAULTPOS F 12 DWIMIFYING F 13 CLISPCONTEXT F 14 NOFIXFNSLST F 15 NOFIXVARSLST F 16 TYPE-IN?) / @'WhUWUW"UWWVgVgTdWTd`g HTW Tg T`T`geIgRTdAKWiCWW QQP7@(PAA A` bP@ A``PP@A Pci@ATgA3A @AbPAR Pcg(98 \DWIMIFYBLOCK/CLRPLNODE 86 MINUS 59 \DWIMIFYBLOCK/CLRPLNODE 39 CLISPTRAN 31 GETHASH 23 \DWIMIFYBLOCK/CLRPLNODE) (105 PARTIAL 74 - 50 CLISPLASTSUB 44 CLISPLASTSUB 28 CLISPARRAY) () \DWIMIFYBLOCK/CLISPATOMARE1 D1 (L (1 FLG 0 X)) @@Hd`hHdgdgHA h HX Hh (61 \NCONC2 43 \DWIMIFYBLOCK/CLISPATOMARE1) (34 OR 28 AND 11 CLISPLASTSUB) () \DWIMIFYBLOCK/CLISPATOMARE2 D1 (L (1 Z 0 L) F 2 DEST F 3 TAIL F 4 PARENT) _ @dA)gSTh @X@YR@dHH@hIR@cAI Y@IdHIhbb(71 \APPEND2 24 DWIMERRORRETURN) (14 PHRASE) () \DWIMIFYBLOCK/CLISPATOMIS1 D1 (L (4 NEGATE 2 ALST 1 OBJ 0 SUBJ) I 3 EXP) P@dgdg,@0@dABCDi IHhZH&JA@BCi bDd C(75 NEGATE 67 SUBLIS 36 \DWIMIFYBLOCK/CLISPATOMIS1) (11 OR 5 AND) () \DWIMIFYBLOCK/CLISPATOMIS2 D1 (L (0 X)) O@@d=d`4dHd@@ g@dg@ @b(67 \DWIMIFYBLOCK/CLISPATOMIS2 42 \DWIMIFYBLOCK/CLRPLNODE 39 \APPEND2) (59 OR 50 AND 15 CLISPLASTSUB) () \DWIMIFYBLOCK/CLISPBROADSCOPE D1 (L (2 CONTEXT 1 L 0 $TYP) P 0 BRACKETCNT) jAAIdB dI IBi hggg Hkظ)Adggg HkٸA@HjHAb AIIB AbYIdA A IBi AbYs(140 \DWIMIFYBLOCK/CLISPBROADSCOPE1 133 \DWIMIFYBLOCK/CLRPLNODE 129 LDIFF 115 \DWIMIFYBLOCK/CLISPBROADSCOPE1 103 \FZEROP 74 GETP 48 GETP 31 \DWIMIFYBLOCK/CLISPBROADSCOPE1 24 \DWIMIFYBLOCK/CLRPLNODE 15 \DWIMIFYBLOCK/CLISPBROADSCOPE1) (71 CLISPTYPE 68 > 61 > 45 CLISPTYPE 42 < 37 <) () \DWIMIFYBLOCK/CLISPBROADSCOPE1 D1 (L (2 FLG 1 CONTEXT 0 X) F 1 DWIMIFYFLG F 2 CLISPCONTEXT) O@)@hddhddAggQRA X@HdAg@@@hddA @BA (76 DWIMIFY1? 66 DWIMIFY2? 37 DWIMIFY2?) (50 IS 25 IS 20 IS) () \DWIMIFYBLOCK/CLISPCAR/CDR D1 (L (0 LST) F 5 VAR1 F 6 VAR2 F 7 ENDTAIL) Wg WgAhc h@dgi@bH&IggUhc L@Zdg!@Z3 I g @b3IJLgUgJhc @g@gU@ @[UK hbUd VUc UJH@h [#Jg [ g gUhc V^Uc Xc VSUl c HjJfJl l JJlٺgUhc VUc H@kJkUi Ii JUI c @bLgi@bg H*@&I#gUjJkhc VUc gUhc LJmgU UhgUjJhc VUc IgUh(413 CLISPLOOKUP 357 DWIMERRORRETURN 321 \DWIMIFYBLOCK/CLISPCAR/CDR1 314 \DWIMIFYBLOCK/CLISPCAR/CDR1 309 \DWIMIFYBLOCK/CLISPCAR/CDR1 249 NLEFT 220 DWIMERRORRETURN 211 GETPROP 201 CLISPRECORD 177 CLISPTRAN 174 MAKEMATCH 164 DWIMIFY2? 154 \NCONC2 94 MINUS) (443 CAR 420 NLEFT 409 LAST 393 CDR 371 NLEFT 354 : 336 : 278 CDDDDR 217 FIELDNAME 208 ACCESSFN 145 => 137 -> 122 with 118 match 88 : 68 - 53 NCONC1 49 NCONC 30 : 14 5 _) () \DWIMIFYBLOCK/CLISPCAR/CDR1 D1 (L (3 SETQFLG 2 TAILFLG 1 X 0 N) F 1 VAR2 F 2 DWIMIFYFLG F 3 VAR1) @j7@-R`@A ClAh@dkEAdgBgI Ag=dgBg/g*g$BgglAg BggXAHM@dl+gS BHA@kh0HA@hQHcgHoXg BHHAhXQdcH(194 SHOULDNT 148 CLISPLOOKUP 58 \FZEROP 23 \DWIMIFYBLOCK/CLISPCAR/CDR2) (191 CLISPCAR/CDR 178 CAR 144 NTH 126 CADAR 122 CDDAR 114 CAR 102 CAADR 97 CDADR 89 CADR 84 CAAAR 79 CDAAR 71 CAAR 65 CAAR 53 CDAR 44 CAR 17 CHECKCARATOMFLG) ( 185 ((1 CAR . CDR) (2 CADR . CDDR) (3 CADDR . CDDDR) (4 CADDDR . CDDDDR))) \DWIMIFYBLOCK/CLISPCAR/CDR2 D1 (L (1 X 0 N) F 1 FAULTPOS) 1QA @j#@Hd g H@kb h(43 \FZEROP 29 DWIMERRORRETURN 4 STKEVAL) (26 CARATOM) () \DWIMIFYBLOCK/CLISPIFA0007A0008 D1 (NAME ERRORSET F 0 FORM F 1 TEM) P ch(3 \DWIMIFYBLOCK/CLISPIF0) NIL () \DWIMIFYBLOCK/CLISPIFA0007 D1 (NAME ERRORSET F 0 #UNDOSAVES F 1 UNDOTEM) hcohg chh(14 \DWIMIFYBLOCK/CLISPIFA0007A0008) (11 CLISPIF0) ( 7 (\DWIMIFYBLOCK/CLISPIFA0007A0008)) \DWIMIFYBLOCK/CLISPIF D1 (P 12 UNDOTEM P 11 UNDOSIDE P 10 UNDOSIDE0 P 9 LISPXHIST P 6 TEM P 5 CLISPRESPELL P 2 VARS P 1 DWIMIFYING P 0 CLISPCONTEXT I 0 FORM F 13 RESETVARSLST F 14 DWIMIFYFLG F 15 #UNDOSAVES F 16 ATTEMPTFLG F 17 CLISPCHANGE F 18 LISPXHIST F 19 DWIMIFYING F 20 VARS F 21 BREAKFLG F 22 EXPR F 23 NOFIXFNSLST F 24 NOFIXVARSLST)  Wic ic"gWW&W(Wh W*W, ``EWW.W0W$1 gO _d__jh_O>gOh_gWWc__og OcOdWOcgO W WkO OOgOgg O OO hNMh@g KLh#(255 CLISPELL 246 \DWIMIFYBLOCK/RETDWIM 242 \DWIMIFYBLOCK/RETDWIM 231 UNDONLSETQ1 217 UNDOSAVE 213 LISTPUT1 194 ERROR! 185 NLEFT 176 TAILP 169 LISTPUT1 138 \DWIMIFYBLOCK/CLISPIFA0007 76 MEMB 39 \DWIMIFYBLOCK/GETVARS) (266 NOFIXVARSLST0 261 NOFIXFNSLST0 252 IFWORD 210 NOSAVE 207 SIDE 200 NOSAVE 164 SIDE 135 INTERNAL 115 #UNDOSAVES 104 SIDE 71 SIDE 62 NOFIXVARSLST0 56 NOFIXFNSLST0 45 NOFIXVARSLST0 42 NOFIXFNSLST0 13 IFWORD) ( 132 (\DWIMIFYBLOCK/CLISPIFA0007)) \DWIMIFYBLOCK/CLISPIF0 D1 (L (0 FORM) P 8 DWIMIFYCHANGE F 14 LISPXHIST) 0 @`kLhhagghg NdgdgHJML@ h h#dgdgݿHJML@ h Li`LhIYL]L\oHJML@ h `I @gH gW _@\_dg Odd ɿO`odgdg0LNsh`mNIg Iddgghdgdg`9PPPg P hPdg ooi (98 FIXSPELL1 84 \NCONC2 81 RETDWIM2 64 RETDWIM2 33 CLISPNOTVARP 22 FNTYP) (73 - 54 - 41 CLISPHELPFLG) ( 94 " " 90 "the %"-%" is unary") DWIMIFYA0012A0013 D1 (NAME ERRORSET F 0 VAL) iPhi hh(10 PRINTDEF) (3 PRETTYTRANFLG) () DWIMIFYA0012 D1 (NAME ERRORSET L (0 NIL) F 2 RESETVARSLST F 3 MACROY) Gg`RcRog HIdRHcR RkI Hci(63 ERROR! 54 NLEFT 47 TAILP 25 DWIMIFYA0012A0013) (31 PRETTYTRANFLG 22 INTERNAL 5 PRETTYTRANFLG 2 PRETTYTRANFLG) ( 19 (DWIMIFYA0012A0013)) DWIMIFY D1 (L (2 L 1 QUIETFLG 0 X) P 4 RESETSTATE P 3 MACROY P 1 OLDVALUE P 0 VAL F 5 RESETVARSLST F 6 DWIMFLG F 7 NOFIXFNSLST F 8 NOFIXVARSLST) kVoi hWW@B X@GBDAAi 1gIhhUc og gJc gJ Li H(103 TERPRI 97 ERROR! 91 APPLY 71 DWIMIFYA0012 44 OUTPUT 29 DWIMIFY0 12 LISPXPRIN1) (84 OUTPUT 75 ERROR 68 INTERNAL 50 OUTPUT 24 NOFIXVARSLST0 19 NOFIXFNSLST0) ( 65 (DWIMIFYA0012) 8 "DWIM is turned off! ") DWIMIFY0 D1 (L (1 Y 0 X) P 10 TYPE-IN? P 9 ONEFLG P 8 CLISPCONTEXT P 6 DWIMIFYCHANGE P 5 DWIMIFY0CHANGE P 4 FAULTFN P 2 SIDES P 1 DWIMIFYFLG P 0 DWIMIFYING I 3 EXPR I 2 VARS F 11 LISPXHIST F 12 DFNFLG)  idgW  Adg \*A bA @bghdW @A @A A_`OgA_`Og%A_`Og@dAdA@@ @@ A\C@b@ _MLJ O@dg\@bd  _d[\Ob M"KJ Kd WgKd Ki K(261 DWIMUNSAVEDEF 254 EXPRP 240 \DEFINEDP 234 DWIMARKASCHANGED 226 DWIMIFY1 212 EXPRCHECK 208 DWIMIFY1 189 DWIMARKASCHANGED 180 DWIMIFY1 165 DWIMIFY1 159 DWIMIFY2 72 DWIMIFY2 65 TAILP 59 LISPXPUT 43 LAST 37 VARSBOUNDINEDITCHAIN 29 \EVALV1 9 MEMB) (247 PROP 200 TYPE-IN 135 SELECTQ 126 DWIMEQUIVLST 115 SELECTQ 106 DWIMEQUIVLST 94 COND 85 DWIMEQUIVLST 52 RESPELLS 26 ATM 4 SIDE) () DWIMIFY0? D1 (P 5 VARS P 4 EXPR P 3 FAULTPOS P 2 DWIMIFYFLG P 1 DWIMIFYING P 0 DWIMIFY0CHANGE I 6 CLISPCONTEXT I 5 FAULTFN I 4 ONEFLG I 3 FORMSFLG I 2 SUBPARENT I 1 PARENT I 0 TAIL F 6 NOFIXFNSLST F 7 NOFIXVARSLST F 8 DWIMIFYFLG) NWVWdgdgVWidgVW@(75 \DWIMIFYBLOCK/DWMFY0 51 \DWIMIFYBLOCK/DWMFY0 17 \DWIMIFYBLOCK/DWMFY0) (68 NOFIXVARSLST0 62 NOFIXFNSLST0 55 EVAL 42 NOFIXVARSLST0 36 NOFIXFNSLST0 28 VARSBOUND 22 CLISPIFY 13 NOFIXVARSLST0 7 NOFIXFNSLST0) () DWIMIFY1 D1 (L (0 FORM) I 2 FORMSFLG I 1 CLISPCONTEXT) @ (3 \DWIMIFYBLOCK/DWMFY1) NIL () DWIMIFY1? D1 (L (0 FORM) P 2 DWIMIFYCHANGE P 1 DWIMIFYFLG P 0 DWIMIFYING I 2 FORMSFLG I 1 CLISPCONTEXT F 3 DWIMIFYFLG F 4 NOFIXFNSLST F 5 NOFIXVARSLST) S@ iTU@ (23 \DWIMIFYBLOCK/DWMFY1 6 \DWIMIFYBLOCK/DWMFY1) (19 NOFIXVARSLST0 15 NOFIXFNSLST0) () DWIMIFY1A D1 (L (2 FN) I 1 TAIL I 0 PARENT F 0 CLISPCONTEXT F 1 DWIMESSGAG F 2 DWIMIFYFLG F 3 DWIMIFYING F 4 FAULTFN) Q|BRxSuPgmBT ki Pgoi @A id Ad3oi Ai oi $oi oAhl lm id h(123 LISPXPRINT 118 CONCAT 115 SUBSTRING 108 RETDWIM2 97 LISPXPRIN1 86 LISPXPRIN1 78 LISPXPRIN1 73 LISPXPRIN1 57 LISPXPRINT 52 RETDWIM2 46 LISPXPRIN1 30 LISPXSPACES 24 FIXPRINTIN) (35 IFWORD 14 IFWORD) ( 101 "... " 93 "at " 82 ") " 69 "too many arguments (more than " 42 "(possible) parentheses error in ") DWIMIFY2 D1 (I 5 ONLYSPELLFLG I 4 ONEFLG I 3 FORMSFLG I 2 SUBPARENT I 1 PARENT I 0 TAIL) (2 \DWIMIFYBLOCK/DWMFY2) NIL () DWIMIFY2? D1 (P 2 DWIMIFYCHANGE P 1 DWIMIFYFLG P 0 DWIMIFYING I 6 CLISPCONTEXT I 5 ONLYSPELLFLG I 4 ONEFLG I 3 FORMSFLG I 2 SUBPARENT I 1 PARENT I 0 TAIL F 3 DWIMIFYFLG F 4 NOFIXFNSLST F 5 NOFIXVARSLST) SiTU(21 \DWIMIFYBLOCK/DWMFY2 5 \DWIMIFYBLOCK/DWMFY2) (18 NOFIXVARSLST0 14 NOFIXFNSLST0) () DWIMIFY2AA0014 D1 (L (1 Y 0 X)) A lm (10 SUBSTRING 3 RETDWIM2) NIL () DWIMIFY2AA0015 D1 (L (1 Y 0 X)) @d@AA o (26 CONCAT 19 MKSTRING 16 RETDWIM2) NIL ( 23 ")") DWIMIFY2A D1 (L (1 $TYP 0 $TAIL)) @Agg@ (12 CLISPFUNCTION?) (7 DWIMIFY2AA0015 4 DWIMIFY2AA0014) () DWIMIFYFNS D1 (L (0 FNS) F 3 NOFIXFNSLST F 4 NOFIXVARSLST F 5 DWIMFLG) xj ST0@d_dg@hg Lg BU@lF`h@ @g @ !g@g d IHhZH&J(100 DWIMIFY0 93 STKEVAL 80 FILEFNSLST 74 GETPROP 64 MISSPELLED? 46 EVALV 37 STKEVAL 3 CLOCK) (90 INTERNAL 85 DWIMIFYFNS 71 FILE 58 FILELST 43 DWIMIFYFNS 34 INTERNAL 28 DWIMIFYFNS 12 NOFIXVARSLST0 8 NOFIXFNSLST0) () \DWIMIFYBLOCK/DWMFY0 D1 (P 2 DWIMIFYCHANGE P 1 DWIMIFYFLG P 0 DWIMIFYING F 3 FORMSFLG F 4 TAIL F 5 PARENT F 6 DWIMIFYFLG F 7 DWIMIFYING F 8 ONEFLG F 9 CLISPCONTEXT F 10 SUBPARENT) $VWiSTdUW TUWSW J(32 DWIMIFY2 20 DWIMIFY1) NIL () \DWIMIFYBLOCK/DWMFY1 D1 (L (0 FORM) P 11 VARS P 10 NEXTAIL P 5 ATTEMPTFLG P 4 89CHANGE P 3 CLISPCHANGE F 15 VARS F 16 FORMSFLG) O@ @tHhZi Jd8Id/H`HZgJgI `h^lI  Hddd Hd oJHOHg OOHdH W"HOhMWiWMoH lm oH o hi WdW WW <(762 DWIMIFY1 753 /RPLNODE 740 FIXSPELL1 735 CONCAT 728 MKSTRING 725 RETDWIM2 717 CONCAT 714 SUBSTRING 707 RETDWIM2 674 /RPLNODE 658 DWIMIFY2A 557 GETPROP 541 DWIMIFY1A 518 EXPRP 457 \DEFINEDP 414 DWIMIFY1A 387 GETPROP 363 \DWIMIFYBLOCK/WTFIX0 331 GETPROP 304 DWIMIFY2A 243 DWIMIFY2A 220 CLISPNOTVARP 207 LISPXPRINT 201 LISPXPRIN1 192 LISPXSPACES 186 FIXPRINTIN 177 STRPOSL 134 GETPROP 116 /RPLNODE 74 DWIMIFY1) (655 QUIET 606 FORWORD 597 FOR1 566 NOFIXVARSLST0 562 NOFIXVARSLST0 554 CLISPTYPE 549 CLISPFLG 531 COMMENTFLG 524 E 511 NORUNONS 498 IFWORD 487 FOR1 464 FORWORD 384 CLISPWORD 328 CLISPWORD 318 FOR1 301 QUIET 275 FORWORD 259 FORWORD 240 QUIET 173 CLISPCHARRAY 165 NOFIXVARSLST0 157 DWIMCHECKPROGLABELSFLG 149 CLLABELS 139 CLLABELS 131 INFO 100 NLAMBDA 94 LAMBDA 68 LINEAR 37 DWIMEQUIVLST) ( 732 ")" 721 "... " 703 "... " 643 "" 197 "suspicious prog label: ") \DWIMIFYBLOCK/FIX89 D1 (L (2 POS 1 N 0 FORM) F 3 FAULTX F 4 TAIL F 5 EXPR) `A`gg!SYIl T BSA hUg@ZJl gg@ihHhBhhhhh gi h(92 LISPXPRINT 85 EDITE 51 \TYPEMASK.UFN 35 \DWIMIFYBLOCK/FIX89A 24 \TYPEMASK.UFN) (88 couldn't 59 F= 55 F 42 ORR 12 FIX9 8 FIX8 3 LPARKEY) () \DWIMIFYBLOCK/FIX89A D1 (L (2 POS 1 N 0 X) F 0 CHARLST F 1 TYPE-IN? F 2 DWIMIFYFLG F 3 ATTEMPTFLG) ]@&BA@ b@dkBk oA`obo @Bk ohPQhg iRich(80 FIXSPELL1 59 SUBSTRING 52 CONCAT 22 SUBSTRING 10 STRPOS) (76 MUSTAPPROVE 32 LPARKEY) ( 65 "" 49 " )" 38 " (" 28 "") \DWIMIFYBLOCK/FIX89TYPEIN D1 (L (2 APPLYFLG 1 CLST 0 X) F 1 FAULTARGS F 2 FAULTPOS F 3 FAULTX) ]gi @A @ Xid RHBSQdh /BQScRA@ id i@dQh Q h(89 \DWIMIFYBLOCK/RETDWIM 84 PACK 68 PRINT 63 PACK 60 LDIFF 42 \DWIMIFYBLOCK/RETDWIM 25 PRINT 19 PACK 9 PRIN1) (5 =) () \DWIMIFYBLOCK/FIXAPPLY D1 (P 2 TYPE-IN? F 3 FAULTX F 4 FAULTPOS F 5 TYPE-IN? F 6 CHARLST F 7 FAULTARGS F 8 FAULTFN F 9 FAULTXX F 10 FILEPKGFLG F 11 HISTENTRY F 12 NOSPELLFLG F 13 FAULTAPPLYFLG) ,  WShc Sdl+ X$H WSdlg SXSg Sg S ShcSg Y+UO`2`S )VSWhYdi XTH - SXUWiWW`VYd\d h$m `Ld`Lhoh]N.M_^O [`@gWWWg ^Mg``U``FK`ooJdg`oog`ooiJ Jgi@iW@kI cd @lI ch(281 NLEFT 266 NLEFT 236 FIXSPELL1 230 SHOULDNT 142 LAST 110 APPLY 61 NTHCHAR 51 RETDWIM2 36 LDIFF 30 TAILP 17 RETDWIM2) (253 NOFIXVARSLST0 241 NEEDNOTAPPROVE 216 LCASEFLG 211 MUSTAPPROVE 195 LCASEFLG 188 NEEDNOTAPPROVE 173 LCASEFLG 167 CLISPHELPFLG 163 TREATASCLISPFLG 158 CLISPHELPFLG 154 TREATASCLISPFLG 150 MUSTAPPROVE 138 NEEDNOTAPPROVE 123 PROBABLY 114 TREATASCLISPFLG 73 CLISPCHARS 64 CLISPCHARS 22 CONCAT) ( 226 " TREAT" 221 " treat" 206 " TREATED" 200 " treated" 183 " AS CLISP" 178 " as clisp" 86 " ") \DWIMIFYBLOCK/SHRIEKER D1 (L (0 LOOKAT) F 4 WORKFLAG F 5 NCONCLKUP F 6 NCONC1LKUP) W@@dl @hc@@bHdgg@dX@bHg'@d X@bd Yd@gcUHh@ YdgcgHhZJl gcgHIhTgcgHIhdgHI IdgdgdgdggcgHIhdggcHI IggcgHIhgHIh@gcgHh YTgcgHhdgdgdgdggcgHIhdgHI IdgdggcgHIhgHIh[Kl gcUHIhTgcUHIhdgdgdggcUHIhdggcUHIgIhdggcUHIhdggcHI Ig"IgcVHIhgcUHIhUHIh(549 ATTACH 413 \TYPEMASK.UFN 361 ATTACH 290 \DWIMIFYBLOCK/SHRIEKER 236 ATTACH 175 ATTACH 128 \TYPEMASK.UFN 103 \DWIMIFYBLOCK/SHRIEKER 80 \DWIMIFYBLOCK/SHRIEKER 10 \TYPEMASK.UFN) (579 NCONCING 564 NCONC1ING 554 LISTING 541 NCONCING 535 !!IT 519 NCONCING 513 !IT 499 LIST 489 NCONCING 482 NCONC1ING 468 NCONCING 462 CONSING 456 APPENDING 447 NCONCING 433 NCONCING 417 NCONCING 398 CONS 385 CONS 380 CONSING 373 !IT 367 !!IT 352 LISTING 341 CONS 336 CONSING 330 NCONC1ING 324 NCONCING 318 APPENDING 311 CONSING 302 LIST 297 LISTING 282 LIST 277 LISTING 264 APPEND 252 APPEND 247 APPENDING 241 !!IT 228 APPENDING 222 !IT 211 APPEND 206 APPENDING 200 NCONC1ING 194 LISTING 188 CONSING 181 NCONCING 166 APPENDING 155 APPEND 150 APPENDING 137 APPEND 132 APPENDING 115 APPEND 110 !IT 91 !!IT 59 ! 38 ! 32 !!) () \DWIMIFYBLOCK/STOPSCAN? D1 (L (3 OPRFLAG 2 OPR 1 CLTYP1 0 CLTYP2) F 1 BRACKETCNT F 2 BROADSCOPE F 3 BRACKET F 4 CLTYP) @ARQjQQ @g`h@g>BSCQkBg AgQjQ{Q QjQmQ gBg CAHh Hl iAA@Hh Hl i@@i@$@AHh Hl iAA@ch(206 \TYPEMASK.UFN 171 \TYPEMASK.UFN 147 \TYPEMASK.UFN 129 GETPROP 120 \FZEROP 106 \FZEROP 76 GETP 29 \FZEROP) (126 UNARYOP 81 BRACKET 73 UNARYOP 44 BRACKET 35 BRACKET) () WTFIX D1 (P 9 DWIMIFYFLG P 8 ONLYSPELLFLG P 7 FORMSFLG P 6 SUBPARENT P 5 PARENT P 4 TAIL P 3 VARS P 2 EXPR P 1 FAULTFN P 0 FAULTPOS I 2 FAULTAPPLYFLG I 1 FAULTARGS I 0 FAULTX)   (5 WTFIX1) NIL () \DWIMIFYBLOCK/WTFIX0 D1 (P 3 FAULTAPPLYFLG P 2 FAULTARGS P 1 DWIMIFYFLG P 0 FAULTPOS I 4 ONLYSPELLFLG I 3 SUBPARENT I 2 PARENT I 1 TAIL I 0 FAULTX F 4 DWIMIFYFLG F 5 DWIMIFYING F 6 FAULTPOS) TUVhi"(13 WTFIX1) NIL () WTFIX1A0020A0021 D1 (NAME ERRORSET F 0 FAULTX F 1 FAULTFN) PQ i(4 CLISPDEC0) NIL () WTFIX1A0020A0022A0023 D1 (NAME ERRORSET F 0 FAULTEM1 F 1 FAULTFN) PQ i(5 CLISPDEC0) NIL () WTFIX1A0020A0022A0024 D1 (NAME ERRORSET F 0 FAULTEM1) iP hh(8 DWIMIFY1?) (3 CLISPFLG) () WTFIX1A0020A0022 D1 (NAME ERRORSET P 0 EXPR F 3 FAULTEM1 F 4 FAULTX F 5 RESETVARSLST F 6 TYPE-IN? F 7 HISTENTRY) `VhSdgT dgT chcdgTd gT!Tcdgoi S`ScSSS cg`Uc Yog IJdUIc U UkJ IT TS STkIchh(210 CLISPTRAN 204 CLISPELL 199 ERROR! 191 NLEFT 184 TAILP 162 WTFIX1A0020A0022A0024 136 \APPEND2 109 WTFIX1A0020A0022A0023 72 CLISPTRAN 69 MAKEMATCH 48 \DWIMIFYBLOCK/CLISPIF 34 \DWIMIFYBLOCK/RETDWIM 25 CLISPFOR) (168 CLISPFLG 159 INTERNAL 145 CLISPFLG 142 CLISPFLG 117 COMMENTFLG 98 CLISP: 78 PREFIXFN 61 MATCHWORD 41 IFWORD 17 FORWORD 10 LCASEFLG 2 LCASEFLG) ( 156 (WTFIX1A0020A0022A0024) 105 (WTFIX1A0020A0022A0023)) WTFIX1A0020 D1 (NAME ERRORSET L (0 NIL) P 17 CLISPERTYPE P 16 TYPE-IN? P 15 FAULTFN P 11 CLISPERTYPE P 10 SIDES P 9 CLISPCHANGES P 8 FIXCLK P 7 HISTENTRY P 6 NEWTAIL P 5 FAULTEM1 P 4 CHARLST P 3 FAULTXX P 2 BREAKFLG P 1 TYPE-IN? F 18 FAULTX F 19 DWIMIFYFLG F 20 FAULTAPPLYFLG F 21 FAULTPOS F 22 RESETVARSLST F 23 FAULTFN F 24 CLISPCONTEXT F 25 NOSPELLFLG F 26 CLISPCHANGE F 27 DWIM.GIVE.UP.TIME F 28 DWIM.GIVE.UP.INTERVAL F 29 VARS F 30 PARENT F 31 EXPR F 32 FAULTARGS F 33 LISPXHIST F 34 FILEPKGFLG F 35 TAIL) W2W6l W8W&W.gYHl _W(gg c*`iW*`mW* i c.JW>]d c:IgWB _I2W&.W(W$`W$`W$``_W(W$W$d[lK` W(W$lW(I-KO%W2i`L]``K ML `LW$]lMg Mk ]`rMg MgbW$`  g LW$ DW$ ;W$ &W$W$ WDOlOg i$iL8W$dgnW$ggW$MW$d)AW$d_diOlih!W$W$ W$g W$ghW$h goi ic$[W$g ],g`W,c,__og OOdW,Oc,W, W,kO OW&1ic4*W$g W$g W$ hc. W$g ]W$ LW$d ]`W$] HW&W$W$ ~dlM3jMW$ Mg M` ]`MW$W$i ]KW$r`W$` bW&K` hc4|L IBHW$W$W$ )`d ]hW(W*MiW@ W*M HLXW$h`hW$hddi W&`W$h`hW$hddi [&OW$OW$O h_K `W&3W$.W0)W$h`hW$hddi W$` WFW< ]d`gOcO_W$]XMlQMh`hW&W0W$hddi ]5W&W0g oi MW$W$i ]Mc$W*W$ hh(1237 \DWIMIFYBLOCK/RETDWIM 1233 \DWIMIFYBLOCK/RETDWIM 1219 \DWIMIFYBLOCK/CLISPATOM 1205 RETEVAL 1197 \DWIMIFYBLOCK/RETDWIM0 1180 FIXSPELL 1125 \DWIMIFYBLOCK/CLISPATOM 1118 DUNPACK 1107 FIXSPELL 1061 \DEFINEDP 1052 /RPLNODE 1029 FIXSPELL 1000 FIXSPELL 971 \DWIMIFYBLOCK/RETDWIM 962 \DWIMIFYBLOCK/RETDWIM 941 EVAL 928 \DWIMIFYBLOCK/FIXLAMBDA 903 \DWIMIFYBLOCK/RETDWIM 896 WTFIXLOADEF 882 DUNPACK 867 GETHASH 843 \DWIMIFYBLOCK/CLISPATOM 825 DUNPACK 817 GETPROP 808 \DWIMIFYBLOCK/CLBINARYMINUS? 780 \DWIMIFYBLOCK/FIXLAMBDA 737 \DWIMIFYBLOCK/CLISPATOM 729 CLISPNOTVARP 716 GETPROP 700 DWIMUNSAVEDEF 693 GETPROP 683 GETPROP 661 ERROR! 652 NLEFT 643 TAILP 615 WTFIX1A0020A0022 581 GETPROP 566 WTFIX1A0020A0021 550 /RPLNODE 530 CLISPFUNCTION? 519 MEMB 516 FREEVARS 418 MARKASCHANGED 398 \DWIMIFYBLOCK/FIXLAMBDA 395 GETD 379 \DEFINEDP 371 CLISPNOTVARP 362 CLISPNOTVARP 354 GETPROP 348 PACK 344 DUNPACK 325 GETPROP 311 NTHCHAR 305 GETPROP 269 \DWIMIFYBLOCK/FIX89TYPEIN 263 STRPOSL 223 SHOULDNT 219 \DWIMIFYBLOCK/FIXAPPLY 209 SHOULDNT 205 \DWIMIFYBLOCK/FIXATOM 190 DUNPACK 108 MEMB 95 \DWIMIFYBLOCK/GETVARS 80 FINDFN 76 FSTKNTH 50 STKPOS 34 CLOCK 10 \CLOCK0) (1194 CLISPATOM1 1160 CLISPINFIXSPLST 1131 CLISPFLG 1115 WTFIXCHCONLST 1096 CLISPISWORDSPLST 1071 CLISPFLG 1018 NOFIXFNSLST0 1009 NOFIXFNSLST0 989 SPELLINGS2 935 DWIMUSERFORMS 879 WTFIXCHCONLST 864 CLISPARRAY 858 CLISPARRAY 830 CLISPCHARS 822 WTFIXCHCONLST1 814 CLISPTYPE 747 CLISPFLG 713 FILEDEF 690 CODE 680 EXPR 622 LCASEFLG 612 INTERNAL 594 LCASEFLG 591 LCASEFLG 578 CLISPWORD 556 CLISP: 538 X 527 OKVAR 454 LAMBDA 451 FUNCTION 442 F/L 415 FNS 351 CLISPTYPE 341 WTFIXCHCONLST1 331 ~ 322 UNARYOP 315 CLISPCHARS 302 CLISPTYPE 276 CLISPFLG 259 CLISPCHARRAY 255 CLISPFLG 247 LPARKEY 187 WTFIXCHCONLST 160 LISPXHISTORY 152 LISPXHISTORY 141 LISPXHISTORY 129 LISPXHISTORY 103 SIDE 68 CLEARSTKLST 64 CLEARSTKLST 56 CLEARSTKLST 47 FAULTEVAL 43 FAULTAPPLY 25 TYPE-IN) ( 1201 (PROGN (SETQ CLISPRESPELL T) NIL) 609 (WTFIX1A0020A0022) 562 (WTFIX1A0020A0021)) WTFIX1 D1 (P 0 *LAST-CONDITION* F 1 DWIMFLG) Qoig o(16 WTFIX1A0020) (13 WTFIX) ( 22 (SELECTQ (CAR (ERRORN)) (1 (* NORMAL ERROR! FROM RETDWIM0) NIL) (47 (* CONTROL-E) (ERROR!)) (ERRORX)) 9 (WTFIX1A0020)) EXPRCHECK D1 (P 0 D I 0 X F 1 DWIMFLG F 2 ADDSPELLFLG) d@dlo ;i X 1@ 7Q@lF`hdg X @o b X R@j @H@o h(96 ERROR 83 ADDSPELL 75 EXPRP 71 VIRGINFN 64 ERROR 53 MISSPELLED? 33 \DEFINEDP 27 EXPRP 23 VIRGINFN 16 ERROR) (49 GETD 44 USERWORDS) ( 93 "not an expr." 61 "not defined." 13 "not a function.") CLISPNOEVAL D1 (P 0 TEM I 1 DEFAULT I 0 FN F 3 MACROPROPS) 0@`X@ dkdliUbC@d`Id`Bg @S A/`@g Yg:I6gI/ii@d``@g ZgJ gJih(119 GETPROP 77 GETPROP 61 GETLIS 55 GETPROP 14 ARGTYPE) (133 EVAL 123 EVAL 116 INFO 109 NLAML 104 NLAMA 91 NOEVAL 81 NOEVAL 74 INFO 68 DWIMINMACROSFLG 52 MACRO-FN 46 NLAML 39 NLAMA 6 DWIMEQUIVLST) () DWIMERRORRETURN D1 (I 0 ARG F 0 CLISPERTYPE) @@c(8 ERROR!) NIL () DWIMARKASCHANGED D1 (P 0 L I 1 $SIDES I 0 FN F 1 LISPXHIST) W@lPgQ HHdAhdgdgdgHX߿@gggQ gg (84 MARKASCHANGED 70 MEMB 13 MEMB) (81 CLISP 77 CHANGED 66 *LISPXPRINT* 63 CLISP% 60 FNS 47 * 41 CLISPRPLNODE 35 /PUTHASH 9 SIDE) () FIXPRINTIN D1 (P 0 LISPXHIST I 1 FLG I 0 FN F 1 LISPXHIST F 2 DWIMIFYFLG F 3 DWIMIFYING F 4 FAULTAPPLYFLG) _@d[ghSAQi jki oi RST`oo`ooi @id oi @(91 LISPXPRIN1 83 LISPXPRIN2 77 LISPXPRIN1 39 LISPXPRIN1 30 LISPXSPACES 22 POSITION) (63 LCASEFLG 48 LCASEFLG 6 TYPE-IN) ( 87 "}" 73 "BELOW " 68 "below " 59 "IN " 53 "in " 35 "{") CLISPFUNCTION? D1 (P 1 CHRLST P 0 TEM I 4 Y I 3 FN2 I 2 FN1 I 1 TYPE I 0 TL F 2 TYPE-IN? F 3 NOSPELLFLG F 4 DWIMIFYFLG F 5 NOFIXFNSLST)  @lhAdEg@ @ L@T`U@@g 5SiSR`@ @ @h`BgB@i XBdAgHu`rRoo@DlB RH@DlCoH@HHo hiBHgHg HBH@HH@@H@ @(235 /RPLNODE 208 FIXSPELL1 186 CONCAT 148 CONCAT 105 MISSPELLED? 83 UNPACK 76 STRPOSL 55 GETPROP 33 CLISP-SIMPLE-FUNCTION-P 26 CLISPNOTVARP) (204 n 197 MUSTAPPROVE 124 CLISPHELPFLG 116 QUIET 96 NO-MESSAGE 90 SPELLINGS2 71 CLISPCHARRAY 52 CLISPWORD 42 NOFIXFNSLST0 19 NOTVAR) ( 183 "' meant to be used as a function" 167 "is '" 137 "in ... " 132 "") CLISPNOTVARP D1 (I 0 X F 0 DWIMIFYFLG F 1 VARS F 2 NOFIXVARSLST F 3 SPECVARS F 4 DWIMIFYING F 5 FAULTPOS F 6 LOCALVARS) Q@ hI@QhB@P`Rh5PT@U h%@g h@`h@Vh@Sh(50 GETPROP 39 RELSTK 36 STKSCAN 3 BOUNDP) (58 GLOBALVARS 47 GLOBALVAR 20 NOFIXVARSLST0) () CLISP-SIMPLE-FUNCTION-P D1 (I 0 CARFORM) ,@ %@g'@g'@ @` i(38 GETLIS 30 CLMACRO-FUNCTION 3 \DEFINEDP) (35 COMPILERMACROPROPS 24 CLISPWORD 13 EXPR) () CLISPELL D1 (P 3 X P 2 RESPELLTAIL P 1 TEM P 0 VAL I 1 TYPE I 0 FORM F 4 LISPXHIST) D@gT 2d[@Z(KYJIIJJIJ AJg AiH(54 GETPROP 43 /RPLNODE 9 MEMB) (51 CLISPWORD 5 RESPELLS) () FINDFN D1 (P 2 TEM P 1 TOKEN P 0 NAME I 1 FLG I 0 POS F 3 EXPR F 4 TYPE-IN? F 5 BREAKFLG F 6 TAIL) 0@ k bd XgHdgl?g(m@ XgHg*lm@ Z J HgHdg#l@ YgIdgTm@d gAd@ ZcJ]HgHdglAg(m@ XgHg,lm@ Z J HgHdgl@ k@ cIgIdgm@d H c HgIggAic icgIdgAic ggPg@ Bgm@ @ mJd b XlBHg Z{Hg nJjgFISIc g7icg.gm@h@ 5IcAl@ ck@ k@ c@ (504 RELSTK 497 STKARG 491 STKARG 483 STKARG 468 REALSTKNTH 415 GETPROP 403 GETPROP 389 STKNAME 384 STKNTH 376 RELSTK 371 STKPOS 360 EVALV 281 EXPRP 276 GETD 269 STKNTH 244 STKARG 238 STKARG 212 RELSTK 208 STKARG 204 STKNTH 183 STKNTHNAME 143 STKARGS 126 STKNTH 102 STKARG 78 RELSTK 74 STKARG 70 STKNTH 49 STKNTHNAME 19 STKNAME 9 STKNTH) (458 INTERNAL 453 TYPE-IN 444 EVAL 429 BREAK-EXP 412 ALIAS 400 BROKEN 365 BREAK1 356 BRKTYPE 350 BREAK-EXP 344 BREAKCOMS 332 BREAK 324 TYPE-IN 309 : 303 EVAL 292 INTERNAL 258 SELECTQ 251 SKIP 226 RETEVAL 219 STKEVAL 193 STKEVAL 187 RETEVAL 174 ENVEVAL 164 \SAFEEVAL 157 EVAL 131 APPLY* 113 SELECTQ 106 SKIP 92 RETAPPLY 85 STKAPPLY 59 STKAPPLY 53 RETAPPLY 40 ENVAPPLY 30 BLKAPPLY 23 APPLY) () DWIMUNSAVEDEF D1 (I 1 FLG I 0 FN F 0 SIDES F 1 TYPE-IN? F 2 LISPXHIST) C@id A*Q'Pgg`gR  Phhcoi i @ (64 UNSAVEDEF 60 LISPXTERPRI 56 LISPXPRIN1 37 FLAST 32 MEMB 5 LISPXPRIN2) (28 *LISPXPRINT* 25 COMMENTFLG 22 CLISP% 16 CLISP% ) ( 52 " unsaved") CHECKTRAN D1 (L (0 X)) `@` ` @`@(10 GETHASH) (22 CLISPTRANFLG 15 CLISPTRANFLG 7 CLISPARRAY 2 CLISPARRAY) () CLISPRPLNODE D1 (I 2 D I 1 A I 0 X F 0 LISPXHIST) ,@Pg@d@h @A@dBl@h (41 ERRORX 22 UNDOSAVE) (9 CLISPRPLNODE) () (PRETTYCOMPRINT DWIMIFYCOMS) (RPAQQ DWIMIFYCOMS ((FNS DWIMIFYFNS DWIMIFY DWIMIFY0 DWIMIFY0? DWMFY0 DWIMIFY1 DWIMIFY1? DWMFY1 DWIMIFY1A DWIMIFY2 DWIMIFY2? DWMFY2 DWIMIFY2A CLISPANGLEBRACKETS SHRIEKER CLISPRESPELL EXPRCHECK) (FNS CLISPATOM0 CLISPATOM1 CLRPLNODE STOPSCAN? CLUNARYMINUS? CLBINARYMINUS? CLISPATOM1A CLISPATOM1B CLISPATOM2 CLISPNOEVAL CLISPLOOKUP CLISPATOM2A CLISPBROADSCOPE CLISPBROADSCOPE1 CLISPATOM2C CLISPATOM2D CLISPCAR/CDR CLISPCAR/CDR1 CLISPCAR/CDR2 CLISPATOMIS1 CLISPATOMARE1 CLISPATOMARE2 CLISPATOMIS2) (FNS WTFIX WTFIX0 WTFIX1 RETDWIM DWIMERRORRETURN DWIMARKASCHANGED RETDWIM0 RETDWIM1 FIX89TYPEIN FIXLAMBDA FIXAPPLY FIXATOM FIXATOM1 FIXCONTINUE FIXCONTINUE1 CLISPATOM GETVARS GETVARS1 FIX89 FIXPRINTIN FIX89A CLISPFUNCTION? CLISPNOTVARP CLISP-SIMPLE-FUNCTION-P CLISPELL FINDFN DWIMUNSAVEDEF CHECKTRAN) (FNS CLISPIF CLISPIF0 CLISPIF1 CLISPIF2 CLISPIF3) (FNS CLISPFOR CLISPFOR0 CLISPFOR0A CLISPFOR1 CLISPRPLNODE CLISPFOR2 CLISPFOR3 CLISPFORVARS CLISPFORVARS1 CLISPFOR4 CLISPFORF/L CLISPDSUBST GETDUMMYVAR CLISPFORINITVAR) (COMS (FNS \DURATIONTRAN \CLISPKEYWORDPROCESS)) (BLOCKS ( FORBLOCK (ENTRIES CLISPFOR) CLISPFORVARS CLISPFOR0 CLISPFOR2 CLISPFORINITVAR CLISPDSUBST \CLISPKEYWORDPROCESS CLISPFORF/L CLISPFOR4 CLISPFORVARS1 CLISPFOR3 CLISPFOR1 CLISPFOR0A CLISPFOR \DURATIONTRAN (SPECVARS CLISPRESPELL UNDOSIDE LISPXHIST BODY I.S.TYPE1 I.S.TYPE TERMINATEFLG FIRSTI.V. I.V. PROGVARS MAKEPROGFLG IVINITFLG INITVARS UNDOLST DWIMIFYING VARS DWIMIFYCHANGE DUMMYVARS I.S.OPRSLST CLISPCONTEXT UNDOSIDE0 EXP)) (DWIMIFYBLOCK CLBINARYMINUS? CLISPANGLEBRACKETS CLISPATOM CLISPATOM0 CLISPATOM1 CLISPATOM1A CLISPATOM1B CLISPATOM2 CLISPATOM2A CLISPATOM2C CLISPATOM2D CLISPATOMARE1 CLISPATOMARE2 CLISPATOMIS1 CLISPATOMIS2 CLISPBROADSCOPE CLISPBROADSCOPE1 CLISPCAR/CDR CLISPCAR/CDR1 CLISPCAR/CDR2 CLISPIF CLISPIF0 CLISPIF1 CLISPIF2 CLISPIF3 CLISPLOOKUP CLISPRESPELL CLRPLNODE CLUNARYMINUS? DWIMIFY DWIMIFY0 DWIMIFY0? DWIMIFY1 DWIMIFY1? DWIMIFY1A DWIMIFY2 DWIMIFY2? DWIMIFY2A DWIMIFYFNS DWMFY0 DWMFY1 DWMFY2 FIX89 FIX89A FIX89TYPEIN FIXAPPLY FIXATOM FIXATOM1 FIXCONTINUE FIXCONTINUE1 FIXLAMBDA GETDUMMYVAR GETVARS GETVARS1 RETDWIM RETDWIM0 RETDWIM1 SHRIEKER STOPSCAN? WTFIX WTFIX0 WTFIX1 (ENTRIES WTFIX WTFIX1 DWIMIFYFNS DWIMIFY DWIMIFY0 DWIMIFY0? DWIMIFY1A GETDUMMYVAR DWIMIFY2 DWIMIFY2? DWIMIFY1? DWIMIFY1 DWIMIFY2A CLISPLOOKUP) (SPECVARS 89CHANGE 89FLG BRACKET BRACKETCNT ATTEMPTFLG BACKUPFLG BODY BREAKFLG BROADSCOPE CLISPCHANGE CLISPCHANGES CLISPCONTEXT CLISPERTYPE CLISPRESPELL CLTYP CURRTAIL DWIMIFYCHANGE DWIMIFY0CHANGE DWIMIFYFLG DWIMIFYING ENDTAIL EXP EXPR FAULTAPPLYFLG FAULTARGS FAULTFN FAULTPOS FAULTX FAULTXX FIRSTI.V. FIXCLK FORMSFLG I.S.TYPE I.S.TYPE1 HISTENTRY I.S. I.V. INITVARS IVINITFLG LISPFN CHARLST MAKEPROGFLG NCONC1LKUP NCONCLKUP NEGFLG NEWTAIL NEXTAIL SUBPARENT NOFIX89 NOSAVEFLG ONEFLG ONLYSPELLFLG PARENT SIDES TAIL TENTATIVE TERMINATEFLG TYP TYPE-IN? UNDOLST UNDOSIDE UNDOSIDE0 VAR1 VAR2 VARS WORKFLAG UNARYFLG DEST FOR I.S.OPRSLST PROGVARS))) (GLOBALVARS DWIMINMACROSFLG CHECKCARATOMFLG TREATASCLISPFLG CLISPHELPFLG CLISPIFTRANFLG CLISPRETRANFLG DWIMCHECKPROGLABELSFLG DWIMCHECK#ARGSFLG SHALLOWFLG PRETTYTRANFLG CLEARSTKLST LCASEFLG LAMBDASPLST DURATIONCLISPWORDS NLAML NLAMA CLISPTRANFLG CLISPIFWORDSPLST LPARKEY DWIMUSERFORMS DWIMKEYLST SPELLINGS3 SPELLINGS1 CLISPARRAY CLISPFLG CLISPCHARS CLISPISNOISEWORDS CLISPLASTSUB CLISPISWORDSPLST CLISPCHARRAY CLISPINFIXSPLST OKREEVALST WTFIXCHCONLST1 WTFIXCHCONLST RPARKEY GLOBALVARS NOFIXFNSLST0 NOFIXVARSLST0 LISPXHISTORY DWIMEQUIVLST COMMENTFLG USERWORDS SPELLINGS2 FILELST CLISPFORWORDSPLST CLISPDUMMYFORVARS LASTWORD COMPILERMACROPROPS) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY (ADDVARS (NLAML BREAK1))) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA DWIMIFYFNS) (NLAML) (LAMA))) (INITVARS (DWIM.GIVE.UP.TIME) ( DWIM.GIVE.UP.INTERVAL 2000)))) (RPAQ? DWIM.GIVE.UP.TIME) (RPAQ? DWIM.GIVE.UP.INTERVAL 2000) (PUTPROPS DWIMIFY COPYRIGHT ("Xerox Corporation" T 1978 1984 1985 1986)) NIL