hưs2€D€p€,€l�FASD-DATA€D€¬€wkf€¬€Love†€�¦¨fF€|F€�D€p€,�COMPILER,‚NEW-DESTINATIONSp€ì€GLOBALl€T€p€B€ ¬€SITEl‚Gigamos Cambridge€p€B€ ,�PACKAGE€,�NEW-MATHp€B€ l�READTABLE€¬‚standard Common-Lisp1€D€C�IN-PACKAGED€ÀQUOTE€B€51€D€�DEFMACROÃ�FLOAT-ERROR-P€D€ÀSTATUSD€pÀl€SIl�XR-BQ-LISTD€B€;pÀ,�HARDWAREl�32LOGBITP€D€B€ED€B€;pÀB€Fl‚32LOGICAL-SHIFT-UPF€B€AD€pÀB€F,‚UNBOXED-CONSTANTD€ ÀLOGIORD€ƒ€ASH€F€D€C€1+pÀB€F¬‚$$FPU-EXACT-INFINITYD€B€RF€D€B€TpÀB€Fì‚$$FPU-OVERFLOW-INEXACTD€B€RF€D€B€TpÀB€F¬‚$$FPU-X-DENORMALIZEDD€B€RF€D€B€TpÀB€F¬‚$$FPU-Y-DENORMALIZEDD€B€RF€D€B€TpÀB€Fì‚$$FPU-XY-DENORMALIZED€D€B€RF€D€B€TpÀB€Fl‚$$FPU-ZERO-DIVIDE€D€B€RF€D€B€TpÀB€F¬�$$FPU-X-NAN€D€B€RF€D€B€TpÀB€F¬�$$FPU-Y-NAN€D€B€RF€D€B€TpÀB€F¬�$$FPU-XY-NAND€B€RF€D€B€TpÀB€F,ƒ$$FPU-INVALID-OPERATION€1€D€B€?C�FPU-STATUSƒ€NIL€D€B€;D€pÀB€Fì�FIELD-EXTRACT€D€pÀB€Fì‚READ-PROCESSOR-STATUS€pÀB€F,…%%PROCESSOR-STATUS-FLOATING-POINT-STATUS1€D€ƒ�DEFCONSTANT€Ã‚%%DPB-SHORT-IN-SINGLE€D€ƒ€BYTEF€F€1€D€B€˜Ã‚%%DPB-SHORT-ROUND-BIT€D€B€šF€F€1€D€B€?ƒ�SHORT-STATUSD€ÀSHORT€D€B€ED€B€;pÀB€F¬€DPB€D€pÀB€C¬�XR-BQ-LIST*€D€B€;pÀB€F¬€LDB€B€§D€B€;D€pÀB€Fl‚%%SHORT-FLOAT-SIGNp€,‚GLOBAL-REGISTERSl�*ALL-ZERO*D€B€;pÀB€Fì‚%%ALU-STATUS-NEGATIVE€D€B€­D€B€;ÀPROGN€D€B€ED€B€;ƒ€SETFD€B€;D€pÀB€Fl€R0B€§D€B€;D€D€pÀB€F,‚READ-ALU-STATUS€1€D€B€˜‚MANT-SIZE-CONST€D€B€TF€41€D€B€˜‚HIGH-SIZE-CONST€D€B€TF€€€