(FILECREATED "12-Sep-86 19:35:54" ("compiled on " {ERIS}SOURCES>DWIMIFY.;38) "11-Sep-86 13:49:06" bcompl'd in "Xerox Lisp 11-Sep-86 ..." dated "11-Sep-86 14:05:48") (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 11Q VARS F 12Q I.S.TYPE F 13Q MAKEPROGFLG F 14Q LEFT.ARROWS.BITTABLE F 15Q I.V. F 16Q INITVARS F 17Q UNDOLST F 20Q FIRSTI.V. F 21Q LEFT.ARROW F 22Q IVINITFLG) ö g@½@[\¿LdMð’±šlð²PLdgð¦dgð²¿LgLLh¿Ld°É¿`¢±çWL ¢±ÜLKhid Y¢±ÎI±ËLd¢±¾dgð’±¶dgð’±dgð¥dgð¿LLi±“¿Ldgð©gð²L³LgLL±ÿC`²AL_µh°lð²+WO ²!i²#LMKð ¿Ld²4d³/d°'O°ÅLKð›MLð–Li W¢±fLW ‚ ¿L\±þÚ¿h¤h½K€K\dMð²¿O²@gð©W¦Occ ¿N dgð¥dgð’¿i¿h™iZc¿L\°$Ldgð¥dgð’¿i¿h´iZc¿LºLYd²3dlð²,Wc¿O³I_¿@gð—@O&¿J’±·IN^±¯dgð¥dgð“¿i°)dgð¦dgð²¿Ig¿IgIh¿i¿h²nic¿IWc¿O³6I_¿@dgð³%dgð•¿ic$°gð›@Oih…g ¿J—IWc¿„IN¾LIW"IhLWc…Ih ¿L±þºLgLL¿L½@gLc@h@¿LKð¢±þKd¢±þ†dgð³%dgð³dgð³dgð®dgð¨dgð¢±þQ¿i±þN(1233Q /RPLNODE 1211Q CLISPFORERR 1133Q SHOULDNT 547Q DREVERSE 466Q CLISPFORERR 462Q CLISPFORERR 445Q \FORBLOCK/CLISPFORVARS1 376Q \FORBLOCK/CLISPFORVARS1 360Q STRPOSL 243Q DWIMIFY2 147Q DWIMIFY2 132Q STRPOSL) (1352Q SAVESETQQ 1344Q SAVESETQ 1336Q old 1327Q OLD 1320Q SETQQ 1311Q SETQ 1242Q I.S.TYPE 1223Q DO 1130Q CLISPFORVARS 1107Q AS 1074Q FOR 1065Q BIND 1010Q QUOTE 1000Q SETQ 770Q SAVESETQQ 762Q SETQQ 750Q SAVESETQ 742Q SETQ 707Q AS 623Q old 615Q OLD 563Q old 555Q OLD 527Q BIND 325Q CLISPFLG 305Q SETQ 267Q ¬ 257Q _ 226Q SAVESETQ 220Q SETQ 207Q SAVESETQQ 176Q SETQQ 117Q CLISPFLG 67Q SETQ 57Q ¬ 51Q _ 2 FOR/BIND) () \FORBLOCK/CLISPFOR0 D1 (P 57Q VARS P 50Q I.S.OPRSLST P 33Q UNDOLST P 22Q TERMINATEFLG P 21Q MAKEPROGFLG P 20Q INITVARS P 17Q PROGVARS P 16Q IVINITFLG P 15Q FIRSTI.V. P 14Q I.V. P 13Q 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 63Q DWIMESSGAG F 64Q VARS F 65Q DWIMIFYFLG F 66Q NOFIXFNSLST F 67Q NOFIXVARSLST F 70Q HISTENTRY F 71Q LISPXHIST) –3@o`oWh ôð!Ð.Wj«Wl¿Wn¿H_dlð’±›±$¢± ONgð¢±`²"OHð²ONd¡_THð¨HOTH¿ONg gð’±ßNµ;ORµ*ONd³>_dgð³Y¿Ngð²cNdNð²5°?HN¸h_R¿±ÿq³ÅNHh ¿°»_g _Nµ‚±ÿ`±Ng¿Ogð¢±ÈgHh^±ËOg _RµOdg ²×¿@ ±+³OR¨hHh^±›OHh^±‘M³O_¿gH]h^±}Odgð² ¿HMð²O_¿MHH¿Nh±XOgð²9Hgð§Hgð²*O8³&O_¿gH]h¾gO_g¿O_8±MHg±Odgð³%dgð³dgð³dgð®dgð¨dgð¢±gð›gH_8h±»Odgð²"¿OBµOD_™OHg¿gH_>h±’gð²$O>µO@µOD_™OHg¿gH_Bh°iOdgð²%¿O>µO@µOB_™OHg¿gH_Dh°=gð² OBµOD_™OHg¿gH_@h°Ogð™gH_Fh…g ^O_²O<ONg¿ONh _¿Hd’±ƒ¿@Wpô¢±xgi ¿i ¿@i °Îgð²RO$³OBµODµO.µO@_$¿O8³ O<³O³O>©OB¦OD£O@´i __¿h_B_D_>_@_F¿gH_¨OB¥OD¢O@–i _¿O _µûMd²1d³+g _gð²Og gð’M€Mh€_¿O.³xO0³tM³Wf¨o@ ¿¿±ñO@³ZOB’±OD’±ŠWf³JO$³FOg ³9oi ¿02@°dhk_`¿Obµ O`h_d‚O`&_b¿µãOdid¿Ogð¢±Hgg X¢±:OH_X¿gOX _ _¿KO [±,O>³ÃO<³¿O³ºO ³¶O"³²OH³®OL³ªOJ³¦Ogð³Ogð©Odgð²¿O,³‰OD²OgOgh ’±ÿqOB²HOdgð•¿g°ngð”g°dOgð¨Odgðœ¿gOB °Hgð§Ogð²5g°6OD²,Odgð•¿g°$gð›gOD °Ogð“g…g OBµODOOO:h¸OF¢±FHOOBµODOFhOO:h ±"Oµ°`g Xµ g ¿Hgð–H H¸oOd—¿gO€OµOhHd• dgð” h_ ¿gO¨gO_¿gghh_2¿O<²wO_¿h_B_D_>_@_F¿Odgðš¿O_>¿°Jdgðš¿O_F¿°9dgðš¿O_B¿°(dgðš¿O_D¿°dgð™¿O_@¿„gð¦O_µ I_*¿OBµOD¢±OBµOD_gð¨Odgð™¿OBµOD°gð¨Ogð²;O_²3Odlð“_*°%gð§OgðžO_*O …g ³OD™O_*O ‹O*OhO_¿OO*ð²O.gO*hh _.¿°?O&gOOB²i_"¿O*go°O.gO*hh _.¿O*hh _&¿O(gO*OF²!OOBµODhO*dhOFh±ugO*h±hO>²OO_µ0OO> ¿i_¿O@¢±OFd3²¿jOFó¢±g±ªOO>h°Ñ²rggi OF hh_F¿gOggOhggOhgO OO@hhigO OO@hhhhh°+O>3 ² O@3 ²O@O>ýñšo_F¿g‚g_¿O³O gOkhh _ ¿O@ hO_¿O.Od®O OOhh _.¿OF¦O>£O@²=O(gOO>¬O@©OFd3²¿gO OOFµkhhh _(¿O<“OµYOHµ?O"§O.²O0´gO2_4¿gghh_2¿O0 _0²igO0d²T¿gO0°L _d gð²/¿O°/__¿O_¿O_¿IY’±ü‡o ±ü|O2 _2¿±ÿ}O2hh_0¿O. _.µ#O, _,µ O.²VgO.°Fd²¿gO,°d—¿gO.€O2_.¿°Ígghh_,¿O.šgO.O,h†gO,hO_¿gOO:´7g02O: °!d_ZOZ _`šObµuO`_d_b¿µàOdhO OLd’ gO&OJd’ OghO0O(gghhO4 X¿gWr _¿O6°) _bO`°‹d_\O\¿O\O\¿O\Oµ µâ@H @g¿°ð(6213Q CLISPTRAN 6137Q LAST 6122Q MEMB 6106Q \NCONC2 6103Q \NCONC2 6100Q \NCONC2 6074Q \NCONC2 6071Q \NCONC2 6066Q \NCONC2 6063Q \NCONC2 6060Q \NCONC2 6055Q \NCONC2 6052Q \NCONC2 6017Q \FORBLOCK/CLISPFOR3 6003Q \FORBLOCK/CLISPFOR3 5741Q LDIFF 5720Q DREVERSE 5540Q \FORBLOCK/CLISPFOR2 5527Q \FORBLOCK/CLISPFOR2 5500Q \NCONC2 5470Q CLISPFORERR 5406Q FLAST 5400Q \FORBLOCK/CLISPFOR3 5347Q \FORBLOCK/CLISPFOR2 5262Q \NCONC2 5231Q CLISPLOOKUP 5155Q \NCONC2 5136Q CLISPLOOKUP 5111Q WARNUSER 5104Q GETDUMMYVAR 5076Q \NCONC2 4742Q CLISPLOOKUP 4714Q CLISPLOOKUP 4634Q WARNUSER 4627Q GETDUMMYVAR 4532Q \FORBLOCK/CLISPFORINITVAR 4466Q SUBPAIR 4414Q \NCONC2 4376Q \NCONC2 4355Q SUBST 4315Q \NCONC2 4251Q \FORBLOCK/CLISPFORINITVAR 4233Q SHOULDNT 4224Q \FORBLOCK/CLISPFORINITVAR 3615Q \FORBLOCK/CLISPFOR4 3605Q \APPEND2 3572Q SUBPAIR 3567Q DWIMIFY1 3564Q COPY 3516Q EVAL 3477Q SHOULDNT 3466Q GETPROP 3447Q \NCONC2 3442Q \FORBLOCK/CLISPFORF/L 3431Q SUBST 3374Q \FORBLOCK/CLISPFORF/L 3353Q SHOULDNT 3330Q CLISPLOOKUP 3243Q CLISPLOOKUP 3151Q EDITFINDP 3022Q \APPEND2 3011Q \APPEND2 3002Q MEMB 2756Q GETPROP 2732Q PRINT 2672Q RETDWIM2 2654Q PRIN1 2642Q \FORBLOCK/CLISPFOR4 2637Q GETPROP 2573Q ERROR! 2567Q ERRORMESS1 2517Q GETPROP 2474Q GETPROP 2447Q \FORBLOCK/CLISPFOR1 2437Q GETDUMMYVAR 2377Q \FORBLOCK/CLISPFOR1 2340Q \APPEND2 2333Q \FORBLOCK/CLISPFORVARS 2315Q \APPEND2 2312Q \FORBLOCK/CLISPFORVARS 2246Q \FORBLOCK/CLISPFOR0A 2224Q \NCONC2 2215Q ERROR! 2211Q ERRORMESS1 2165Q ERROR! 2161Q ERRORMESS 1464Q GETDUMMYVAR 1372Q \NCONC2 1367Q READLINE 1361Q PEEKC 1354Q PRIN1 1321Q \NCONC2 1310Q CLISPFORERR 1257Q SHOULDNT 1214Q CLISPFORERR 1150Q CLISPFORERR 1074Q CLISPFORERR 1023Q CLISPFORERR 553Q /RPLNODE 435Q \FORBLOCK/\DURATIONTRAN 426Q GETP 410Q GETPROP 352Q CLISPFORERR 323Q GETPROP 305Q \NCONC2 262Q \FORBLOCK/CLISPFOR0A 166Q GETP 154Q /RPLNODE 20Q \APPEND2) (6220Q * 6115Q SIDE 6040Q $$LP 6035Q GO 6024Q $$ITERATE 6006Q $$LP 5710Q DECLARE 5677Q PROG 5661Q COND 5646Q COND 5627Q $$ITERATE 5624Q GO 5603Q OR 5567Q OR 5553Q COND 5413Q RETURN 5370Q OR 5356Q COND 5332Q $$OUT 5327Q GO 5316Q $$OUT 5224Q + 5177Q SETQ 5062Q SETQ 5046Q GT 5042Q LT 4735Q GT 4707Q LT 4676Q MINUSP 4673Q COND 4662Q ZEROP 4657Q OR 4651Q AND 4623Q SETQ 4620Q BY 4574Q LT 4474Q CDR 4424Q SETQ 4364Q NLISTP 4346Q VAR 4327Q SETQ 4303Q NLISTP 4230Q CLISPFOR0 4204Q SETQQ 4174Q SETQ 4141Q old 4131Q OLD 4111Q old 4101Q OLD 4034Q AS 4015Q TO 3774Q ON 3753Q IN 3732Q BY 3711Q FROM 3644Q $$VAL 3641Q RETURN 3630Q $$VAL 3621Q $$VAL 3577Q PROGN 3537Q PROGN 3506Q = 3474Q CLISPFOR0 3463Q I.S.OPR 3350Q CLISPFOR0 3344Q MAP 3337Q do 3321Q MAPCON 3314Q join 3307Q MAPLIST 3301Q collect 3265Q MAPC 3257Q do 3250Q DO 3234Q MAPCONC 3226Q join 3216Q JOIN 3207Q MAPCAR 3202Q collect 3175Q SUBSET 3167Q subset 3142Q & 3135Q SETQ 3114Q do 3104Q join 3074Q collect 2775Q BIND 2753Q I.S.OPR 2750Q fcollect 2740Q collect 2634Q I.S.OPR 2522Q MODIFIER 2514Q I.S.OPR 2503Q FORWORD 2471Q CLISPWORD 2354Q ON 2346Q IN 2323Q FOR 2300Q AS 2272Q BIND 2123Q MODIFIER 2101Q FIRST 2074Q first 2052Q EACHTIME 2045Q eachtime 2025Q FINALLY 2016Q finally 1773Q WHEN 1766Q when 1746Q UNLESS 1737Q unless 1714Q REPEATUNTIL 1707Q repeatuntil 1667Q REPEATWHILE 1660Q repeatwhile 1635Q UNTIL 1630Q until 1610Q WHILE 1601Q while 1556Q DECLARE 1551Q declare 1536Q BIND 1530Q bind 1510Q AS 1377Q as 1350Q ... 1305Q TWICE 1254Q CLISPFOR0 1242Q BY 1235Q by 1220Q TO 1211Q BOTH 1167Q to 1154Q ON 1145Q BOTH 1116Q on 1100Q IN 1071Q BOTH 1043Q in 1027Q FROM 1020Q BOTH 775Q from 756Q FOR 751Q for 741Q by 733Q to 725Q on 716Q in 707Q from 700Q for 667Q BOTH 647Q FOR 637Q I.S.TYPE 626Q I.S.TYPE 607Q suchthat 600Q SUCHTHAT 570Q thereis 524Q do 505Q I.S.TYPE 423Q \DURATIONTRAN 405Q I.S.OPR 370Q ORIGINAL 360Q original 347Q MISSING 320Q CLISPWORD 234Q ORIGINAL 223Q original 171Q MODIFIER 163Q I.S.OPR 113Q LCASEFLG 103Q FORWORD 47Q NOFIXVARSLST0 41Q NOFIXFNSLST0 7 CLISPDUMMYFORVARS) ( 5465Q "too many concurrent loops " 5034Q (BY -1) 4352Q (CAR (OR (LISTP VAR) (GO $$OUT))) 3526Q (BODY I.V.) 2650Q "Possible non-terminating iterative statement: " 2563Q "No DO, COLLECT, or JOIN in:" 2205Q "No operator in:" 13Q (I.V. BODY $$VAL) 4 ($$LST1 $$LST2 $$LST3 $$LST4 $$LST5 $$LST6)) \FORBLOCK/CLISPFOR2 D1 (L (1 FLG 0 LST)) t@ b°hdHdgðŸ¿HA³Md °Hdgð²¿HAšd °2H°*dgð¥dgðœ¿Hd °dgð¥dgð˜¿Hdµ™@(124Q NEGATE 70Q NEGATE 42Q NEGATE 3 DREVERSE) (140Q REPEATUNTIL 132Q UNTIL 107Q REPEATWHILE 101Q WHILE 50Q UNLESS 22Q WHEN) () \FORBLOCK/CLISPFORINITVAR D1 (L (0 VAR) I 1 EXP F 0 PROGVARS F 1 INITVARS) AhPcQg@Phh c(33Q \NCONC2 2 GETDUMMYVAR) (16Q SETQ) () \FORBLOCK/CLISPDSUBST D1 (L (0 X) F 2 BODY F 3 I.V.) Y @°%dYdgð•¿IR°gð“ISˆI•I ¿µÜ@` X´#@g gð@h`¿@ ƒH h(125Q \FORBLOCK/CLISPDSUBST 120Q DWIMIFY1 113Q PUTHASH 75Q GETP 62Q GETHASH 46Q \FORBLOCK/CLISPDSUBST) (110Q CLISPARRAY 101Q CHANGETRAN 72Q CLISPWORD 57Q CLISPARRAY 27Q I.V. 14Q BODY) () \FORBLOCK/\CLISPKEYWORDPROCESS D1 (L (1 WORDLST 0 FORM)) E@d A›A@ @@¡@AHšH@Y§HX°õI²AI @I I @(100Q \NCONC2 72Q LDIFF 65Q SET 17Q SET) NIL () \FORBLOCK/CLISPFORF/L D1 (L (2 DECLARELST 1 VAR) I 0 EXP) GggAB²7g@B °d[K X–IµHZY¿µçJ@ˆ YH°ï@h(71Q LAST 42Q LDIFF 23Q DREVERSE) (14Q DECLARE 5 LAMBDA 2 FUNCTION) () \FORBLOCK/CLISPFOR4 D1 (L (0 X) F 1 MAKEPROGFLG F 2 TERMINATEFLG) V@dgð³dgð³dgð«dgð¥dgð—¿icdcgð³%@°dHdgð–¿ic¿h†´H ¤µâh(114Q \FORBLOCK/CLISPFOR4) (74Q $$VAL 54Q PROG 37Q RETEVAL 31Q RETFROM 23Q ERROR! 14Q RETURN 5 GO) () \FORBLOCK/CLISPFORVARS1 D1 (L (1 FLG 0 L) F 1 LEFT.ARROW.BITTABLE) /@X¡hQH ²Hdlðœ@hAi @ … ¿H°Ø(50Q \FORBLOCK/CLISPFORVARS1 43Q TAILP 37Q DWIMIFY2 15Q STRPOSL) NIL () \FORBLOCK/CLISPFOR3 D1 (L (0 LST)) 30@ °dXµHhY–JµI[Z¿µæK ZI°ó(54Q LAST 11Q DREVERSE) NIL () \FORBLOCK/CLISPFOR1 D1 (L (1 FLG 0 PTRS) P 6 BODY F 13Q UNDOLST F 14Q I.S.TYPE F 15Q I.V. F 16Q MAKEPROGFLG F 17Q I.S.OPRSLST F 20Q FIRSTI.V. F 21Q DUMMYVARS F 22Q I.S.TYPE1) #@@’ @dgð³dgðdgð§dgð¡d¢¿°wdgð¥dgð•¿A³°egðš@c¿°UHgð©Hdgðš¿W³'ic¿°!g \gð²$Lg gð²HZdIð²¿HIg¿Hµí@Ið¢±ËJd³{¿@gð³a@gð³X@gð³O@gð³FJg [²ghgg' lð’±ÿlOo ¿±ÿ_d_ g _–O_µµéLµO‚_lð²íOO ð³åO O ¿°Û(653Q /RPLACA 574Q GETPROP 556Q ERROR 535Q EVAL 526Q GETDEF 465Q SUBPAIR 260Q ERROR 213Q \CanonicalizeTimerUnits 156Q CONSTANTEXPRESSIONP 150Q ERROR 126Q ERROR 70Q \FORBLOCK/\CLISPKEYWORDPROCESS 56Q ERRORX 52Q SETERRORN) (571Q CLISPWORD 531Q NEW 523Q NOERROR 517Q RESOURCES 507Q LCASEFLG 474Q WITH-RESOURCES 377Q LAMBDA 371Q QUOTE 340Q BODY 334Q until 321Q LAMBDA 232Q QUOTE 224Q MILLISECONDS 106Q \ForDurationOfBox 16Q DURATIONCLISPWORDS) ( 553Q "is not a timer RESOURCE" 446Q (BODY FORDURATION OLDTIMER TIMERUNITSLST) 431Q (\TimerUnit) 407Q (DECLARE (LOCALVARS \TimerUnit)) 403Q (\TimerUnit) 331Q (DECLARE (LOCALVARS \DurationLimit)) 325Q (\DurationLimit) 303Q ((QUOTE SECONDS)) 276Q (SETUPTIMER.DATE FORDURATION OLDTIMER) 254Q "Both 'untilDate' and 'forDuration' specified" 205Q "No duration interval" 144Q "Can't specify timerUnits for 'untilDate'" 122Q "Both 'usingTimer' and 'resourceName' specified" 10Q (TIMEREXPIRED? \DurationLimit . TIMERUNITSLST) 4 (SETUPTIMER FORDURATION OLDTIMER . TIMERUNITSLST)) \DWIMIFYBLOCK/CLBINARYMINUS? D1 (L (1 MINUSTAIL 0 $TAIL) F 0 TAIL F 1 PARENT F 2 TYPE-IN?) €PQð´{P³!P3³Plð´hP hð´_P hð´WR³@`´O@@@gð´@ h@dgð ooi´AhðµAgA A(175Q /RPLNODE 167Q MINUS 147Q FIXSPELL1 131Q \NCONC2 126Q RETDWIM2 105Q RETDWIM2 44Q CLISPFUNCTION? 34Q CLISPNOTVARP) (162Q - 116Q - 73Q - 56Q CLISPHELPFLG) ( 143Q " " 137Q "the %"-%" is a clisp operator") \DWIMIFYBLOCK/CLISPANGLEBRACKETS D1 (L (0 LST) P 2 WORKFLAG P 1 NCONC1LKUP P 0 NCONCLKUP) g g @ (22Q \DWIMIFYBLOCK/SHRIEKER 13Q CLISPLOOKUP 5 CLISPLOOKUP) (10Q NCONC1 2 NCONC) () \DWIMIFYBLOCK/CLISPATOM D1 (L (0 CLST) I 3 NOFIX89 I 2 PARENT I 1 TAIL F 1 FAULTX F 2 TYPE-IN? F 3 CLISPCHANGES F 4 ONLYSPELLFLG F 5 FAULTXX F 6 CHARLST F 7 FAULTPOS) Thð´‚±–S³*`ið«`gð²R²@ABµuS´rU` ch@gð²`gg ²U@²%g@ h¸A²@ABð©AHA¿°2¿°,Ad¦¿¿°!BðšAgAAAgAhXAHC³—`ið³`’R´Š`@X«`@X´‚±ÿxQµA²QH ²WQ“Q3’A€Q ¿±ÿUR´‚±ÿOH`ð´‚±ÿC@ X`ð´‚±ÿ3`@H XHi¿±ÿ(424Q \DWIMIFYBLOCK/FIX89TYPEIN 415Q LDIFF 371Q FLAST 336Q \DWIMIFYBLOCK/RETDWIM 315Q \DWIMIFYBLOCK/FIX89 232Q /RPLNODE 207Q /RPLNODE 170Q \DWIMIFYBLOCK/RETDWIM 155Q \DWIMIFYBLOCK/RETDWIM 147Q /RPLNODE 125Q PACK 107Q GETPROP 62Q DUNPACK 46Q \DWIMIFYBLOCK/CLISPATOM0) (410Q LPARKEY 376Q RPARKEY 356Q LPARKEY 267Q RPARKEY 260Q LPARKEY 251Q NOSPELLFLG 242Q NOSPELLFLG 215Q QUOTE 202Q QUOTE 120Q QUOTE 104Q CLISPTYPE 101Q ' 73Q ' 57Q WTFIXCHCONLST 32Q TYPE-IN 27Q CLISPFLG 21Q CLISPFLG) () \DWIMIFYBLOCK/CLISPATOM0A0001A0002 D1 (NAME ERRORSET F 0 TAIL) P h(3 \DWIMIFYBLOCK/CLISPATOM1) NIL () \DWIMIFYBLOCK/CLISPATOM0A0001 D1 (NAME ERRORSET F 0 #UNDOSAVES F 1 UNDOTEM) hc¿ohgc¿hh(16Q \DWIMIFYBLOCK/CLISPATOM0A0001A0002) (13Q CLISPATOM1) ( 7 (\DWIMIFYBLOCK/CLISPATOM0A0001A0002)) \DWIMIFYBLOCK/CLISPATOM0 D1 (P 14Q FAULTX P 13Q UNDOTEM P 12Q UNDOSIDE P 11Q UNDOSIDE0 P 10Q LISPXHIST P 4 89FLG P 3 CLISPRESPELL P 0 CURRTAIL I 2 PARENT I 1 TAIL I 0 CHARLST F 15Q RESETVARSLST F 16Q SUBPARENT F 17Q LISPXHIST F 20Q #UNDOSAVES F 21Q CLISPCHANGE F 22Q DWIMIFYFLG) > W£Bc¿A`bh»W1gO _d”_°_¿jh_¿Oµ8gOh_¿gW Wc]¾og Mc ¿NdWð²¿Mc°gO°ÌW šWkNM¿£¿Ogð›Ogg‚¿Oµ OO ¿hZµI¿K²Sh»W$“hc"¿gW °)d_Ab²OZ˜@JJ@ƒ@J@¿i»µÚA` b¿K”A¸±ÿL´,HOLL ZJ´Alð´A` AB(473Q \DWIMIFYBLOCK/CLISPATOM0 466Q DUNPACK 441Q \DWIMIFYBLOCK/FIX89 436Q LENGTH 404Q DUNPACK 365Q /RPLNODE 316Q MEMB 257Q UNDONLSETQ1 241Q UNDOSAVE 235Q LISTPUT1 212Q ERROR! 202Q NLEFT 172Q TAILP 163Q LISTPUT1 127Q \DWIMIFYBLOCK/CLISPATOM0A0001 34Q MEMB) (463Q WTFIXCHCONLST1 401Q WTFIXCHCONLST 311Q RESPELLS 271Q NOFIXVARSLST0 232Q NOSAVE 227Q SIDE 220Q NOSAVE 156Q SIDE 124Q INTERNAL 103Q #UNDOSAVES 70Q SIDE 27Q SIDE 12Q NOFIXVARSLST0) ( 121Q (\DWIMIFYBLOCK/CLISPATOM0A0001)) \DWIMIFYBLOCK/CLISPATOM1A0003 D1 (L (1 Y 0 X)) @Aµo‚ (16Q CONCAT 13Q RETDWIM2) NIL ( 7 "()") \DWIMIFYBLOCK/CLISPATOM1A0004 D1 (L (1 Y 0 X)) @A (10Q MKSTRING 4 RETDWIM2) NIL () \DWIMIFYBLOCK/CLISPATOM1 D1 (P 20Q BRACKET P 16Q TENTATIVE P 15Q NOSAVEFLG P 13Q TYP P 10Q BACKUPFLG P 7 BROADSCOPE P 6 ENDTAIL P 4 CLTYP P 2 BRACKETCNT I 0 TAIL F 21Q CURRTAIL F 22Q PARENT F 23Q 89FLG F 24Q CHARLST F 25Q DWIMIFYFLG F 26Q CLISPCONTEXT F 27Q TYPE-IN? F 30Q SUBPARENT F 31Q FORMSFLG F 32Q FAULTX F 33Q NEWTAIL F 34Q CLISPCHANGES F 35Q ONEFLG F 36Q CLISPCHANGE F 37Q NEXTAIL) åW(djãW"g ]´2W"dgð¢±û¿O ’±eW"gW"¿gg ]±Kh_¿Hµ‚± O³eW&´=W"µ:W.´5`ið³-W&`ð´$W( _`ð´`W(O _OihW&jW& _Ù´îW4W&O´á±ÜI´i_¿I _¿OOh _¿h_c&¿@’±cOb¿W$’±…@c$±~`¢±Hg ]¢±ùHdgð²%¿HdIðš¿O ’±™Hg¿gg ]±…gð”HI±ÖO ²HdO ð–¿JkØZ°gO ð²`JkÙZ°YMgð².Hg _ ¿HO ð•JkØZ°9gO hW$h °&W&³#`ið³`“W.²Hd`ð¦d`ð“c&¿HIð’±hIH _¢±HHgð©Hgð¢±7IkHgð¢±(Hgð² Hg¿°O ²HžHgO ð³¥O›O¨Jjð¯JµHX±þ) ²÷HdW(ð²ñ¿N’±ÉW"¾±ÃO©OW"ð³W"OOW"[c" †W"[c"¿W"¢±O² W*²W:²O¯Jjð’±ºJµ‚±ªO©Kgð’±ÖW"dlð³*3¢±ÅjW"ó¢±¼O ’±¶O¢±ÑKW" ¢±¦W" ¢±œW"g ]²Mgð¢±ý-O ’±ý'W" c(X¹O d¢±ýFH_´‚±ý8O H’±ý.W"HO O W"¿±ÿ= ¢±ÿUW"lð² W"g ’±ÿ?W"k g ’±ÿ.N’±—W"¾±‘O²@lW"_µ8OœO©Jjð³"JµW"[c"¢±ei_¿h_¿±þÍ ²çN’±PW"¾±Jgð³ÅOgð³¼W"²W"²±W"g ³¦O_gggW" ²g_¿OdW"W"¿O[c"¿i_¿h_¿±þXdgð¦dgð²¿Ogð”M\±°W"°S¿O µ$W"g _²DW"Oð²)O_ ¿JkØZ°/dW"ð–¿JkØZ°!W"ð²JkÙZ°gOhW$h ¿N³IO³!W"_¿M¼Og _¿Og _°O¢±èM¼W"g _¿W"g gð_¿W"g ¿O ´ W"O ð_¿W"[c"’±ýv@Oð²6Og ³,W$@ð¦W0d@ðž¿k@W$h ¿W0µW$k@b¿i_¿¿N_g \3¦L3²AW*²%W,²!Ng gðŸW,gð³"W,gð³OL@_¿W*¥OW$ð”Ob¿W2³!@dW$ð²¿i°MLW"O¢±ÿ.W"^±ÿ*@_¿W*•Oc>¿‡O”Oc6¿W2«W$–@dW$ð“¿@‚@_¿OµOgð³ùO@dO`hc8¿W*“hc<¿¿°ÕOOh _¿h_¿OHh _¿N³jO³%H_¿M¼Og _¿Og gð_¿°CO² M¼Hg _¿Hg gð_¿°!MLHHIðhðµOHW(ð’W"„O ¾O ´ HO ð_¿H´,W"´(O —HO ð§Hgð´W"dH W"¿hXc&¿H¹Hgðhð´HX±ùf(3312Q /RPLNODE 3303Q PACK 3220Q FLAST 3202Q \DWIMIFYBLOCK/STOPSCAN? 3151Q GETPROP 3136Q GETPROP 3107Q GETPROP 3074Q GETPROP 3043Q \NCONC2 3023Q \NCONC2 3007Q DWIMERRORRETURN 2753Q \DWIMIFYBLOCK/CLISPATOM1B 2645Q \DWIMIFYBLOCK/STOPSCAN? 2573Q \DWIMIFYBLOCK/CLISPATOM1A 2535Q GETPROP 2502Q GETPROP 2467Q \DWIMIFYBLOCK/CLISPATOM2 2455Q NLEFT 2441Q DWIMERRORRETURN 2410Q GETPROP 2335Q GETPROP 2315Q GETPROP 2301Q GETPROP 2254Q GETPROP 2241Q GETPROP 2211Q DWIMERRORRETURN 2103Q GETP 2002Q /RPLNODE 1754Q CLISPFUNCTION? 1725Q CLISPFUNCTION? 1644Q \FZEROP 1566Q NLEFT 1533Q GETPROP 1525Q NTHCHAR 1512Q GETPROP 1464Q \FZEROP 1455Q \DWIMIFYBLOCK/CLRPLNODE 1446Q PACK 1441Q PACK 1436Q LDIFF 1364Q UNPACK 1332Q GETPROP 1315Q CLISPNOTVARP 1303Q \DWIMIFYBLOCK/CLBINARYMINUS? 1134Q /RPLNODE 1131Q \NCONC2 1043Q \FZEROP 1006Q MEMB 734Q NLEFT 675Q PACK 672Q LDIFF 607Q DWIMERRORRETURN 545Q GETPROP 447Q GETPROP 424Q \DWIMIFYBLOCK/CLUNARYMINUS? 372Q GETPROP 312Q \NCONC2 276Q PACK 256Q \DWIMIFYBLOCK/FIX89 241Q \DWIMIFYBLOCK/FIX89A 233Q LENGTH 216Q \DWIMIFYBLOCK/FIX89TYPEIN 205Q LDIFF 162Q FLAST 75Q GETPROP 63Q /RPLNODE 44Q \DWIMIFYBLOCK/CLUNARYMINUS? 17Q GETPROP) (3330Q ' 3267Q ~ 3154Q NOT 3146Q LISPFN 3133Q BROADSCOPE 3112Q NOT 3104Q LISPFN 3071Q BROADSCOPE 2763Q NOFIXVARSLST0 2743Q CERTAINLY 2561Q FOR/BIND 2551Q FORWORD 2542Q FORWORD 2532Q CLISPWORD 2477Q CLISPTYPE 2405Q UNARYOP 2332Q CLISPCLASS 2320Q NOT 2312Q LISPFN 2276Q BROADSCOPE 2251Q LISPFN 2236Q BROADSCOPE 2173Q BRACKET 2100Q CLISPBRACKET 2051Q : 2040Q => 2032Q -> 1761Q CERTAINLY 1745Q \DWIMIFYBLOCK/CLISPATOM1A0004 1742Q \DWIMIFYBLOCK/CLISPATOM1A0003 1737Q NOTVAR 1722Q OKVAR 1676Q : 1665Q ' 1530Q CLISPTYPE 1507Q CLISPTYPE 1343Q BRACKET 1327Q CLISPTYPE 1222Q ' 1001Q SEPARATOR 761Q - 752Q +- 740Q E 721Q +- 712Q + 651Q RPARKEY 642Q LPARKEY 627Q NOSPELLFLG 620Q NOSPELLFLG 571Q BRACKET 542Q CLISPBRACKET 532Q BRACKET 456Q ' 444Q CLISPTYPE 441Q +- 434Q +- 405Q - 367Q CLISPTYPE 355Q CLISPCHARS 176Q LPARKEY 170Q RPARKEY 152Q LPARKEY 137Q NOSPELLFLG 72Q CLISPTYPE 67Q +- 55Q +- 31Q - 14Q 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 10Q DWIMIFYFLG F 11Q ONEFLG F 12Q PARENT) C`@g ¿@g ]‘k€j¼@Bð‘BB¸@dgð¿Hg [µ@g ºh¹Hdgð¸i¹‰b¿H¸°â¸HµG¿Hbg b¢±ÌW²’V²W²‹Hg gð¢±ÿ{Vgð’±§Vgð’±ž±ÿfg [²wHg ¿M²HdMð–¿LkØ\°gW.´g oi°"W ³lW"Hh ŠI’W ‚W ¿W*gð¢±EI’W ‚W O dhihdW&´W.gð´W. ¾gW, _³dgW, _¿0N°'d_¿O˜OOðhð´Oh_šOµ"O__¿µÚO¾JµgW, I›NŽ _O°ÞW N°#I²Ogð•N °NkO‰W NlO¾W"³W0³H”HW ð›W NN¿i‹W NW"¿g¾W&¢±mNc(¿±fW Hð’±”W _gð³Og ²}Og ³sic2¿HkW c dW ¿h¹W c$g ºOhð_¿W$dgð²¿W dW$ð³œc ¿i¹°’gð§W$gð²gc$¿W gW W ¿W"W ð•l ¿I’W ‚W W" ]¦I¤k ¿W<²IW$MKgð“g€H¿W W>µH_ð³OdW W ¿ic2¿Oc ¿W&’W(¨W HW2¿W ¼W$dgð²C¿J’±M ¾hL _¿W&›W(’±5Oc(¿M_—O3¢±!MM ¿W4¢±N± gð¢±×LµW$±dgð•¿g°sdgð•¿g°gdgð¥dgð”¿L°Vdgð¥dgð¿hLMi ±¼¿Lg _³L ¿Lg _²hOL LM ±ˆg _g ºL¼OLhJZgð²MgðšM¦gºM½W8²uLgð²ngi ¿`\id¿°ZW$LMJºI²5M’M°*W8²$Jgð²Mdgð²¿gi ¿`idM¼h½°Md•¢M€h_¿Jdgð²4¿Mµ#JLM _¿Hd¢±•–H3¢±ŒW d ±»³uM³qgZ°lgð²'LµOdkðŸ¿gZ°Ugð²î°Kmÿð²¯gZ°AJdgð²¢¿LµOkð²–gZ°(gð²ïM³ëM3•M ‡gMhh½gºh¢±ÿgh½±ÿbH¾J œW&¢±ÛOc(±ÓW&›W(’I²!Oc(¿‰N_”O3›Jgð¥NH ¿I³lL²TJLð²NJgð³1Jgð³*Jgð³#Jgð³Jgð³Jgð¬Jgð¦Jgð²L`ð®NLLM ¿M¾W&¨Ndlð—¿NH ¿N²#NZg c*²N˜Jg ³l ¿°N²NZg c*™JW*NW"¿OžHgHHh¿Hgð²:H_²2HO _ô³'HW ð–W OW ŠO›W OO¿W4”gc4W (3261Q \DWIMIFYBLOCK/CLRPLNODE 3220Q NEGATE 3171Q \DWIMIFYBLOCK/CLRPLNODE 3147Q \DWIMIFYBLOCK/CLISPATOM1A 3133Q GETPROP 3112Q DWIMERRORRETURN 3103Q GETPROP 3065Q GETPROP 3050Q \DWIMIFYBLOCK/CLISPATOM2A 3024Q \DWIMIFYBLOCK/CLRPLNODE 3021Q \APPEND2 2673Q \DWIMIFYBLOCK/CLISPATOM2A 2611Q CLISPNOEVAL 2550Q MINUS 2377Q \DWIMIFYBLOCK/CLISPATOM2A 2350Q \DWIMIFYBLOCK/CLISPATOM2D 2301Q PRINT 2270Q PRIN1 2222Q CLISPLOOKUP 2206Q PRINT 2174Q PRIN1 2121Q CLISPLOOKUP 2104Q GETPROP 2074Q DWIMERRORRETURN 2063Q \DWIMIFYBLOCK/CLISPATOM2D 2057Q \APPEND2 2051Q CLISPLOOKUP 2034Q GETPROP 2023Q DWIMIFY1? 2013Q GETPROP 1777Q \DWIMIFYBLOCK/CLISPATOM2D 1774Q CLISPRECORD 1642Q \DWIMIFYBLOCK/CLISPATOM2A 1574Q \DWIMIFYBLOCK/CLISPATOM2D 1566Q \DWIMIFYBLOCK/CLISPCAR/CDR 1536Q \DWIMIFYBLOCK/CLISPBROADSCOPE1 1506Q \DWIMIFYBLOCK/CLRPLNODE 1500Q LDIFF 1452Q \DWIMIFYBLOCK/CLISPBROADSCOPE 1423Q DWIMERRORRETURN 1413Q LDIFF 1374Q DWIMERRORRETURN 1357Q \DWIMIFYBLOCK/CLRPLNODE 1244Q GETPROP 1225Q \DWIMIFYBLOCK/CLRPLNODE 1212Q NLEFT 1175Q GETPROP 1163Q GETPROP 1105Q \DWIMIFYBLOCK/CLRPLNODE 1072Q \DWIMIFYBLOCK/CLRPLNODE 1016Q \DWIMIFYBLOCK/CLISPANGLEBRACKETS 761Q LAST 750Q MEMB 646Q MEMB 630Q MEMB 617Q DWIMIFY2? 570Q LDIFF 537Q \DWIMIFYBLOCK/CLISPATOM2C 523Q DWIMERRORRETURN 505Q \DWIMIFYBLOCK/CLISPATOM2C 475Q RETEVAL 465Q \DWIMIFYBLOCK/RETDWIM0 462Q \DWIMIFYBLOCK/RETDWIM0 436Q \DWIMIFYBLOCK/CLISPRESPELL 413Q RETEVAL 403Q \DWIMIFYBLOCK/RETDWIM0 374Q \DWIMIFYBLOCK/CLISPRESPELL 327Q DWIMERRORRETURN 307Q \DWIMIFYBLOCK/CLISPATOM2C 274Q GETPROP 246Q GETPROP 223Q GETPROP 173Q DWIMERRORRETURN 160Q DWIMERRORRETURN 64Q GETP 31Q GETPROP 21Q GETPROP 11Q GETPROP) (3270Q PROBABLY 3177Q NOT 3157Q NOT 3130Q CLISPTYPE 3100Q UNARYOP 3062Q CLISPTYPE 3003Q CLISPLASTSUB 2774Q TIMES 2766Q PLUS 2760Q FTIMES 2751Q FPLUS 2742Q ITIMES 2733Q IPLUS 2724Q OR 2715Q AND 2664Q SETQ 2567Q IPLUS 2554Q IMINUS 2527Q IPLUS 2520Q SUB1 2477Q IDIFFERENCE 2467Q SUB1 2452Q IPLUS 2443Q ADD1 2422Q IPLUS 2414Q NULL 2332Q EQ 2274Q LASTWORD 2264Q = 2255Q 2244Q QUOTE 2200Q LASTWORD 2170Q = 2162Q 2146Q SETQQ 2135Q ' 2125Q SETQ 2101Q LISPFN 2071Q _ 2031Q SETFN 2010Q SETFN 1762Q REPLACE 1754Q replace 1741Q NCONC1 1733Q NCONC 1725Q RPLACD 1717Q CDR 1711Q RPLACA 1703Q CAR 1660Q _ 1551Q : 1445Q IS 1440Q ISWORD 1341Q NOT 1327Q AND 1321Q nor 1312Q NOR 1262Q ~ 1241Q LISPFN 1172Q UNARYOP 1160Q CLISPTYPE 1150Q ~ 1111Q PARTIAL 1010Q CLISPANGLEBRACKETS 743Q LISPFN 641Q SEPARATOR 623Q DWIMIFY 606Q IFWORD 545Q BRACKET 457Q WTFIX 447Q CLISPATOM1 433Q CLISPINFIXSPLST 400Q CLISPIF0 371Q CLISPIFWORDSPLST 361Q IFWORD 271Q CLISPTYPE 260Q ~ 243Q UNARYOP 220Q CLISPTYPE 132Q BRACKET 124Q BRACKET 61Q CLISPBRACKET 26Q CLISPCLASS 16Q LISPFN 6 UNARYOP) ( 471Q (PROGN (SETQ CLISPRESPELL T) NIL) 407Q (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 10Q TENTATIVE F 11Q BROADSCOPE F 12Q FAULTPOS F 13Q DWIMIFYING F 14Q CLISPCONTEXT F 15Q NOFIXFNSLST F 16Q NOFIXVARSLST F 17Q TYPE-IN?) 1@´‚±)Whð´‚±U´WU´W"U«W¿W¿Vgð¨Vgð¢±¨Td’± W§Td`–¿g±’ ³H¦TW Tg ¥T`T`¿g°gIgð³TTdAð²M¿`ið³D`“W²Q”QPð²7@³(PAA¿A` b•P@ ¿A`ðœ`P…P@A¿Pci@¢A°TgðšA3•A ‚@AbPARPcg(142Q \DWIMIFYBLOCK/CLRPLNODE 126Q MINUS 73Q \DWIMIFYBLOCK/CLRPLNODE 47Q CLISPTRAN 37Q GETHASH 27Q \DWIMIFYBLOCK/CLRPLNODE) (151Q PARTIAL 112Q - 62Q CLISPLASTSUB 54Q CLISPLASTSUB 34Q CLISPARRAY) () \DWIMIFYBLOCK/CLISPATOMARE1 D1 (L (1 FLG 0 X)) @@¸Hd`ð’h²Hdgð¥dgð—¿HA ¿hµ HX´ °ÐHh (75Q \NCONC2 53Q \DWIMIFYBLOCK/CLISPATOMARE1) (42Q OR 34Q AND 13Q CLISPLASTSUB) () \DWIMIFYBLOCK/CLISPATOMARE2 D1 (L (1 Z 0 L) F 2 DEST F 3 TAIL F 4 PARENT) _ @d³¿Aµ)gSTh ¿@X@YRŸ@dHð™H…@h¿I–R¤@c¿AI Y@Id–¿HIhb¿b°¤(107Q \APPEND2 30Q DWIMERRORRETURN) (16Q PHRASE) () \DWIMIFYBLOCK/CLISPATOMIS1 D1 (L (4 NEGATE 2 ALST 1 OBJ 0 SUBJ) I 3 EXP) P@dgð¦dgð²,¿@0@°dABCD´i ¸IµHhZH&¹µåJ¿A@BCibD”d C(113Q NEGATE 103Q SUBLIS 44Q \DWIMIFYBLOCK/CLISPATOMIS1) (13Q OR 5 AND) () \DWIMIFYBLOCK/CLISPATOMIS2 D1 (L (0 X)) O@@d²=d`ð³4dHð²d@@ ¿°Ùgð©@dgð—¿@ ¿@b´°º(103Q \DWIMIFYBLOCK/CLISPATOMIS2 52Q \DWIMIFYBLOCK/CLRPLNODE 47Q \APPEND2) (73Q OR 62Q AND 17Q CLISPLASTSUB) () \DWIMIFYBLOCK/CLISPBROADSCOPE D1 (L (2 CONTEXT 1 L 0 $TYP) P 0 BRACKETCNT) —jAAµId¤B ŽdI ¿IBihgðŸgg •HkØ¸°)Adgð²¿gg ”HkÙ¸A@ð˜Hjð¯HµAb°£ ²÷AIðœIB ¿AbY°ŒIdA A¿IBi¿AbY±ÿs(214Q \DWIMIFYBLOCK/CLISPBROADSCOPE1 205Q \DWIMIFYBLOCK/CLRPLNODE 201Q LDIFF 163Q \DWIMIFYBLOCK/CLISPBROADSCOPE1 147Q \FZEROP 112Q GETP 60Q GETP 37Q \DWIMIFYBLOCK/CLISPBROADSCOPE1 30Q \DWIMIFYBLOCK/CLRPLNODE 17Q \DWIMIFYBLOCK/CLISPBROADSCOPE1) (107Q CLISPTYPE 104Q > 75Q > 55Q CLISPTYPE 52Q < 45Q <) () \DWIMIFYBLOCK/CLISPBROADSCOPE1 D1 (L (2 FLG 1 CONTEXT 0 X) F 1 DWIMIFYFLG F 2 CLISPCONTEXT) O@³)@hddhddAgð“g†Q“RµA X@Hd Agðž@@@hddA @B´A (114Q DWIMIFY1? 102Q DWIMIFY2? 45Q DWIMIFY2?) (62Q IS 31Q IS 24Q IS) () \DWIMIFYBLOCK/CLISPCAR/CDR D1 (L (0 LST) F 5 VAR1 F 6 VAR2 F 7 ENDTAIL) ÃWgðµ WgðAhc¿h¹@dgð–¿i¹@b³H²&I“g‚gUhc L@Zdgð²!¿@Z3µ I¢± g± º@b±3’±”I³èJ²LgUgJhc ¿@gð¨@gð²U@ ¿@[UK¿hb¿Ud ¿V’±Uc±‰UJH´@hð[µ#Jg [µ g °gUhc ¿V³^Uc°Xc ¿V³SUl c°HjJñ³fJlñ² l Jñ²JlÙºgUhc ¿V³äUc¿°ÞH²@®kJkÙUiIi…JUIc ¿@bµLgð¢±þþi¼@b¿±þºg ¿H²*@³&I²#gUjJÙkØhc ¿V£Uc¿gUhc LJmÿðšgU Uh‰gUjJÙhc ¿V£Uc¿I³ŽgUh°‚(635Q CLISPLOOKUP 545Q DWIMERRORRETURN 501Q \DWIMIFYBLOCK/CLISPCAR/CDR1 472Q \DWIMIFYBLOCK/CLISPCAR/CDR1 465Q \DWIMIFYBLOCK/CLISPCAR/CDR1 371Q NLEFT 334Q DWIMERRORRETURN 323Q GETPROP 311Q CLISPRECORD 261Q CLISPTRAN 256Q MAKEMATCH 244Q DWIMIFY2? 232Q \NCONC2 136Q MINUS) (673Q CAR 644Q NLEFT 631Q LAST 611Q CDR 563Q NLEFT 542Q : 520Q : 426Q CDDDDR 331Q FIELDNAME 320Q ACCESSFN 221Q => 211Q -> 172Q with 166Q match 130Q :: 104Q - 65Q NCONC1 61Q NCONC 36Q : 16Q ¬ 5 _) () \DWIMIFYBLOCK/CLISPCAR/CDR1 D1 (L (3 SETQFLG 2 TAILFLG 1 X 0 N) F 1 VAR2 F 2 DWIMIFYFLG F 3 VAR1) Ú@jð³7@µ-R©`•@A ¿C³lA²h@dkð²E¿Adgð²¿B›g°I ²ÒAg°=dgðœ¿B”g°/g°*gð´$B”g°g°lð´Agð´B“g‚gX”AH°M@dlñ²+¿gS ¸B™HA@kØh°0HA@h¸Q£Hc¿gH°oX¦g ŒB“H‚HAhXQ¢dcH(302Q SHOULDNT 224Q CLISPLOOKUP 72Q \FZEROP 27Q \DWIMIFYBLOCK/CLISPCAR/CDR2) (277Q CLISPCAR/CDR 262Q CAR 220Q NTH 176Q CADAR 172Q CDDAR 162Q CAR 146Q CAADR 141Q CDADR 131Q CADR 124Q CAAAR 117Q CDAAR 107Q CAAR 101Q CAAR 65Q CDAR 54Q CAR 21Q CHECKCARATOMFLG) ( 271Q ((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¸@kÙb°â ²æh(53Q \FZEROP 35Q DWIMERRORRETURN 4 STKEVAL) (32Q CARATOM) () \DWIMIFYBLOCK/CLISPIFA0009A0010 D1 (NAME ERRORSET F 0 FORM F 1 TEM) P ch(3 \DWIMIFYBLOCK/CLISPIF0) NIL () \DWIMIFYBLOCK/CLISPIFA0009 D1 (NAME ERRORSET F 0 #UNDOSAVES F 1 UNDOTEM) hc¿ohgc¿hh(16Q \DWIMIFYBLOCK/CLISPIFA0009A0010) (13Q CLISPIF0) ( 7 (\DWIMIFYBLOCK/CLISPIFA0009A0010)) \DWIMIFYBLOCK/CLISPIF D1 (P 14Q UNDOTEM P 13Q UNDOSIDE P 12Q UNDOSIDE0 P 11Q LISPXHIST P 6 TEM P 5 CLISPRESPELL P 2 VARS P 1 DWIMIFYING P 0 CLISPCONTEXT I 0 FORM F 15Q RESETVARSLST F 16Q DWIMIFYFLG F 17Q #UNDOSAVES F 20Q ATTEMPTFLG F 21Q CLISPCHANGE F 22Q LISPXHIST F 23Q DWIMIFYING F 24Q VARS F 25Q BREAKFLG F 26Q EXPR F 27Q NOFIXFNSLST F 30Q NOFIXVARSLST) W—ic “ic"¿gW´W&W(µWhð´W*µW, ``EW«W.¿W0¿W$1gO _d”_°_¿jh_¿Oµ>gOh_¿gWWc__¿og Oc¿OdWð²¿Oc°gO°ÆW œWkOO¿£¿Ogð›Ogg‚¿Oµ OO ¿h‘NM¨¿h@g ²ôK¿L¿h½±ÿ#(377Q CLISPELL 366Q \DWIMIFYBLOCK/RETDWIM 362Q \DWIMIFYBLOCK/RETDWIM 347Q UNDONLSETQ1 331Q UNDOSAVE 325Q LISTPUT1 302Q ERROR! 271Q NLEFT 260Q TAILP 251Q LISTPUT1 212Q \DWIMIFYBLOCK/CLISPIFA0009 114Q MEMB 47Q \DWIMIFYBLOCK/GETVARS) (412Q NOFIXVARSLST0 405Q NOFIXFNSLST0 374Q IFWORD 322Q NOSAVE 317Q SIDE 310Q NOSAVE 244Q SIDE 207Q INTERNAL 163Q #UNDOSAVES 150Q SIDE 107Q SIDE 76Q NOFIXVARSLST0 70Q NOFIXFNSLST0 55Q NOFIXVARSLST0 52Q NOFIXFNSLST0 15Q IFWORD) ( 204Q (\DWIMIFYBLOCK/CLISPIFA0009)) \DWIMIFYBLOCK/CLISPIF0 D1 (L (0 FORM) P 10Q DWIMIFYCHANGE F 16Q LISPXHIST) 0 @¼`²kLhh°agð•gh…g °Ndgð¦dgð²¿HJML@h ¸h°#dgð¨dgð¢±Ý¿HJML@h ¸L¾iº`—LhIY¿L]¿L\µoHJML@h ¸`”I ¹@gH¿gW _¿@\_d¢±Êg ¿Od¢±Ód ’±É¿O`ð¢±†o±ƒdgð¨dgð¢±ÿ0¿LNð²shº`¢±ÿmNIð¦g ¿Iddgð¢±þð¿gh±þødgð¨dgð¢±ÿ<¿MdLð³.L º`¢±ÿ&Id¨¿g ¿IL±ÿoi ¿@\¿lL@h h»Oh¿Odhg¿OK ¿O[dhg¿L\µ‚±ÿ@ ¿`²U@Ii O”O³GgO X@@»@HHOOOO@ð²OOô—Og¿@K @OOOO_¿O_¿O_¿h_¿°‘(1026Q \DWIMIFYBLOCK/CLISPIF3 1011Q CLISPTRAN 721Q APPLY 716Q DREVERSE 660Q \DWIMIFYBLOCK/CLISPIF2 642Q DWIMIFY2 625Q \NCONC2 616Q DWIMIFY2 573Q DWIMERRORRETURN 554Q LISPXPRIN1 533Q SHOULDNT 507Q LDIFF 426Q SHOULDNT 316Q FNTYP 275Q DWIMIFY1 243Q MEMB 232Q /RPLNODE 221Q DREVERSE 210Q \NCONC2 203Q \DWIMIFYBLOCK/CLISPIF1 141Q \NCONC2 134Q \DWIMIFYBLOCK/CLISPIF1 100Q \NCONC2 73Q \DWIMIFYBLOCK/CLISPIF1 42Q SHOULDNT) (1002Q * 711Q NCONC 664Q CLISPIFTRANFLG 637Q IFWORD 613Q IFWORD 530Q THEN 513Q CLISPIFTRANFLG 467Q then 461Q THEN 450Q ELSEIF 437Q ELSE 423Q ELSE 404Q CLISPIFTRANFLG 363Q if 355Q IF 334Q COMMENTFLG 272Q IFWORD 236Q SIDE 226Q COND 214Q CLISPIFTRANFLG 151Q CLISPIFTRANFLG 116Q else 110Q ELSE 57Q elseif 51Q ELSEIF 37Q ELSE 31Q elseif 24Q else 7 CLISPIFTRANFLG) ( 550Q "parentheses error " 345Q "misplaced comment ") \DWIMIFYBLOCK/CLISPIF1 D1 (L (3 FORM 2 L 1 L0 0 PRED)) 8@µAdBð²¿lBCh d•¿@d AB Bð”AhAB h(63Q LDIFF 43Q LDIFF 24Q DWIMERRORRETURN) NIL () \DWIMIFYBLOCK/CLISPIF2 D1 (L (0 X)) Z0@gð´O@ YXd@ð²diðœd¨¿I@@°*ið´*@l YZ@ð´I³HJH¿IHJh(126Q /RPLNODE 114Q /RPLNODE 65Q NLEFT 16Q FLAST) (7 COND) () \DWIMIFYBLOCK/CLISPIF3 D1 (L (2 FIRSTCLAUSEFLG 1 ORIGWORDPAIR 0 CLAUSE)) _B²`”g°6Aµ2g°-@ið²`“g†Aµg@ `“g†Aµg@@´`“g†Aµg@ (131Q \APPEND2 56Q \APPEND2) (124Q THEN 114Q then 110Q LCASEFLG 77Q ELSEIF 67Q elseif 63Q LCASEFLG 51Q ELSE 41Q else 35Q LCASEFLG 22Q IF 11Q if 5 LCASEFLG) () CLISPLOOKUP D1 (L (3 $LISPFN 2 $VAR2 1 $VAR1 0 WORD) F 3 EXPR F 4 FAULTFN) ‡0@g Ydg Zd²ST Xœ@ABHCIJ °)Idgð•¿@ gð¥Igð‘hCµ@g µ@XJgð²,ddJð²%¿Ad¢…JðBd¢…Jð”JH(115Q GETPROP 65Q GETTOPVAL 47Q CLISPLOOKUP0 32Q GETLOCALDEC 21Q GETPROP 11Q GETPROP) (126Q ARITH 112Q LISPFN 77Q RECORDFIELD 71Q RECORD 56Q VALUE 16Q CLISPCLASSDEF 6 CLISPCLASS) () \DWIMIFYBLOCK/CLISPRESPELL D1 (L (2 FLG 1 WORDS 0 TL) F 0 TYPE-IN?) 6`iðhð´-`’P´&@´"@lð´@ hð´@ ´ @hAB(63Q MISSPELLED? 51Q CLISPNOTVARP 40Q CLISP-SIMPLE-FUNCTION-P) (13Q NOSPELLFLG 2 NOSPELLFLG) () \DWIMIFYBLOCK/CLRPLNODE D1 (L (2 D 1 A 0 X) F 1 UNDOSIDE F 2 NOSAVEFLG F 3 UNDOSIDE0) ,QR³HSð—@AB@@dHð¦¿HX°é@A¿@B@(22Q /RPLNODE) NIL () \DWIMIFYBLOCK/CLUNARYMINUS? D1 (L (0 OPRFLAG) F 0 SUBPARENT F 1 CURRTAIL F 2 TYP F 3 TYPE-IN?) eR”@hðµ^QPðµYQPð´SP ´LP¦P ´ASµ>`´9PPPgð´P hPdgð ooi(142Q FIXSPELL1 124Q \NCONC2 121Q RETDWIM2 100Q RETDWIM2 41Q CLISPNOTVARP 26Q FNTYP) (111Q - 66Q - 51Q CLISPHELPFLG) ( 136Q " " 132Q "the %"-%" is unary") DWIMIFYA0014A0015 D1 (NAME ERRORSET F 0 VAL) i¿Phi¿hh(12Q PRINTDEF) (3 PRETTYTRANFLG) () DWIMIFYA0014 D1 (NAME ERRORSET L (0 NIL) F 2 RESETVARSLST F 3 MACROY) Gg`RcR¹og H¿IdRð•¿HcR ™RkIH¿µci(77Q ERROR! 66Q NLEFT 57Q TAILP 31Q DWIMIFYA0014A0015) (37Q PRETTYTRANFLG 26Q INTERNAL 5 PRETTYTRANFLG 2 PRETTYTRANFLG) ( 23Q (DWIMIFYA0014A0015)) 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 NOFIXFNSLST F 7 NOFIXVARSLST) l`©oi hVW@B X@²GB³DA³Ai 1gIhhUc ºog £g¼Jc ¿gJ ¿L“¿i H(150Q TERPRI 142Q ERROR! 134Q APPLY 110Q DWIMIFYA0014 55Q OUTPUT 36Q DWIMIFY0 16Q LISPXPRIN1) (125Q OUTPUT 114Q ERROR 105Q INTERNAL 63Q OUTPUT 31Q NOFIXVARSLST0 24Q NOFIXFNSLST0 5 DWIMFLG) ( 102Q (DWIMIFYA0014) 12Q "DWIM is turned off! ") DWIMIFY0 D1 (L (1 Y 0 X) P 12Q TYPE-IN? P 11Q ONEFLG P 10Q 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 13Q LISPXHIST F 14Q DFNFLG) idgW ƒ Ad¢±“¿g \µ*A bA µ@bghdW@A š@A ¼°ÖA_`µOgð²A_`µOgð²%A_`µOgð²@dAð¯dA™¿@@ @@ ²A\C£@b¿@ _M”LJ O@dœ¿g\@bd _d[\Ob M²"KJ ¿Kd Ÿ¿Wgð«Kd ¦¿Ki K(405Q DWIMUNSAVEDEF 376Q EXPRP 360Q \DEFINEDP 352Q DWIMARKASCHANGED 342Q DWIMIFY1 324Q EXPRCHECK 320Q DWIMIFY1 275Q DWIMARKASCHANGED 264Q DWIMIFY1 245Q DWIMIFY1 237Q DWIMIFY2 110Q DWIMIFY2 101Q TAILP 73Q LISPXPUT 53Q LAST 45Q VARSBOUNDINEDITCHAIN 35Q \EVALV1 11Q MEMB) (367Q PROP 310Q TYPE-IN 207Q SELECTQ 176Q DWIMEQUIVLST 163Q SELECTQ 152Q DWIMEQUIVLST 136Q COND 125Q DWIMEQUIVLST 64Q RESPELLS 32Q 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 10Q DWIMIFYFLG) NWµV¿W¿dgð¦dgð²¿V¿W¿idgð²ÖV¿W¿@(113Q \DWIMIFYBLOCK/DWMFY0 63Q \DWIMIFYBLOCK/DWMFY0 21Q \DWIMIFYBLOCK/DWMFY0) (104Q NOFIXVARSLST0 76Q NOFIXFNSLST0 67Q EVAL 52Q NOFIXVARSLST0 44Q NOFIXFNSLST0 34Q VARSBOUND 26Q CLISPIFY 15Q 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@ (27Q \DWIMIFYBLOCK/DWMFY1 6 \DWIMIFYBLOCK/DWMFY1) (23Q NOFIXVARSLST0 17Q 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³|B¥R´xS´uPgð³mBµT •ki ¿Pgð³oi ¿@A id¿Ad3²¿oi Ai oi ´$oi oAhllmÿ idh(173Q LISPXPRINT 166Q CONCAT 163Q SUBSTRING 154Q RETDWIM2 141Q LISPXPRIN1 126Q LISPXPRIN1 116Q LISPXPRIN1 111Q LISPXPRIN1 71Q LISPXPRINT 64Q RETDWIM2 56Q LISPXPRIN1 36Q LISPXSPACES 30Q FIXPRINTIN) (43Q IFWORD 16Q IFWORD) ( 145Q "... " 135Q "at " 122Q ") " 105Q "too many arguments (more than " 52Q "(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) S´iTU(25Q \DWIMIFYBLOCK/DWMFY2 5 \DWIMIFYBLOCK/DWMFY2) (22Q NOFIXVARSLST0 16Q NOFIXFNSLST0) () DWIMIFY2AA0016 D1 (L (1 Y 0 X)) A lmÿ(12Q SUBSTRING 3 RETDWIM2) NIL () DWIMIFY2AA0017 D1 (L (1 Y 0 X)) @d–@AA o (32Q CONCAT 23Q MKSTRING 20Q RETDWIM2) NIL ( 27Q ")") DWIMIFY2A D1 (L (1 $TYP 0 $TAIL)) @Agg@ (14Q CLISPFUNCTION?) (7 DWIMIFY2AA0017 4 DWIMIFY2AA0016) () DWIMIFYFNS D1 (L (0 FNS) F 3 NOFIXFNSLST F 4 NOFIXVARSLST) zj ¿ST0@d³adž¿g@hg°Ng µD`ž@lF`h@ µ@g –@ µ!g@g°d ¸IµHhZH&¹µíJ(146Q DWIMIFY0 137Q STKEVAL 122Q FILEFNSLST 114Q GETPROP 102Q MISSPELLED? 56Q EVALV 45Q STKEVAL 3 CLOCK) (134Q INTERNAL 127Q DWIMIFYFNS 111Q FILE 74Q FILELST 64Q DWIMFLG 53Q DWIMIFYFNS 42Q INTERNAL 34Q DWIMIFYFNS 14Q NOFIXVARSLST0 10Q 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 10Q ONEFLG F 11Q CLISPCONTEXT F 12Q SUBPARENT) $V´WiSªTdUð–W ŠTUWSW J(40Q DWIMIFY2 24Q DWIMIFY1) NIL () \DWIMIFYBLOCK/DWMFY1 D1 (L (0 FORM) P 13Q VARS P 12Q NEXTAIL P 5 ATTEMPTFLG P 4 89CHANGE P 3 CLISPCHANGE F 17Q VARS F 20Q FORMSFLG) O@‘ @³tHhZi ¿Jd’±8Id²/¿H`µHZgð’±ôJgð’±ëI ´`hð^ˆlð—I ’±Ñ Hddd¢±®Hd ³<¿Kµ9L¢±²h¼H`µHYdgð’±œdgð’±“¿H ¢±ÿ|`’±ÿuHgð¢±dI´[H@ ¿H`µHY¢±JN¦K¤I ¿W ’±rH`µHZgð’±\Jgð’±SN’±NI ’±FH H»±ÿjKµ"M®Idlð˜`¿I³Idgð›¿±àgð³Ü@gð²,H°"d_dgð¥dgð¿O` ¿µÞ±¨Igð¨Idgð²¿`¢±’H¢±‹Hk ¿±‚gð²=H@ihi ¿Hd«@hdi ¿HXd¨@i¿±OHid¿H°æIgð³Igð®Igð¨Idgð²*¿HdW³d`ª`¿H@i¿±þgð²Hˆddhi¿µõ±æIdgð²¿Hµ H¢H€h ¿±Ègð›H@i¿±·Igð¨Idgð²'¿HµH´HhW H@i±„g _gð¬O²igO²a0H°Ad_d²$Oi¿Odlð¯¿@O@ ¿O_¿Oµ Oh_‚O&_¿µÀOW H@i‡I ¢±ý¦@`²4I jð²,I Zdjð“¿H°kð‘HJdlð’¿H…lðšH”HJ @(1513Q DWIMIFY1A 1445Q NARGS 1435Q ARGTYPE 1416Q CLISPNOEVAL 1410Q DWIMIFY2 1375Q \NCONC2 1331Q DWIMIFY1A 1302Q DWIMIFY2 1227Q GETPROP 1215Q DWIMIFY2 1202Q \APPEND2 1132Q DWIMIFY2 1111Q DWIMIFY1 1047Q DWIMIFY2 1023Q DWIMIFY2 720Q DWIMIFY2 702Q DWIMIFY2 665Q DWIMIFY2 643Q DWIMIFY2 617Q DWIMIFY1A 542Q UNION 414Q DWIMIFY1A 404Q CHECKTRAN 325Q DWIMIFY1 273Q DWIMIFY2 234Q CHECKTRAN 154Q CHECKTRAN 142Q \DWIMIFYBLOCK/WTFIX0 124Q CLISP-SIMPLE-FUNCTION-P 102Q CHECKTRAN 17Q DWIMIFY2) (1427Q DWIMCHECK#ARGSFLG 1246Q BINDS 1234Q BINDS 1224Q INFO 1151Q NLAMBDA 1142Q LAMBDA 1120Q RESETVAR 1064Q FUNCTION 1032Q COND 1012Q NOFIXVARSLST0 1006Q NOFIXVARSLST0 777Q NOFIXVARSLST0 754Q SETARG 745Q RPAQ 737Q SETN 730Q SETQ 626Q SELECTQ 577Q DWIMCHECK#ARGSFLG 570Q GO 561Q QUOTE 545Q NOFIXVARSLST0 537Q NOFIXVARSLST0 525Q GLOBALVARS 517Q USEDFREE 500Q DECLARE 470Q PARTIAL 457Q * 445Q NOFIXFNSLST0 441Q NOFIXFNSLST0 366Q NLAMBDA 355Q LAMBDA 342Q DWIMEQUIVLST 301Q DWIMEQUIVLST 254Q PARTIAL 243Q CLISPRETRANFLG 222Q NLAMBDA 211Q LAMBDA 176Q DWIMEQUIVLST 107Q CLISPRETRANFLG 71Q NLAMBDA 60Q LAMBDA 45Q DWIMEQUIVLST) () \DWIMIFYBLOCK/DWMFY2 D1 (P 6 ATTEMPTFLG P 5 NEXTAIL P 4 89CHANGE P 3 CLISPCHANGE F 12Q TAIL F 13Q PARENT F 14Q FORMSFLG F 15Q CLISPCONTEXT F 16Q SUBPARENT F 17Q ONLYSPELLFLG F 20Q ONEFLG F 21Q TYPE-IN? F 22Q FAULTFN) W´‚±°W‘ Wið§WdWð—¿Wc¿W`µWºh[\½Wµ±mYd²;¿Wgð¤I ¿W¢±ìWWð¢±ãJgð¨Jgð¢±ÔWdW ±Ålð¢±¾Jg _gð¬O²BgO²:`¢±œI`’±“`I ¢±ˆW$ •ki ¿oi ¿Ii ±j`’±dI ¢±\W´.WWð²%Wg ²IWð¢±‚Wgð¢±xi_¿°BWgð²0WWð²(J¦O“O³Wg ²IWð’J˜gc¿±§Ig µ1Wž`ið³^`“W"²VIWWWW ²GL¢±Èh__¿±þ²Jg ð³ÇW²ÁWWð“i_¿WW ¿W¢±Hlð’±¤±ôWHð“i_¿W–WWð³tI ²VWgð²WWð²J¥O’O¨gc¿±üWgð³DW³?Wgð³7I ³1Igð³*I`ð³#WW °N³`—Ig ¨I`¿W ’±ÿeMµW…ið‘hMc¿±ýÝWgð³MWdgðž¿O’O¥H³8Wið²O².O²*W"²>o°JHšOHg „OœO™HdH ¿W ¡HO‘hMµWið’WMoH lmÿ oH ohi²¿WdW ¿WW ±ÿ<(1375Q DWIMIFY1 1364Q /RPLNODE 1347Q FIXSPELL1 1342Q CONCAT 1333Q MKSTRING 1330Q RETDWIM2 1320Q CONCAT 1315Q SUBSTRING 1306Q RETDWIM2 1245Q /RPLNODE 1225Q DWIMIFY2A 1060Q GETPROP 1040Q DWIMIFY1A 1011Q EXPRP 714Q \DEFINEDP 641Q DWIMIFY1A 606Q GETPROP 556Q \DWIMIFYBLOCK/WTFIX0 514Q GETPROP 461Q DWIMIFY2A 364Q DWIMIFY2A 335Q CLISPNOTVARP 317Q LISPXPRINT 311Q LISPXPRIN1 300Q LISPXSPACES 272Q FIXPRINTIN 261Q STRPOSL 206Q GETPROP 164Q /RPLNODE 112Q DWIMIFY1) (1222Q QUIET 1141Q FORWORD 1130Q FOR1 1071Q NOFIXVARSLST0 1065Q NOFIXVARSLST0 1055Q CLISPTYPE 1050Q CLISPFLG 1026Q COMMENTFLG 1017Q E 1002Q NORUNONS 765Q IFWORD 752Q FOR1 723Q FORWORD 603Q CLISPWORD 534Q NOSPELLFLG 525Q NOSPELLFLG 511Q CLISPWORD 477Q FOR1 456Q QUIET 424Q FORWORD 404Q FORWORD 361Q QUIET 325Q NOSPELLFLG 255Q CLISPCHARRAY 245Q NOFIXVARSLST0 235Q DWIMCHECKPROGLABELSFLG 225Q LABELS 213Q LABELS 203Q INFO 144Q NLAMBDA 136Q LAMBDA 104Q LINEAR 45Q DWIMEQUIVLST) ( 1337Q ")" 1324Q "... " 1302Q "... " 1206Q "" 305Q "suspicious prog label: ") \DWIMIFYBLOCK/FIX89 D1 (L (2 POS 1 N 0 FORM) F 1 FAULTX F 2 TAIL F 3 EXPR) XA`ð“g‚gQ“Q3’R´B§QA ¡hSg@“@3“g‚g@ihHhBhhhhh gi h(124Q LISPXPRINT 115Q EDITE 37Q \DWIMIFYBLOCK/FIX89A) (120Q couldn't 63Q F= 57Q F 46Q ORR 14Q FIX9 10Q 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) ]@µ&B§A@ b¿@dkBkÙµoA`ðšo‰b¿°Øo @BkØ µohPQhð´g ‘iR´ich(120Q FIXSPELL1 73Q SUBSTRING 64Q CONCAT 26Q SUBSTRING 12Q STRPOS) (114Q MUSTAPPROVE 40Q LPARKEY) ( 101Q "" 61Q " )" 46Q " (" 34Q "") \DWIMIFYBLOCK/FIX89TYPEIN D1 (L (2 APPLYFLG 1 CLST 0 X) F 1 FAULTARGS F 2 FAULTPOS F 3 FAULTX) ]gi @Að² @ Xid¿RHB¢S„Qd‘h °/B’QµSc¿RA@ idi@d¦¿Q‰h°å Qh(131Q \DWIMIFYBLOCK/RETDWIM 124Q PACK 104Q PRINT 77Q PACK 74Q LDIFF 52Q \DWIMIFYBLOCK/RETDWIM 31Q PRINT 23Q PACK 11Q 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 10Q FAULTFN F 11Q FILEPKGFLG F 12Q HISTENTRY F 13Q FAULTAPPLYFLG F 14Q FAULTXX) - WSð£hc ¿Sdlð²+ X²$H ¢±•WSdlð—g ¿SX±ÜSg §Sg œS —S¸hc±¿Sg Yµ+U²P`²2`S ²)VSWhYdiX²TH ¿°. ”SX±¿°U²`ið¯WWð—`VYµd\d— h°$mÿ `©Ld`•¿Lh‡oh]—Nµ.M_^¿µÃO [`³@gð²W’W¢W«gŠ ^M°Ògº`˜`²U`¤`²FK`”oƒoJdgð²¿`•o°o°gð`”o‡o‚iJ †Jgð›i™@iW´ý@kIcd´ @lIch(431Q NLEFT 412Q NLEFT 354Q FIXSPELL1 346Q SHOULDNT 216Q LAST 156Q APPLY 75Q NTHCHAR 63Q RETDWIM2 44Q LDIFF 36Q TAILP 21Q RETDWIM2) (375Q NOFIXVARSLST0 361Q NEEDNOTAPPROVE 330Q LCASEFLG 323Q MUSTAPPROVE 303Q LCASEFLG 274Q NEEDNOTAPPROVE 255Q LCASEFLG 247Q CLISPHELPFLG 243Q TREATASCLISPFLG 236Q CLISPHELPFLG 232Q TREATASCLISPFLG 226Q MUSTAPPROVE 212Q NEEDNOTAPPROVE 173Q PROBABLY 162Q TREATASCLISPFLG 111Q CLISPCHARS 100Q CLISPCHARS 26Q CONCAT) ( 342Q " TREAT" 335Q " treat" 316Q " TREATED" 310Q " treated" 267Q " AS CLISP" 262Q " as clisp" 126Q " ") \DWIMIFYBLOCK/SHRIEKER D1 (L (0 LOOKAT) F 2 WORKFLAG F 3 NCONCLKUP F 4 NCONC1LKUP) J @d˜d3‘¿¤hc@@¸@b¿Hdgð³gð¢±á@d¢±X@bHgð²'¿¿@d¢±ýX@bd Ydµ‚±:gcSHh@ YdµgcgHh3žgcgHIhRµgcgHIhdgð˜¿HI Idgð³dgð«dgð¥dgðŸ¿gcgHIhdgð¿gcHI Igð²gcgHIhgHIh@µgcgHh YRµgcgHhdgð³dgð«dgð¥dgðŸ¿gcgHIhdgð˜¿HI Idgð¦dgð²¿gcgHIh¿gHIh3œgcSHIhRµgcSHIhdgð’±þídgð¥dgð¿gcSHIhdgð²¿gcSHIgIhdgðŸ¿gcSHIhdgð¿gcHI Igð²"I®gcTHIhgcSHIhSHIh(1030Q ATTACH 542Q ATTACH 433Q \DWIMIFYBLOCK/SHRIEKER 345Q ATTACH 250Q ATTACH 146Q \DWIMIFYBLOCK/SHRIEKER 117Q \DWIMIFYBLOCK/SHRIEKER) (1066Q NCONCING 1047Q NCONC1ING 1035Q LISTING 1020Q NCONCING 1012Q !!IT 772Q NCONCING 764Q !IT 746Q LIST 734Q NCONCING 725Q NCONC1ING 707Q NCONCING 701Q CONSING 673Q APPENDING 662Q NCONCING 644Q NCONCING 624Q NCONCING 607Q CONS 572Q CONS 565Q CONSING 556Q !IT 550Q !!IT 531Q LISTING 516Q CONS 511Q CONSING 503Q NCONC1ING 475Q NCONCING 467Q APPENDING 460Q CONSING 447Q LIST 442Q LISTING 423Q LIST 416Q LISTING 401Q APPEND 365Q APPEND 360Q APPENDING 352Q !!IT 335Q APPENDING 327Q !IT 314Q APPEND 307Q APPENDING 301Q NCONC1ING 273Q LISTING 265Q CONSING 256Q NCONCING 237Q APPENDING 224Q APPEND 217Q APPENDING 202Q APPEND 175Q APPENDING 162Q APPEND 155Q !IT 132Q !!IT 72Q ! 45Q ! 37Q !!) () \DWIMIFYBLOCK/STOPSCAN? D1 (L (3 OPRFLAG 2 OPR 1 CLTYP1 0 CLTYP2) F 0 BRACKETCNT F 1 BROADSCOPE F 2 BRACKET F 3 CLTYP) ª@´‚±¤A´‚±Q²PjðªP´P ´ @gð²Oh@gð²-BRðŸC´rPkð´mBg Agð´^PjðµYP´TP PjðªP´FP ´@Bg ‘CAd—d3’¿A€@d—d3’¿@€ýñ¡i@´@Ad—d3’¿A€ýñ´@ch(160Q GETPROP 147Q \FZEROP 131Q \FZEROP 103Q GETP 35Q \FZEROP) (155Q UNARYOP 110Q BRACKET 100Q UNARYOP 54Q BRACKET 43Q BRACKET) () WTFIX D1 (P 11Q DWIMIFYFLG P 10Q 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) T‘U¡V€hi"(15Q WTFIX1) NIL () WTFIX1A0023A0024 D1 (NAME ERRORSET F 0 FAULTX F 1 FAULTFN) PQ i(4 CLISPDEC0) NIL () WTFIX1A0023A0025A0026 D1 (NAME ERRORSET F 0 FAULTEM1 F 1 FAULTFN) PQ i(5 CLISPDEC0) NIL () WTFIX1A0023A0025A0027 D1 (NAME ERRORSET F 0 FAULTEM1) i¿P ¿hh(10Q DWIMIFY1?) (3 CLISPFLG) () WTFIX1A0023A0025 D1 (NAME ERRORSET P 0 EXPR F 3 FAULTEM1 F 4 FAULTX F 5 RESETVARSLST F 6 TYPE-IN? F 7 HISTENTRY) è`´Vhð¿Sdgð²¿T µ‚±Ã±½dgð¿T c¿hc±«dgð›¿Td ±™gð¢±„T!Tcdgðš¿oi ¿S`ð”Sc€S¤SµS c¿g`Uc Yºog I¿JdUð•¿Ic U ™UkJI¿£¿T ¿TS STkIc¿hh(322Q CLISPTRAN 314Q CLISPELL 307Q ERROR! 277Q NLEFT 270Q TAILP 242Q WTFIX1A0023A0025A0027 210Q \APPEND2 155Q WTFIX1A0023A0025A0026 110Q CLISPTRAN 105Q MAKEMATCH 60Q \DWIMIFYBLOCK/CLISPIF 42Q \DWIMIFYBLOCK/RETDWIM 31Q CLISPFOR) (250Q CLISPFLG 237Q INTERNAL 221Q CLISPFLG 216Q CLISPFLG 165Q COMMENTFLG 142Q CLISP: 116Q PREFIXFN 75Q MATCHWORD 51Q IFWORD 21Q FORWORD 12Q LCASEFLG 2 LCASEFLG) ( 234Q (WTFIX1A0023A0025A0027) 151Q (WTFIX1A0023A0025A0026)) WTFIX1A0023 D1 (NAME ERRORSET L (0 NIL) P 21Q CLISPERTYPE P 20Q TYPE-IN? P 17Q FAULTFN P 13Q CLISPERTYPE P 12Q SIDES P 11Q CLISPCHANGES P 10Q FIXCLK P 7 HISTENTRY P 6 NEWTAIL P 5 FAULTEM1 P 4 CHARLST P 3 FAULTXX P 2 BREAKFLG P 1 TYPE-IN? F 22Q FAULTX F 23Q DWIMIFYFLG F 24Q FAULTAPPLYFLG F 25Q FAULTPOS F 26Q RESETVARSLST F 27Q FAULTFN F 30Q CLISPCONTEXT F 31Q CLISPCHANGE F 32Q DWIM.GIVE.UP.TIME F 33Q DWIM.GIVE.UP.INTERVAL F 34Q VARS F 35Q PARENT F 36Q EXPR F 37Q FAULTARGS F 40Q LISPXHIST F 41Q FILEPKGFLG F 42Q TAIL) Þ`W4©l W6ö¿áW&˜W.gðY°Hl _¿W(“g‚g c*¿`ið©W*`¿mÿW* i c.¿JµW<]d’ c8¿IgW@ _¿I²2W&³.W(›W$`ð°W$`ð©W$`ô—`_¿W(’W$…W$d[lð—K` ¼W(³W$lðš¿¿±âW(š¿¿±ÔI².KOð²&`ið³`L]²`—`K ¨ML ¿±¥`¢±™L¢±ÎW$]lð¢±‡Mg «Mk ]`²rMg ²Mgð²bW$` g ²LW$ ³DW$ ²;W$ ¢±&W$W$ ´WBŸOlð˜Og ¿i’±$i¸±ùL¢±8W$dgð²n¿W$ggW$²MW$d²)²AW$°d_d˜ið¬Olð•µîi¿h²!W$W$ ªW$g £W$ˆghW$h±£gðoi ¿ic$°[W$g ]¢±ÿ,g`W,c,__¿og O¿OdW,ð—¿Oc,°W, œW,kOO¿£¿W&¢±1ic2±*W$g ©W$g œW$ •hc.± W$g ]µ‚±W$ LW$d]µ‚±â`–W$]µ H’±¯W&¢±W$¢±†W$ ²~±¼dlð³¿M3²×jMó²ÒW$ ²ËMg ®M` ]`²´MW$W$i]²§KW$ð¢±r`›W$` ’±bW&²ŠK` ¼hc2¢±ÿ|±L ’±I±BH³W$²W$™W$ ’±)`‡d ]¤µ÷h²W(›W*MiW>±W*M ±þH’±L²XW$h`hW$hddi µW&´`´W$h`hW$hddi [²&OW$ð´OW$O¿h_¿K ’±¤±ýŠ`¢±¢W&²3W$².W0²)W$h`hW$hddi ²W$` WDW:]³d`²gO³cO³_W$]²XMlð²QMh`hW&”W0µW$hddi ]²5W&²W0žg oiŽMW$W$i]›Mc$¿W*W$ ¿hh(2327Q \DWIMIFYBLOCK/RETDWIM 2323Q \DWIMIFYBLOCK/RETDWIM 2305Q \DWIMIFYBLOCK/CLISPATOM 2267Q RETEVAL 2257Q \DWIMIFYBLOCK/RETDWIM0 2236Q FIXSPELL 2147Q \DWIMIFYBLOCK/CLISPATOM 2140Q DUNPACK 2125Q FIXSPELL 2047Q \DEFINEDP 2036Q /RPLNODE 2007Q FIXSPELL 1752Q FIXSPELL 1715Q \DWIMIFYBLOCK/RETDWIM 1704Q \DWIMIFYBLOCK/RETDWIM 1657Q EVAL 1642Q \DWIMIFYBLOCK/FIXLAMBDA 1611Q \DWIMIFYBLOCK/RETDWIM 1602Q WTFIXLOADEF 1564Q DUNPACK 1545Q GETHASH 1515Q \DWIMIFYBLOCK/CLISPATOM 1473Q DUNPACK 1463Q GETPROP 1452Q \DWIMIFYBLOCK/CLBINARYMINUS? 1416Q \DWIMIFYBLOCK/FIXLAMBDA 1343Q \DWIMIFYBLOCK/CLISPATOM 1333Q CLISPNOTVARP 1316Q GETPROP 1276Q DWIMUNSAVEDEF 1267Q GETPROP 1255Q GETPROP 1227Q ERROR! 1216Q NLEFT 1205Q TAILP 1151Q WTFIX1A0023A0025 1107Q GETPROP 1070Q WTFIX1A0023A0024 1050Q /RPLNODE 1024Q CLISPFUNCTION? 1011Q MEMB 1006Q FREEVARS 644Q MARKASCHANGED 620Q \DWIMIFYBLOCK/FIXLAMBDA 615Q GETD 575Q \DEFINEDP 565Q CLISPNOTVARP 554Q CLISPNOTVARP 544Q GETPROP 536Q PACK 532Q DUNPACK 507Q GETPROP 471Q NTHCHAR 463Q GETPROP 417Q \DWIMIFYBLOCK/FIX89TYPEIN 411Q STRPOSL 340Q SHOULDNT 334Q \DWIMIFYBLOCK/FIXAPPLY 322Q SHOULDNT 316Q \DWIMIFYBLOCK/FIXATOM 277Q DUNPACK 155Q MEMB 140Q \DWIMIFYBLOCK/GETVARS 121Q FINDFN 115Q FSTKNTH 63Q STKPOS 43Q CLOCK 13Q \CLOCK0) (2254Q CLISPATOM1 2212Q CLISPINFIXSPLST 2155Q CLISPFLG 2135Q WTFIXCHCONLST 2112Q CLISPISWORDSPLST 2061Q CLISPFLG 1774Q NOFIXFNSLST0 1763Q NOFIXFNSLST0 1737Q SPELLINGS2 1651Q DWIMUSERFORMS 1561Q WTFIXCHCONLST 1542Q CLISPARRAY 1534Q CLISPARRAY 1500Q CLISPCHARS 1470Q WTFIXCHCONLST1 1460Q CLISPTYPE 1355Q CLISPFLG 1313Q FILEDEF 1264Q CODE 1252Q EXPR 1160Q LCASEFLG 1146Q INTERNAL 1124Q LCASEFLG 1121Q LCASEFLG 1104Q CLISPWORD 1056Q CLISP: 1034Q X 1021Q OKVAR 710Q LAMBDA 705Q FUNCTION 674Q F/L 641Q FNS 541Q CLISPTYPE 527Q WTFIXCHCONLST1 515Q ~ 504Q UNARYOP 475Q CLISPCHARS 460Q CLISPTYPE 426Q CLISPFLG 405Q CLISPCHARRAY 401Q CLISPFLG 371Q LPARKEY 362Q NOSPELLFLG 274Q WTFIXCHCONLST 241Q LISPXHISTORY 231Q LISPXHISTORY 216Q LISPXHISTORY 202Q LISPXHISTORY 150Q SIDE 105Q CLEARSTKLST 101Q CLEARSTKLST 71Q CLEARSTKLST 60Q FAULTEVAL 54Q FAULTAPPLY 32Q TYPE-IN 2 NOSPELLFLG) ( 2263Q (PROGN (SETQ CLISPRESPELL T) NIL) 1143Q (WTFIX1A0023A0025) 1064Q (WTFIX1A0023A0024)) WTFIX1 D1 NIL `´oigµo(17Q WTFIX1A0023) (14Q WTFIX 2 DWIMFLG) ( 25Q (SELECTQ (CAR (ERRORN)) (1 (* NORMAL ERROR! FROM RETDWIM0) NIL) (57Q (* CONTROL-E) (ERROR!)) (ERRORX)) 10Q (WTFIX1A0023)) EXPRCHECK D1 (P 0 D I 0 X F 1 ADDSPELLFLG) f@dlð©o ¿°=i X ³3@ ³9`²@lF`hdg Xµ@o ¿‰b X ›Q•@j ¿@H@o h(142Q ERROR 125Q ADDSPELL 115Q EXPRP 111Q VIRGINFN 102Q ERROR 67Q MISSPELLED? 41Q \DEFINEDP 33Q EXPRP 27Q VIRGINFN 20Q ERROR) (63Q GETD 56Q USERWORDS 46Q DWIMFLG) ( 137Q "not an expr." 77Q "not defined." 15Q "not a function.") CLISPNOEVAL D1 (P 0 TEM I 1 DEFAULT I 0 FN F 3 MACROPROPS) 0@`Xµ@ dkð¤dlð˜¿i°Ub°í³C@d`³Id`³Bg ¨@S ¢A°/`²@g Ygðµ:I´6gI´/iiŠ@d`¦`´@g ZgðµJ´ gJ´ihð(167Q GETPROP 115Q GETPROP 75Q GETLIS 67Q GETPROP 16Q ARGTYPE) (205Q EVAL 173Q EVAL 164Q INFO 155Q NLAML 150Q NLAMA 133Q NOEVAL 121Q NOEVAL 112Q INFO 104Q DWIMINMACROSFLG 64Q MACRO-FN 56Q NLAML 47Q NLAMA 6 DWIMEQUIVLST) () DWIMERRORRETURN D1 (I 0 ARG F 0 CLISPERTYPE) @“@c¿(10Q ERROR!) NIL () DWIMARKASCHANGED D1 (P 0 L I 1 $SIDES I 0 FN F 1 LISPXHIST) W@lð´PgQ H´HdAð‘hdgð«dgð¥dgð•¿HX°ß¿@gggQ “g‚g(124Q MARKASCHANGED 106Q MEMB 15Q MEMB) (121Q CLISP 115Q CHANGED 102Q *LISPXPRINT* 77Q CLISP% 74Q FNS 57Q * 51Q CLISPRPLNODE 43Q /PUTHASH 11Q 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²[gðhð´SA´Qi jð¥ki ¿oi R‘S¡T®`•o°oŒ`”oƒoi @idoi @(133Q LISPXPRIN1 123Q LISPXPRIN2 115Q LISPXPRIN1 47Q LISPXPRIN1 36Q LISPXSPACES 26Q POSITION) (77Q LCASEFLG 60Q LCASEFLG 6 TYPE-IN) ( 127Q "}" 111Q "BELOW " 104Q "below " 73Q "IN " 65Q "in " 43Q "{") 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 DWIMIFYFLG F 4 NOFIXFNSLST) õ @lð¡hAd³Igð–@ ´ð@ ³P@S“`€T³D@g ³9`ið³Ê`’R´Ä`@ ³¹@ ¹@h`B´gB¡@€i X´›B²dAgð’H²u`´rR”oŽo@DlB RœHµ@DlC°oHµ@…’H€HohiB£H´gH´g ´H²B²H˜@HH@ƒ@H@¿@(357Q /RPLNODE 324Q FIXSPELL1 276Q CONCAT 230Q CONCAT 155Q MISSPELLED? 127Q UNPACK 120Q STRPOSL 67Q GETPROP 41Q CLISP-SIMPLE-FUNCTION-P 32Q CLISPNOTVARP) (320Q n 311Q MUSTAPPROVE 200Q CLISPHELPFLG 170Q QUIET 144Q NO-MESSAGE 136Q SPELLINGS2 113Q CLISPCHARRAY 104Q NOSPELLFLG 75Q NOSPELLFLG 64Q CLISPWORD 52Q NOFIXFNSLST0 23Q NOTVAR) ( 273Q "' meant to be used as a function" 253Q "is '" 215Q "in ... " 210Q "") 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@ hð´I@Qhð´B@P“`€Rhð´5P‘T«@U hð´%@g hð´@`hð´@Vhð´@Shð(62Q GETPROP 47Q RELSTK 44Q STKSCAN 3 BOUNDP) (72Q GLOBALVARS 57Q GLOBALVAR 24Q NOFIXVARSLST0) () CLISP-SIMPLE-FUNCTION-P D1 (I 0 CARFORM) ,@ ³%@ÁÉg'³@ÁÉg'¤@ ¨@` ´i(46Q GETLIS 36Q MACRO-FUNCTION 3 \DEFINEDP) (43Q COMPILERMACROPROPS 30Q CLISPWORD 15Q 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²(KY˜JIIJƒJIJ¿A›Jg Að‘i¸µÏH(66Q GETPROP 53Q /RPLNODE 11Q MEMB) (63Q 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¢±æ Xgð§Hdgð”¿l°?gð²(mÿ@ Xgð¦Hgð´*lmÿ@ Z J ¿°Hgð¨Hdgð²#¿l@ YgðªIdgð¢±T¿mþ@d°‹gð²A¢±d@ Zc¿J±]Hgð§Hdgð”¿l°Agð²(mÿ@ Xgð¦Hgð´,lmÿ@ Z J ¿°HgðªHdgð¢±¢¿l@ ¹k@ c¿Igð¨Idgð²¿mþ@d±þüH c ¢±²H±Õgð’±¦Iµg±ÄgðŸA“ic ¿ic¿g±¯Idgðœ¿A“ic ¿g±›gð²Pg@ ³Bgmÿ@º@ ¿mÿJdb Xlð²BHg Z¢±ÿ{Hg µ‚±ÿnJ±ÿjg°FI›S£Ic¿g°7ic¿g°.gðšmÿ@h@±þ5Ic¿Ažl@ c¿k@ †k@ c@ ¿(770Q RELSTK 761Q STKARG 753Q STKARG 743Q STKARG 724Q REALSTKNTH 637Q GETPROP 623Q GETPROP 605Q STKNAME 600Q STKNTH 570Q RELSTK 563Q STKPOS 550Q EVALV 431Q EXPRP 424Q GETD 415Q STKNTH 364Q STKARG 356Q STKARG 324Q RELSTK 320Q STKARG 314Q STKNTH 267Q STKNTHNAME 217Q STKARGS 176Q STKNTH 146Q STKARG 116Q RELSTK 112Q STKARG 106Q STKNTH 61Q STKNTHNAME 23Q STKNAME 11Q STKNTH) (712Q INTERNAL 705Q TYPE-IN 674Q EVAL 655Q BREAK-EXP 634Q ALIAS 620Q BROKEN 555Q BREAK1 544Q BRKTYPE 536Q BREAK-EXP 530Q BREAKCOMS 514Q BREAK 504Q TYPE-IN 465Q : 457Q EVAL 444Q INTERNAL 402Q SELECTQ 373Q SKIP 342Q RETEVAL 333Q STKEVAL 301Q STKEVAL 273Q RETEVAL 256Q ENVEVAL 244Q \SAFEEVAL 235Q EVAL 203Q APPLY* 161Q SELECTQ 152Q SKIP 134Q RETAPPLY 125Q STKAPPLY 73Q STKAPPLY 65Q RETAPPLY 50Q ENVAPPLY 36Q BLKAPPLY 27Q APPLY) () DWIMUNSAVEDEF D1 (I 1 FLG I 0 FN F 0 SIDES F 1 TYPE-IN? F 2 LISPXHIST) C@idA³*Q³'Pgð³g`gR Phhc¿oi i @ (100Q UNSAVEDEF 74Q LISPXTERPRI 70Q LISPXPRIN1 45Q FLAST 40Q MEMB 5 LISPXPRIN2) (34Q *LISPXPRINT* 31Q COMMENTFLG 26Q CLISP% 20Q CLISP% ) ( 64Q " unsaved") CHECKTRAN D1 (L (0 X)) `˜@` µ`´ @`ð´@(12Q GETHASH) (26Q CLISPTRANFLG 17Q CLISPTRANFLG 7 CLISPARRAY 2 CLISPARRAY) () CLISPRPLNODE D1 (I 2 D I 1 A I 0 X F 0 LISPXHIST) ,@²P²g@d@h ¿@A@dB¿l@h (51Q ERRORX 26Q UNDOSAVE) (11Q 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