ò¦‡; ô\QU*UjUDEFPROPðLSB:DEFAULT-DEFINITIONðLSBLSBRUNAUTOLOADððòð‡xðSETQð*SOURCE-FILE-INFORMATIONðQUOTEU*U*UðDSKFORMATFLRMATð204:MODULE:SYSTEM:COMPILATION-DATE(U*U*U ð#ð:LISP-VERSIONð2057:FEATURESðLOOPðXLSBU*U*ULSB:CIBOOTPDP-10FASLAPNCOMPLRCOMPLRSHARABLEMACLISPðPDP10ðBIBOPU*U*UBIGNUMFASLOADðHUNKFUNARGðROMANðNEWIOðSFAPAGINGðMLU+U*UðITS:COMPILER-VERSIONð924ðð ð òð ð ðð òð ð ð ðîððððð!ð#ð%ð'ð)ð+ð- ð/ò ò‡xðORSTATUSFEATUREðGETðPPNU+U*PðANDðLISPPUTPROPð1ð-òð3ðòð5ð3òð7ðð3òò‡xEXPLODENRECLAIMFLOORMAT-FIND-SIGNIFICANCEðSUBR,8‡ö0 ðÿÿ#øË€õŽ€ "h $@(} ð[ ø+_ö3Eõ`0LõË€Z5Dh` U5 Nh@ða9õ–€,xðè;ðFLOATðMAXP "ðFLOORMAT-DISSECT-FLONUMõŽ,<Sõ§,8ðÿÿ,8ðÿÿð`õ«ÿûõŽ€5Nô €ô Npô;ÿÿõ`™ýUh "hô³ÿÿ B`ûcóÿÿ 8ö€-+PôK€ûAsÿÿô3ÿÿô»ÿûU$UHûcóÿÿ 81Nhõ`E p5nûcóÿÿ 81Nõ`;Ut:phUt w‡$.ûdsÿÿ @/0.û@óÿÿô³ÿÿtP Nw‡+U\û@óÿÿô³ÿÿUpöð3ÿÿõ`_ûcóÿÿð 8ö3€Eõ`_ pö»€Sûcóÿÿ 81N+*h4U#(:pU( w‡$.ûdsÿÿ @/0.P÷À;ÿýû@óÿÿô³ÿÿ Nw‡õ`GUöð3ÿÿ+=û@óÿÿô³ÿÿ[ 8ö€-+6ôK€Zô3ÿÿ Nwï}@P+7U)\ûAsÿÿô3ÿÿU)HUöð3ÿÿ+= wï~ð$.ûdsÿÿ @/0.û@óÿÿô³ÿÿ Nwï~+7n@îU,U$4 wï~$wï}õûÿý Nwï~U@ w‡&.hö´‡ w‡&.:wï~>p Nw‡+?UT,8``ø3ÿÿ $õ–ða9ô»ÿû$nw‡ô —,8 *p =õŽ "hõŽ",ðo=U0` ô»ÿÿh@Uhô»ÿÿ-, $p-,ð7 $wï~-,0Zð7 $w‡-,ð7U6D/ðÿÿõçðÿÿ@]õæ€ðÿÿõæðÿÿ,xðððø; ðARGSúêà` ðð? ôò‡xFLOORMAT-HAULONGð?ðA ôò‡x,8‡ðÿÿ#@(} @P12t+XõË€&2tõ`«!z022õË€02u*UõË€9*MR/PðSð;TIllegal precision (number of digits) specifiedðFLOORMAT-RESIZE-FLONUMðERRORð^õŽ,<[ 8Z[@ @ZZH@[H H-, õ õ=õ,<ðÑõ ô»ÿûö›€Ë3nw‡õ`×UTô ×,8,8d*-, g‡-,ð7ô C-,ðÝõŽ",<"UhU@ pö[»ÿûõ`ùU\ð pös»ÿû+q .$nwï~÷À;ÿÿ:p+mUL wï~-,ðQC`ô»ÿÿ-,ð $Z` QDõŽ p-,ð &Z`QFõŽ0 p-,ðZ `QB g‡-,/0tðÿÿ+U$ wï~ö«€ÿôK€ 0/pwï~ô»ÿýhCU põã»ÿûõ $pô€E#õ wï}&p wï}&põõ w‡&. Nw‡ö\€hõ`öT€+ ô»ÿÿ&.ü4+ U#x÷@;ÿÿh U#dô»ÿÿôƒ»ÿù-,ðQC` wï~õã»ÿ÷õûÿûð`-,ð $Z`QDZõŽô»ÿÿð€€A Nwï}-,ðQC` wï}-,ðZ`QBhô 5,8õŽ?ô »ÿ÷õŽ",ðo=U*h $A@mô³ÿÿðaCõæðÿÿ/ðÿÿUõæðÿÿKu/ðÿÿ,xð! ð ;ð µð?ðC ôò‡xðFLOORMAT-FIXNUM-QUICKLYúFORMAT-TYO,< pö;€ õ`I&.õ "pð`€GðmõçðÿÿUHõ—&..0,< "p$} õçðÿÿ,xð; ð?ðG ôò‡xFLOORMAT-ZAP-FIXNUM,<,<õŽ ô ;ÿÿô€E#õUH w‡4N7 p&.ô;ÿÿôÄ Np&0.2õ "p$÷À;ÿýð6@`+6 w‡ôûÿÿ5P6õçðÿÿ+7UT(õçðÿÿ+,U\ "õæðÿÿõçðÿÿkU*U,xð$;ðQðð?ðI%ôò‡xðMINFLOORMAT-FLONUM-SIGN-AND-PADðTðEU*TFORMAT-REPEAT-CHARðSTANDARD-OUTPUTðFLOORMAT-SIMPLE-FLONUMðLSUBR,=gï~,=`û@óÿûZð[,<Z[,<,8ðÿÿ6@gï~õ`ðÐ ô»ÿýöK»ÿÿõ`…Uô ;ÿý gï}ðaC Bgï}U[gï},<Zgï}[,<Zgï}Z[ ðô»ÿû.pô;ÿûõäõ,<3.+Oö¼ßðÝ6@gï~+OöÐ3ÿýõ`ßõË€3nwï~õ`ßU8U$P6@g‡+Q * Jg‡U` ,V,8õŽ3ÿýô»ÿù=õë€õ *põŽ",ðoKUõçðÿÿðC ô;ÿùõä Pp.pw‡ô»ÿÿ $pô€E#0ô ;ÿÿô »ÿý $wï} g‡õ&ô&pô €MðC $w‡,< "pô»ÿûða€I "'$ w‡4nhô»ÿûôûÿÿ gï~ $w‡,< "pða€IõçðÿÿýCUô€O$ wï~ö«€× ./nwï~öã€1U#ð00aô €+õ "p$ô»ÿûð`€Gõçðÿÿõ`-ý Uô»ÿÿ5n7@g‡+s g‡5Nsüã€U$ ô €ô»ÿÿô ;ÿÿô »ÿý $wï} g‡&ô»ÿýô»ÿÿ (04Ny "($U$H "'$ põã»ÿùõ  $p "(ðaQ gï~ $wï| "wï~ða€IõçðÿÿDõ`-U#döœô ;ÿÿô »ÿý $wï} g‡& $p @ô€Eô»ÿý#ô;ÿýôÄô €Mô ;ÿÿ,< "p ða€I "'$ gï~ô ;ÿÿ "wï~ða€Iõçðÿÿ@ õ`-U)\ô ;ÿÿô »ÿý $wï} g‡&ô €Mô ;ÿùðCô»ÿýô»ÿýða€I ./põ $p "(ðaQPîP0 )jô€MõçðÿÿU|õæðÿÿ/0:uðÿÿ,xÿÿÿÿýð-@*`89ð?ðSðUðUôò‡xð-,8‡ðÿÿ,<õŽ,<,< w‡ö«€= .ð@/nw‡7*U\ "õŽöð3ÿÿ+&öÐöã€U .ôsÿÿ/põä,< $p "w‡ðaQõç6@(=ðÿÿU7@`+( "+$Uh w‡/0 Wðÿÿõçðÿÿ,xðMðð0;ð3ð?&ðWôò‡xUu*ð+FORMAT-PRINCðFORMAT.FLRMAT-1",ðd;+COLON-FLAGðATSIGN-FLAGðFORMAT.FLRMAT-2õŽ,8ðõŽ,8ô³ÿýô o,8õŽ gï~5B4@:î7D-+3û@óÿûõ`gU,ô³ÿûU-, ý =UõŽ,8-õŽ[,8gï},8gï}",ðoSUpu*U/ðÿÿ,xðp;ðWðLEFTðFORMAT-JUSTIFYfmt.F.op|õŽ,8[Z[ Z [õŽô3ÿÿhõŽõŽZô³ÿý[ö°€ô€]UtõŽ)P0Zgï~ Bgï~[ö°€‡ô€]U,8ðÿÿõŽ"!õŽõŽöÐ3ÿù+U5FJ6@-+J5JJô³ÿ÷t,+dUô³ÿ÷ô³ÿýô ©,8õŽð ô³ÿý5BQ7D-+Pû@óÿûõ`¡U#xô³ÿûU#d4 -, U#PõŽ,8-õŽ[õŽ3ÿû,8gï{",óÑÑ!ðoSU#<+dU5F]6@-+]5J]ô ¹@",8,8eõŽ3ÿ÷õŽË,8fõŽõŽÍ,8gïxôKóÑÑ<0U)p+dU)\ ,d,8,8gõŽ3ÿ÷õŽÏñ,8hõŽõŽÑ,8gïxõŽ3ÿ÷õŽ,8gïy",<0nA@D"U*,Ul/ðÿÿ,x/ ð_ðY"jU/ ð_.ð„;ð qð?ða ôò‡xFORMAT-CHAR-TABLE#FORMAT-CTL-ONE-ARGu*Tð71ðcða2‡x Can't print ~D digits to left of decimal pointî;when there are only ~D significant digitsFERRORð+FLOORMAT-EXPONENTIALõsÿû,=gï~,<ðÿÿ ô»ÿÿ3nw‡+q ,q,8,8ðÿÿ,80ô »ÿÿ]õŽ (w‡,8",<3UUZgï}Zð[,<õŽô»ÿý3.p+v7@g‡õ`ïUh ô ;ÿýô³ÿùðaCUTû`óÿù,<û@óÿù[,< Z[ ,8ðÿÿô»ÿûô»ÿÿ5. .ðCCõû»ÿÿ "+$+U8öð3ÿû+ô€g$hCU$ô»ÿû/wï~õ $pô€E# w‡ôÄ wï}õä»ÿûõ,<õ .rwï~ö´ wï|õë€ð40aõ $p gï~ðaQ "($õçðÿÿõ`h(0UDô»ÿÿð`€GU0 "'$ô»ÿû&w‡ w‡îP,<&.õ,<ðÿÿU\ô»ÿÿö“€= w‡ 5Nôóÿýõ`5U#<ôûÿÿ w‡ôÄ;ÿÿ Np..40 Nwï{ Rw‡U#(õ "p$ w‡&. Nw‡ dõçðÿÿ+U#õçðÿÿô€O$ wï~ñö«€E ./nwï~öã€aU)4ô €+õ "p$ô»ÿûö;€ õ`S&...õ "p$õç0thðÿÿõ`WU*7@g‡õ`W g‡$U)pô»ÿû&..0,< "p$õæ ðÿÿ/ðÿÿuj,xðeð-@*@iðð?4ðiðiôò‡xðFORMAT.FLRMAT-3ô o,8@ gï}õŽ,8gï},8gï}õŽ[õŽ3ÿùõŽ3ÿùõŽ3ÿùt PôK<4UH/ðÿÿ,xP*1fmt.E.op|õŽ,8,8ðÿÿ[5B= g‡ B`-,6A@ U,8ðÿÿõŽû@óÿýô³ÿýö€[@hô3ÿÿUhû@óÿýô³ÿý[5BCô€]U|õŽ)PZgï~ Bgï~[5BF " ULõŽû@óÿûô³ÿûðÐ[5BIô³ÿÿUtõŽZgï} Bgï}[5BLôÐ "(UDZgï}[õŽ,86@gï}+Wô ­P,8 gï|5BR gï{U#<õŽõŽ3ÿù,8gï}ò=õŽ[õŽ3ÿùõŽ3ÿùõŽ3ÿùôK<4U#(+_U# ,_,8,8`,8gï|õŽÁ,8aõŽ3ÿ÷õŽÃ,8gïxðÝõŽ3ÿó,8gïz,8gïzõŽ,8",<0U$ U(D_/ðÿÿ,x/ ð_5ð¬;ð qð?ðk ôò‡xuð71ðOðk2‡xðFLOORMAT-MONEYõŽ,<,<-,[,< *Z[,< $Z[,< ô»ÿÿð.p põäõŽõ,<3pwï}+~ ,rð=,8.wï}õ *põŽõŽg",ðo=Uh0õçðÿÿ $ô³ÿÿðaCô³ÿÿ-,[  &Z[  (Z[ ð Nwï~ô;ÿýõÄ Rw‡/ B`ô;ÿÿ RpUh@= wï~5. ./nwï~ "+$Uô  ,8Pô »ÿÿõŽ,84",ðo=UXô»ÿû/õðCC $p "(ðaQ,<ðÿÿô»ÿý5n "'$ðC .õû»ÿý3.wï|+ $wï| "(ðaQ+2U# ô ;ÿý "(ðaQ wï|õã»ÿý wï~õä,< $p!@ô€E#ô;ÿùôÄ,< "pð`€G/ðÿÿ@ 0+2U( w‡ö»€? "wï}ð`€G ./w‡õî $p "(ðaQ "'$ô ;ÿ÷ "(ðaQõç0t0ðÿÿ+2U$H $w‡ô€E# wï}ôÄ,<î "pô»ÿÿð`€G "'$ô»ÿùôûÿÿô;ÿùô»ÿý@Cö{»ÿ÷õ`Yõã»ÿ÷õ $pô€E# wï|ôÄ( Pwï|õçðÿÿU*,ô €Mô ;ÿýô»ÿùða€Iô»ÿ÷hõã»ÿýõ $p "(ðaQ/ðÿÿU/0Kuðÿÿõç ðÿÿ,x ð_ð°; bð?6%ôò‡xðFORMAT.FLRMAT-4B!õŽ,8õŽöò[õ`u6J-õ`u[ 8ñCÐ;ö‹€uô€g$U\õ–,Xõ–&6ð´;ðiU@ ðRIGHTfmt.$.op|,<ðÿÿõŽ,8[ö°€ " hhUõŽZô³ÿÿ[ö°€… " UT & ûBsÿÿ[ õŽõŽô3ÿýZ [ö°€ô€]ý0!U$õŽô³ÿûõŽöÐ3ÿý+Pöñ[õ`›ð= gï}ö‹€›ô€g$Ut g‡ gï~ `6ñÒ+cU7D-õ`¹öÑ€[+S gï}ö«€¹U@0 gï}ö«€¯ .[ @/-,ðQC`@0öã€ÉU(ô €+õ "p$ôóÿýõë€ô»ÿÿZô»ÿÿô³ÿýõçðÿÿUD ,c,8,8eõŽ3ÿûñõŽË,8f,8gï}õŽÍõŽ3ÿù,8gïzõŽ3ÿõôK <0nA@`U#xUtõæðÿÿõçðÿÿ,xð-7"}.x ð_ðmð¼;ð yð?ðo ôò‡xð718ðo2‡xò¦‡;