hưs8p,LAMBDAF2Dp,lFASD-DATADlRGClaude DebussyF~FcDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGEB(pB lREADTABLEstandard Common-Lisp1DLOAD-TO-COMPILATION-ENVIRONMENT-INTERNALDÀQUOTEÀFALCONDB:D{DDpB ,PROPERTYÀCAAADRplSISETF-METHODCOMPILER-ARGLISTDpB@l*MACROARG*C&OPTIONALpB@l*MACROENVIRONMENT*DÀTHIRDBBDÀMACRONAMED-LAMBDADDB>BLBBDFUNCTION-PARENTBLCDEFINE-SETF-METHODDÁDOCUMENTATIONDARGLISTCXDBPBLDBFBGBIDDECLAREBIDÀPROGNNILDANDDCORDCDBbBFFDpB@,MACRO-REPORT-ARGS-ERRORBFFFDLET*DDBVDCARDCDRBFDB[DBPBLBQDBSDBUBVB^DBqDDpB@,SINGLE-TEMPVARSDpB@SETF-MAKE-N-TEMPVARSFDpB@,STOREVARDÀGENSYMDpB@,TEMPVARSB}DÀVALUESBDLISTBVDBBDLETDDCVBDBVDNTHBDpB@lXR-BQ-LISTDB:pCONS,SET-CARDBDB:CDDRBVBDpB@XR-BQ-LIST*DB:BLBDCADRBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BsBVBDBDB:BBDDB>ÀCADADRBBBDDBFBGBIDÀTENTHBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:ÀNTHCDRF BVBDBDB:BBDDB>BLBBBDDBFBGBIDDB>ÀCAADARBBBDDBFBGBIDÀCDDADRBBDBMBNDDB>B(BBDBPB(BQDBSDBUBVDBPB(DBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPB(BQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:pB,SET-CDRDBDB:ÀCDADRBVBDBDB:B(BDDB>ÀCADDARBBBDDBFBGBIDÀCDDDDRBBDBMBNDDB>BfBBDBPBfBQDBSDBUBVDBPBfDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBfBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:ÀCDDDRBVBDBDB:BfBDDB>LOCALLYpB@LOCF-METHODBDDBFBGBIDDB>ÀCAADDRBBBDDBFBGBIDDB>ÀEIGHTHBBBDDBFBGBIDÀCADAARBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:ÀCDAARBVBDBDB:BBDDB>ÀCADDDRBBBDDBFBGBIDBbBBDBMBNDDB>BbBBDBPBbBQDBSDBUBVDBPBbDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBbBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:ÀCDDARBVBDBDB:BbBDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BBVBDBDB:BBDDB>ÀFIFTHBBBDDBFBGBIDBUBBDBMBNDDB>BUBBDBPBUBQDBSDBUBVDBPBUDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBUBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BfBVBDBDB:BUBDDB>SBITBBBDDBFBGBIDDB>pLISPAREFBBBDDBFBGBIDDB>ÀNINTHBBBDDBFBGBIDRESTBBBSDBUBBDBMBNDDB>BUBBDBPBUBQDBSDBUBVDBPBUDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBUBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BBVBDBDB:BUBDB?BBDBMBNDDB>B?BBDBPB?BQDBSDBUBVDBPB?DBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPB?BQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:ÀCAADRBVBDBDB:B?BDFILL-POINTERBBpARRAY,SET-FILL-POINTERDDB>ÀAPPLYBBBDDBFBGBIDDB>SETQBBDDBFBGBIDDB>ÀCDAAARBBBDDBFBGBIDpB,GETHASHBBDBMBNDDB>BBBDBPBBQDBSDBUCHASHTABLEKEYBGDEFAULTDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDB"DBrDBsBFDB#DBrDBsDBsBFDB$DBrDBsDBsDBsBFDB[DBPBBQDBSDBUB"B#BGB$B^DBqDDB}DBFDBDBDBB}DBBDBB"B#B$DBBDBDDÀVALUEBDB"DBBDB#DBFBDB$DBFBDBDB:pLISP-INTERNALS,%SETHASHB"B#BODBDB:BBDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:ÀCADDRBVBDBDB:BBDGETBBDBMBNDDB>BBBDBPBBQDBSDBUÀOBJECTPROPERTYBGDB$B^DBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDEFAULTPDBDBrDBsBFDBDBrDBsDBsBFDB$DCONDDDBsDBsDBsBFDBBB-DBrDBsDBsDBsBFDB-B^DB[DBPBBQDBSDBUBBBGDB$B^B^DBqDDB}DBFDBDBDBB}DBBDBBBB$DBBDBDDBOBDBDBBDBDBFBDB$DBFBDBDDTEMDpBlIFBDBDB:ÀPROG1BB$BDBDB:pSYMBOL%PUTBBBODBDB:BBDDB>ÀCDDAARBBBDDBFBGBIDBITBBDBMBNDDB>BBBDBPBBQDBSDBUCBIT-ARRAYÀ&RESTCSUBSCRIPTSDBPBDBFBGBIDB[BIDB]B^DB_DBaDBbBFFDBlBFFB^DBqDDBDBrDBsBFDBDBsDBsBFDB[DBPBBQDBSDBUBBBB^DBqDDB}DBFDpB@REST-TEMPVARSDBDBbBDBDBDBDÀAPPENDB}B#DBBDÀLIST*BBDBBDBDDBVBDBDBBDBB#DCASEDBbBDFDBDB:pB ASET-1DBDB:THEDB:BBVBBDFDBDB:pB ASET-2DBDB:B<DB:BBVBBDB-DBDB:pB ASETDBDB:B<DB:BBVBBDBDB:BBDBBDBMBNDDB>BBDBUCBOUNDVARSBÀFORMSDBPBDBFBGBIDB[BIDB]B^DB_DBaDBbBFFDBlBFFB^DBqDDB^DBrDBsBFDB_DBsDBsBFDB[DBUB^BB_DBDDNEW-BODYDCCOPY-LISTB_DÀRPLACADLASTBtDBDB:LOCFDBrDBzBtDBDB:BB^BtBBDBMBNDDB>BBBDBPBBQDBSDBUB^BB_DBPBDBFBGBIDB[BIDB]B^DB_DBaDBbBFFDBlBFFB^DBqDDENVIRONMENTBIDB^DBrDBsBFDB_DBsDBsBFDB[DBPBBQDBSDBUB^BB_DMULTIPLE-VALUE-BINDDTEMPVARSTEMPARGSCSTOREVARSCSTOREFORMREFFORMDÃGET-SETF-METHOD-MULTIPLE-VALUEDBrDBzB_BDBBBBDBDB:BB^DpB@XR-BQ-APPENDDBUTLASTB_DBBDBDB:BB^DBDBB_DBBDDB>LDBBBBDDBFBGBIDDB>ÀCDAADRBBBDDBFBGBIDDB>ÀFOURTHBBBDDBFBGBIDBrBBBDDB>GETFBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUFUNCTIONBARGSDBPBDBFBGBIDB[BIDB]B^DB_DBaDBbBFFDBlBFFB^DBqDDBDBrDBsBFDBDBsDBsBFDB[DBPBBQDBSDBUBBBDÀUNLESSDB_DÀCONSPBDpBMEMBERDBrBDB:DBB:DC=DBbBFDSYMBOLPDBBDÀERRORlIn SETF of APPLY, the function applied must be a constant.DBDBBBBBDGET-SETF-METHODDCONSDBBBDBDNOTDCEQDBrDBzBDBrDBzBDB,~S not acceptable within ~S within SETF.BDBBBBDBDB:BDBDB:BDBrBDBsBDBDB:BDBDB:BDBrBDBsBDDB>B(BBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:ÀCAAARBVBDBDB:BBDÁSYMBOL-PACKAGEBÂPACKAGE-CELL-LOCATIONBBpBlSET-SYMBOL-PACKAGEDB]BDBMBNDDB>B]BDBUBB_DBPB]DBFBGBIDB[BIDB]B^DBqDDB_DBsBFDB[DBUBB_DBDDBtDBuB_DByDBzBtDBDB:B|DBrDBzBtDBDB:B]BtBBDBMBNDDB>B]BBDBPB]BQDBSDBUBB_DBPB]DBFBGBIDB[BIDB]B^DBqDDBBIDB_DBsBFDB[DBPB]BQDBSDBUBB_DBDBBBBBDBDBrDBzB_BDBBBBDBDB:B]DBDBB_DBBDBDB:B]DBDBB_DBBDDB>BBBBDDBFBGBIDDB>SEVENTHBBBDDBFBGBIDFSYMEVALBÂFUNCTION-CELL-LOCATIONDÀCDADARBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:ÀCADARBVBDBDB:BBDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BFBVBDBDB:BBDÀSIXTHBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BFBVBDBDB:BBDBBDBMBNDDB>BBDBUCACBDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBTDBrDBsBFDBUDBrDBsDBsBFDB[DBUBTBUDBDDCATDBDBDB:BDBDBBpDBDB:B|BUDBDB:BBTDBDB:BrBpBpDDB>BBBBDDBFBGBIDDB>BBBBDDBFBGBIDPOPBDDBFBGBIDDB>ÀCDDDARBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:CDARBVBDBDB:BBDDB>BBBBDDBFBGBIDDB>BBBBDDBFBGBIDDB>BBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUSIMPLE-BIT-ARRAYBBDBPBDBFBGBIDB[BIDB]B^DB_DBaDBbBFFDBlBFFB^DBqDDBDBrDBsBFDBDBsDBsBFDB[DBPBBQDBSDBUBBBB^DBqDDB}DBFDB#DBDBbBDBDBDBDB)B}B#DBBDB-BBDBBDBDDBVBDBDBBDBB#DB6DBbBDFDBDB:B:DBDB:B<DB:BBVBBDFDBDB:BDDBDB:B<DB:BBVBBDB-DBDB:BLDBDB:B<DB:BBVBBDBDB:BBDDB>ÀCDADDRBBBDDBFBGBIDBRBBDBMBNDDB>BRBBDBPBRBQDBSDBUBVDBPBRDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBRBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:CAARBVBDBDB:BRBDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BrBVBDBDB:BBDDB>BBBDDBFBGBIDCHARBBDBMBNDDB>BBBDBPBBQDBSDBUÀSTRINGÀINDEXDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBDBrDBsBFDBDBrDBsDBsBFDB[DBPBBQDBSDBUBBB^DBqDDB}DBFDBDBDBB}DBBDBBBDBBDBDDBVBDBDBBDBDBFBDBDB:B:DBDB:B<DB:STRING-CHARBVBBDBDB:BBDÀSCHARBBDBMBNDDB>BBBDBPBBQDBSDBUBBDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBDBrDBsBFDBDBrDBsDBsBFDB[DBPBBQDBSDBUBBB^DBqDDB}DBFDBDBDBB}DBBDBBBDBBDBDDBVBDBDBBDBDBFBDBDB:B:DBDB:B<DB:BBVBBDBDB:BBDÁ%INSTANCE-REFBCINSTANCE-VARIABLE-LOCATIONDDB>BfBBBDDBFBGBIDBJBBDBMBNDDB>BJBBDBPBJBQDBSDBUBVDBPBJDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBJBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BrBVBDBDB:BJBDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BUBVBDBDB:BBDDB>BJBBBDDBFBGBIDDB>ÀSECONDBBBDDBFBGBIDSYMBOL-VALUEBVALUE-CELL-LOCATIONBBSETDDB>BRBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BBVBDBDB:BBDPUSHBDDBFBGBIDDB>BBBBDDBFBGBIDÀSVREFBBpB SVSETDÀFIRSTBBBDDB>BBBBDDBFBGBIDDB>BBBBDDBFBGBIDDB>BBBBDDBFBGBIDDB>BUBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BBVBDBDB:BBDDB>BBBBDDBFBGBIDDB>B]BBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BBVBDBDB:BBDDB>BBBBDDBFBGBIDBsBBBSDDB>BBBBDDBFBGBIDDB>BBBBDDBFBGBIDDB>BBBBDDBFBGBIDAREFBpB ALOCDBBBDBMBNDDB>BBBDBPBBQDBSDBUÀARRAYBBDBPBDBFBGBIDB[BIDB]B^DB_DBaDBbBFFDBlBFFB^DBqDDBe DBrDBsBFDBDBsDBsBFDB[DBPBBQDBSDBUBe BBB^DBqDDB}DBFDB#DBDBbBDBDBDBDB)B}B#DBBDB-Be BDBBDBDDBVBDBe DBBDBB#DB6DBbBDFDBDB:B:BVBe BDFDBDB:BDBVBe BDB-DBDB:BLBVBe BDBDB:BBBB` DDB>BBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BBVBDBDB:BBDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BBVBDBDB:BBDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BFBVBDBDB:BBDDB>BBBBDDBFBGBIDDB>B]BBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BBVBDBDB:BBDDB>BBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BsBVBDBDB:BBDDB>BBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BBVBDBDB:BBDBBBDBMBNDDB>BBBDBPBBQDBSDBUÀPLACECINDICATORBGB$DBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDB DBrDBsBFDB DBrDBsDBsBFDB$DBrDBsDBsDBsBFDB[DBPBBQDBSDBUB B BGB$DBDÀTEMPSVALSÀSTORESCSTORE-FORMACCESS-FORMDBB DBDDÀITEMPDBDB:INDDÀDTEMPDBDB:DEFDÀSTOREDBDB:STORDÀSTEMPDBB! DBDB-B& B+ B DB-B B$B DBB0 DBDB:BDBDBB5 DBDB:pB%PUTFB# B& B0 B" B0 DBDB:BB# B& B+ DBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BFBVBDBDB:BBDSYMBOL-FUNCTIONBBBBpBSET-SYMBOL-FUNCTIONDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BJBVBDBDB:BBDÀCAAAARBBDBMBNDDB>B BBDBPB BQDBSDBUBVDBPB DBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPB BQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BRBVBDBDB:B BDSYMEVALBBDDB>BBBBDDBFBGBIDBBDBMBNDDB>BBDBUBB_DBPBDBFBGBIDB[BIDB]B^DBqDDB_DBsBFDB[DBUBB_DBDDBtDBuB_DByDBzBtDBDB:B|DBrDBzBtDBDB:BBtBBDBMBNDDB>BBBDBPBBQDBSDBUBB_DBPBDBFBGBIDB[BIDB]B^DBqDDBBIDB_DBsBFDB[DBPBBQDBSDBUBB_DBDBBBBBDBDBrDBzB_BDBBBBDBDB:BDBDBB_DBBDBDB:BDBDBB_DBBDBBBDBMBNDDB>BBBDBPBBQDBSDBUCNBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDB; DBrDBsBFDBVDBrDBsDBsBFDB[DBPBBQDBSDBUB; BVB^DBqDDB}DBFDBDBDBB}DBBDBB; BVDBBDBDDBBDB; DBBDBVDBFBDBDB:BDBDB:BB; BVBDBDB:BBDB$BBDBMBNDDB>B$BBDBPB$BQDBSDBUBVDBPB$DBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPB$BQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BBVBDBDB:B$BDDB>B BBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BBVBDBDB:BBDSYMBOL-PLISTBÁPLIST-LOCATIONBBpB,SET-SYMBOL-PLISTDDB>BBBBDDBFBGBIDBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BDBDB:BBVBDBDB:BBDBBBDBMBNDDB>BBBDBPBBQDBSDBUBYTESPECINTDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDB& DBrDBsBFDB' DBrDBsDBsBFDB[DBPBBQDBSDBUB& B' DBDB B B! B" B# DBB' DBDDÀBTEMPDBDB0 DBDB5 DBB! DBDBBF B DBB& B DBB0 DBDB:BDBDBB5 DBDB:DPBB0 BF B# B" B0 DBDB:BBF B# DBBBDBMBNDDB>BBBDBPBBQDBSDBUBVDBPBDBFBGBIDB[BIDB]B^DB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDBVDBrDBsBFDB[DBPBBQDBSDBUBVB^DBqDDB}DBFDBDBDBB}DBBDBBVDBBDBDDBBDBVDBBDBDB:BSDBDB:BsBVBDBDB:BBDB:D9DBBMBNBBBBIB"DBM BMBNBR BS BT BIB DB BMBNB B B BIB DBBMBNB B B BIBZDB# BMBNB* B+ B, BIB^ DBBMBNBBBBIBDBBMBNBBBBIBDBa BMBNBf Bg Bh BIB DBb BMBNBh Bi Bj BIB DB BMBNB B B BIB DBBMBNDBDBSlRemove the first element from the list at PLACE, and return that element.DBUB DBPBDBFBGBIDB[DÀBLOCKBBIDB BDB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDB DBrDBsBFDB[DBSB DBUB DBDB BBBCACCESSFORMDBB DBDDACCESS-TEMPDBDBDB:BqDBDÀMAPCARDBBB BDBDBB B DBDBrBDBDB:BsB DBDB:BDBDB:BrB BDBBMBNBBBBIBDBOBMBNBYBZB\BIBDBWBMBNB\B]B^BIBDBBMBNBBBBIBDBBMBNB$B%B&BIBRDBBMBNB!B"B#BIBPDBBMBNBBBBIBDB BMBNB B B BIB DBYBMBNB^B_B`BIBDB BMBNB B B BIB5 DBQ BMBNBV BW BX BIB DBBMBNBBBBIBJDB BMBNB B B BIBH DBBMBNBBBBIBDBSBMBNBXBYBZBIBDB BMBNB B B BIB DB BMBNB%B&B'BIBTDB8 BMBNB> B? B@ BIBs DBgBMBNBlBmBnBIBDB BMBNB B B BIB DBBMBNBBBBIBDBBMBNBBBBIBDB BMBNB B B BIB DBBMBNBBBBIBDBiBMBNBnBoBpBIBDB BMBNB B! B" BIBN DB)BMBNB.B/B0BIB_DB BMBNB B B BIB DB]BMBNBbBcBdBIBDBBMBNBBBBIBDBBMBNBBBBIBDB(BMBNB-B.B/BIB\DBv BMBNB{ B| B} BIB DBBMBNBBBBIB DBBMBNDBDBSAdd ITEM to the front of the list at PLACE.DBUITEMB DBPBDBFBGBIDB[DB BBIDB BDB_DB`DBaDBbBFFDBfDBbBFFDBlBFFFDBqDDB DBrDBsBFDB DBrDBsDBsBFDB[DBSB DBUB B DBDB BBBB DBB DBDDCITEM-TEMPDBDBDB:BDBDB DBBB BDBDBBB DBDB:BDBDBDBrBDBDB:BBB BDBBMBNBBBBIB DB BMBNB B B BIB DB~BMBNBBBBIBDBBMBNBBBBIBDBMBMBNBRBSBTBIBDB BMBNB B B BIB DBdBMBNBgBhBiBIB|DB BMBNB B B BIBJ DBBMBNBBBBIBDBBMBNBBBBIBDBBMBNB'B(B)BIBf