QUOTEGLOBAL PHYSICAL-CLUSTER-DATAPHYSICAL-CLUSTER-DATA EXPORTGLOBAL QUOTEGLOBAL %%PCD-WRITE-BITSPHYSICAL-CLUSTER-DATA $$CLUSTER-NO-READ-MARPHYSICAL-CLUSTER-DATA $$CLUSTER-NO-WRITE-MARPHYSICAL-CLUSTER-DATA $$CLUSTER-READ-ONLYPHYSICAL-CLUSTER-DATA $$CLUSTER-READ-WRITEPHYSICAL-CLUSTER-DATA $$STATUS-NORMALPHYSICAL-CLUSTER-DATA  $$WRITE-CLEANPHYSICAL-CLUSTER-DATA $$WRITE-CLEAN-MARPHYSICAL-CLUSTER-DATA $$WRITE-CLEAN-READ-ONLYPHYSICAL-CLUSTER-DATA $$WRITE-CLEAN-READ-ONLY-MARPHYSICAL-CLUSTER-DATA $$WRITE-NORMALPHYSICAL-CLUSTER-DATA  $$WRITE-MARPHYSICAL-CLUSTER-DATA $$WRITE-READ-ONLYPHYSICAL-CLUSTER-DATA $$WRITE-READ-ONLY-MARPHYSICAL-CLUSTER-DATA ALLOCATE-PHYSICAL-CLUSTERPHYSICAL-CLUSTER-DATA ASSOCIATE-CLUSTERPHYSICAL-CLUSTER-DATA ASSURE-FREE-PHYSICAL-CLUSTERSPHYSICAL-CLUSTER-DATA "CREATE-PHYSICAL-CLUSTER-DATA-TABLEPHYSICAL-CLUSTER-DATA FREE-PHYSICAL-CLUSTERPHYSICAL-CLUSTER-DATA FREE-UNUSED-PHYSICAL-CLUSTERSPHYSICAL-CLUSTER-DATA  INITIALIZE-PHYSICAL-CLUSTER-DATAPHYSICAL-CLUSTER-DATA MARK-MODIFIED-IN-PCDPHYSICAL-CLUSTER-DATA READ-PCDPHYSICAL-CLUSTER-DATA %%PCD-READ-MAR-BITPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES %%PCD-WRITE-BITSPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES %%PCD-WRITE-MAR-BITPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES %%PCD-READ-ONLY-BITPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES  %%PCD-CLEAN-BITPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES  %%PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES  BYTE-SIZE PRIMITIVES %%CLUSTER-NUMBERVINCULUM   %%PCD-STATUSPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES  PCD-STATUSPHYSICAL-CLUSTER-DATA  NAMED-LAMBDANC  PCD-STATUSPHYSICAL-CLUSTER-DATA QGLOBAL LDBHARDWARE QGLOBAL  %%PCD-STATUSPHYSICAL-CLUSTER-DATA  PCD-STATUSPHYSICAL-CLUSTER-DATAc$`D SETQGLOBAL *GRODY-SETF-MACRO-TABLE*SETF CONSGLOBAL QUOTEGLOBAL  PCD-STATUSPHYSICAL-CLUSTER-DATA LAMBDAGLOBAL QGLOBAL LET*GLOBAL SINGLE-TEMPVARSSETF MAPCARGLOBAL FUNCTIONGLOBAL LAMBDAGLOBAL IGNOREGLOBAL GENTEMPGLOBAL QUOTEGLOBAL QGLOBAL STOREVARSETF GENSYMGLOBAL TEMPVARSSETF SINGLE-TEMPVARSSETF VALUESGLOBAL TEMPVARSSETF LISTGLOBAL QGLOBAL LISTGLOBAL STOREVARSETF LETGLOBAL VALUE PRIMITIVES STOREVARSETF QGLOBAL NTHGLOBAL TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTEGLOBAL DPBHARDWARE VALUE PRIMITIVES QUOTEGLOBAL  %%PCD-STATUSPHYSICAL-CLUSTER-DATA QGLOBAL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTEGLOBAL  PCD-STATUSPHYSICAL-CLUSTER-DATA TEMPVARSSETF IFLISP BOUNDPGLOBAL QUOTEGLOBAL *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTEGLOBAL  PCD-STATUSPHYSICAL-CLUSTER-DATA PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA  NAMED-LAMBDANC PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA QGLOBAL LDBHARDWARE QGLOBAL %%PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA0&`D SETQGLOBAL *GRODY-SETF-MACRO-TABLE*SETF CONSGLOBAL QUOTEGLOBAL PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA LAMBDAGLOBAL QGLOBAL LET*GLOBAL SINGLE-TEMPVARSSETF MAPCARGLOBAL FUNCTIONGLOBAL LAMBDAGLOBAL IGNOREGLOBAL GENTEMPGLOBAL QUOTEGLOBAL QGLOBAL STOREVARSETF GENSYMGLOBAL TEMPVARSSETF SINGLE-TEMPVARSSETF VALUESGLOBAL TEMPVARSSETF LISTGLOBAL QGLOBAL LISTGLOBAL STOREVARSETF LETGLOBAL VALUE PRIMITIVES STOREVARSETF QGLOBAL NTHGLOBAL TEMPVARSSETF  XR-BQ-LISTSYSTEM-INTERNALS QUOTEGLOBAL DPBHARDWARE VALUE PRIMITIVES QUOTEGLOBAL %%PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA QGLOBAL  XR-BQ-LIST*SYSTEM-INTERNALS QUOTEGLOBAL PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA TEMPVARSSETF IFLISP BOUNDPGLOBAL QUOTEGLOBAL *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTEGLOBAL PCD-VIRTUAL-CLUSTER-NUMBERPHYSICAL-CLUSTER-DATA $$STATUS-INVALIDPHYSICAL-CLUSTER-DATA $$STATUS-WIREDPHYSICAL-CLUSTER-DATA $$STATUS-NORMALPHYSICAL-CLUSTER-DATA $$STATUS-AGE-1PHYSICAL-CLUSTER-DATA $$STATUS-AGE-2PHYSICAL-CLUSTER-DATA $$STATUS-AGE-3PHYSICAL-CLUSTER-DATA $$STATUS-FLUSHABLEPHYSICAL-CLUSTER-DATA $$STATUS-PRE-PAGEDPHYSICAL-CLUSTER-DATA $$WRITE-NORMALPHYSICAL-CLUSTER-DATA  $$WRITE-MARPHYSICAL-CLUSTER-DATA $$WRITE-READ-ONLYPHYSICAL-CLUSTER-DATA $$WRITE-READ-ONLY-MARPHYSICAL-CLUSTER-DATA  $$WRITE-CLEANPHYSICAL-CLUSTER-DATA $$WRITE-CLEAN-MARPHYSICAL-CLUSTER-DATA $$WRITE-CLEAN-READ-ONLYPHYSICAL-CLUSTER-DATA $$WRITE-CLEAN-READ-ONLY-MARPHYSICAL-CLUSTER-DATA $$UNCLEAN-CLUSTERPHYSICAL-CLUSTER-DATA $$CLEAN-CLUSTERPHYSICAL-CLUSTER-DATA $$CLUSTER-NO-READ-MARPHYSICAL-CLUSTER-DATA $$CLUSTER-READ-MARPHYSICAL-CLUSTER-DATA $$CLUSTER-NO-WRITE-MARPHYSICAL-CLUSTER-DATA $$CLUSTER-WRITE-MARPHYSICAL-CLUSTER-DATA $$CLUSTER-READ-WRITEPHYSICAL-CLUSTER-DATA $$CLUSTER-READ-ONLYPHYSICAL-CLUSTER-DATA CLEAN-CLUSTER?PHYSICAL-CLUSTER-DATA  NAMED-LAMBDANC CLEAN-CLUSTER?PHYSICAL-CLUSTER-DATA QGLOBAL 32=HARDWARE LDBHARDWARE QGLOBAL %%PCD-CLEAN-BITPHYSICAL-CLUSTER-DATA $$CLEAN-CLUSTERPHYSICAL-CLUSTER-DATA CLEAN-CLUSTER?PHYSICAL-CLUSTER-DATAA&`D@@c@A @AhDjD READ-PCDPHYSICAL-CLUSTER-DATA  NAMED-LAMBDANC READ-PCDPHYSICAL-CLUSTER-DATA INDEXPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-REFVIRTUAL-MEMORY *PHYSICAL-CLUSTER-DATA-TABLE*GLOBAL-REGISTERS INDEXPHYSICAL-CLUSTER-DATA READ-PCDPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-REFVIRTUAL-MEMORYf E!F  WRITE-PCDPHYSICAL-CLUSTER-DATA  NAMED-LAMBDANC  WRITE-PCDPHYSICAL-CLUSTER-DATA INDEXPHYSICAL-CLUSTER-DATA  NEW-VALUEPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-STOREVIRTUAL-MEMORY *PHYSICAL-CLUSTER-DATA-TABLE*GLOBAL-REGISTERS INDEXPHYSICAL-CLUSTER-DATA  NEW-VALUEPHYSICAL-CLUSTER-DATA  WRITE-PCDPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-STOREVIRTUAL-MEMORYf E @#F  MODIFY-PCDPHYSICAL-CLUSTER-DATA  MODIFY-PCDPHYSICAL-CLUSTER-DATA    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS CARGLOBAL CDRGLOBAL CDRGLOBAL CARGLOBAL CDRGLOBAL LENGTHGLOBAL LENGTHGLOBALj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA$B(A'BAB(@@AF Af@fB @A   WRITE-PCDPHYSICAL-CLUSTER-DATA INDEXPHYSICAL-CLUSTER-DATA FUNCALLGLOBAL THUNKPHYSICAL-CLUSTER-DATA READ-PCDPHYSICAL-CLUSTER-DATA INDEXPHYSICAL-CLUSTER-DATA LETGLOBAL INDEXPHYSICAL-CLUSTER-DATA THUNKPHYSICAL-CLUSTER-DATA FREE-PHYSICAL-CLUSTERPHYSICAL-CLUSTER-DATA FREE-PHYSICAL-CLUSTERPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-STOREVIRTUAL-MEMORY h @@ aD@p!m"f A @"B h@0)k#jxj D ALLOCATE-PHYSICAL-CLUSTERPHYSICAL-CLUSTER-DATA ALLOCATE-PHYSICAL-CLUSTERPHYSICAL-CLUSTER-DATA  TRAP-RESTORETRAP SYSTEM-TABLE-REFVIRTUAL-MEMORY FINDCOREPHYSICAL-CLUSTER-DATA(k#p@A @A@C"@)k#jxh @f A B`B@0&C h@"C@A D ASSOCIATE-CLUSTERPHYSICAL-CLUSTER-DATA ASSOCIATE-CLUSTERPHYSICAL-CLUSTER-DATA    SYSTEM-TABLE-STOREVIRTUAL-MEMORY ASSOCIATE-LOCAL-MEMORYMAP ILLOP-FUNCTIONTRAP!px0@A@Apf0@A@AA@B@Apx0@A @Ap#b0@A @Af@ @"Ba '`D!/DD!!DDA!EDp!DD##D,f E @-Fv@ p#b0@A  @A`@ t@ ASSURE-FREE-PHYSICAL-CLUSTERSPHYSICAL-CLUSTER-DATA ASSURE-FREE-PHYSICAL-CLUSTERSPHYSICAL-CLUSTER-DATA   FINDCOREPHYSICAL-CLUSTER-DATA @j#$x$p@A@AjD`"@@ $0@A @AjD@C0 ""x FINDCOREPHYSICAL-CLUSTER-DATA FINDCOREPHYSICAL-CLUSTER-DATA)('" #()& AGE-VIRTUAL-CLUSTERMAP$  AGE-CLUSTERPHYSICAL-CLUSTER-DATA!  AGE-CLUSTERPHYSICAL-CLUSTER-DATA  AGE-CLUSTERPHYSICAL-CLUSTER-DATA  AGE-CLUSTERPHYSICAL-CLUSTER-DATA SWAP-OUT-INTERNAL MAP-FAULT SYSTEM-TABLE-REFVIRTUAL-MEMORY*0a#`x B@pC#0@A @A `@` "@f A"Bc4!@ |B@ C@@A@A)@A (@A #@A @A @A @A @A @A @A `0C@AjD AvB@A  AtB@A  ArB@A  ApB0&`A@B@A @A @A  AGE-CLUSTERPHYSICAL-CLUSTER-DATA  AGE-CLUSTERPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-STOREVIRTUAL-MEMORY` &@## $@f E&@%F REJUVENATE-CLUSTERPHYSICAL-CLUSTER-DATA REJUVENATE-CLUSTERPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-STOREVIRTUAL-MEMORY SYSTEM-TABLE-REFVIRTUAL-MEMORYf A B##E"@f E @#F %%INIT-MAP-STATUSPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES %%INIT-MAP-READ-ONLYPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES %%INIT-MAP-WIREDPHYSICAL-CLUSTER-DATA BYTE PRIMITIVES INIT-READ-ONLY?PHYSICAL-CLUSTER-DATA  NAMED-LAMBDANC INIT-READ-ONLY?PHYSICAL-CLUSTER-DATA QGLOBAL 32=HARDWARE LDBHARDWARE QGLOBAL %%INIT-MAP-READ-ONLYPHYSICAL-CLUSTER-DATA INIT-READ-ONLY?PHYSICAL-CLUSTER-DATA `D@@c@A @AhDjD  INIT-WIRED?PHYSICAL-CLUSTER-DATA  NAMED-LAMBDANC  INIT-WIRED?PHYSICAL-CLUSTER-DATA QGLOBAL 32=HARDWARE LDBHARDWARE QGLOBAL %%INIT-MAP-WIREDPHYSICAL-CLUSTER-DATA  INIT-WIRED?PHYSICAL-CLUSTER-DATAa'`D@@c@A @AhDjD $$INIT-MAP-NORMALPHYSICAL-CLUSTER-DATA $$INIT-MAP-READ-ONLYPHYSICAL-CLUSTER-DATA $$INIT-MAP-WIREDPHYSICAL-CLUSTER-DATA $$INIT-MAP-WIRED-READ-ONLYPHYSICAL-CLUSTER-DATA $$INIT-MAP-PHYSICAL-CLUSTERPHYSICAL-CLUSTER-DATA $$INIT-MAP-VIRTUAL-CLUSTERPHYSICAL-CLUSTER-DATA $$INIT-MAP-INITIAL-STATUSPHYSICAL-CLUSTER-DATA $$INIT-MAP-CLUSTER-COUNTPHYSICAL-CLUSTER-DATA INIT-PCDPHYSICAL-CLUSTER-DATA INIT-PCDPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-STOREVIRTUAL-MEMORY!`D##DDp!D(f E @)F *CLUSTERS-IN-PCD*PHYSICAL-CLUSTER-DATA CEILINGGLOBAL *PHYSICAL-MEMORY-MAX-CLUSTERS*VINCULUM *QS-IN-CLUSTER*VINCULUM "CREATE-PHYSICAL-CLUSTER-DATA-TABLEPHYSICAL-CLUSTER-DATA "CREATE-PHYSICAL-CLUSTER-DATA-TABLEPHYSICAL-CLUSTER-DATA)!# & INIT-PCDPHYSICAL-CLUSTER-DATA INIT-PCDPHYSICAL-CLUSTER-DATA ASSOCIATE-LOCAL-MEMORYMAP BOOT-ALLOCATE-PHYSICAL-CLUSTERSVIRTUAL-MEMORY* j@ `@{ Cf @@P&a*@.,@z(@ (p@A@A,A*@@@B0)**x01,,x!((x `&@ $@$p@A@A&A`@`@rB0&&x$$x f @@P&a"@z @ p@A #@AjD.A"@b@`B0 ""x09..x  x READ-PCD-INIT-ENTRYPHYSICAL-CLUSTER-DATA READ-PCD-INIT-ENTRYPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-REFVIRTUAL-MEMORY "@xA&x $}!F  INITIALIZE-PHYSICAL-CLUSTER-DATAPHYSICAL-CLUSTER-DATA  INITIALIZE-PHYSICAL-CLUSTER-DATAPHYSICAL-CLUSTER-DATA 987/7,%'!(-89 6 MARK-MODIFIED-IN-PCDPHYSICAL-CLUSTER-DATA4 READ-MAPMAP2 WRITE-MAP-STATUSMAP+ ASSOCIATE-LOCAL-MEMORYMAP$ ASSOCIATE-LOCAL-MEMORYMAP INIT-PCDPHYSICAL-CLUSTER-DATA READ-PCD-INIT-ENTRYPHYSICAL-CLUSTER-DATA READ-PCD-INIT-ENTRYPHYSICAL-CLUSTER-DATA READ-PCD-INIT-ENTRYPHYSICAL-CLUSTER-DATA READ-PCD-INIT-ENTRYPHYSICAL-CLUSTER-DATA:`0@ A0@a B A0@c B A0@f B A0@q Ba''`D@@c@A 9@Ab$@ '`D@@c@A 8@Av"@.,@&p@A-@A,A*@$@"Bp v0@A (@A,A*@tB0)**x01,,x&&x ,A*@@@B%@A 8.p@A 7@A`A@@B@A`C &a@AF0A00x r"@ f$@ FREE-UNUSED-PHYSICAL-CLUSTERSPHYSICAL-CLUSTER-DATA FREE-UNUSED-PHYSICAL-CLUSTERSPHYSICAL-CLUSTER-DATA #"#  ! SYSTEM-TABLE-STOREVIRTUAL-MEMORY FREE-PHYSICAL-CLUSTERPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-REFVIRTUAL-MEMORY$`*@ B@p+B0@A @AjDP+p!@A@A`(@B@@$B0@A@A!/(&@f A&Bc$aD@pa0@A @A&C 0!((x 0)**x `$@B@@B0@A#@A!/$"@f A"@lB0$$x 0)**x MARK-MODIFIED-IN-PCDPHYSICAL-CLUSTER-DATA MARK-MODIFIED-IN-PCDPHYSICAL-CLUSTER-DATA SYSTEM-TABLE-STOREVIRTUAL-MEMORY SYSTEM-TABLE-REFVIRTUAL-MEMORYf A BA!E"@f E @#F