
(SDEFUN |LIB;library;Fn$;1| ((|f| |FileName|) ($ $))
        (SPADCALL |f| (QREFELT $ 8))) 

(SDEFUN |LIB;elt;$SA;2| ((|f| $) (|v| |Symbol|) ($ |Any|))
        (SPADCALL |f| (SPADCALL |v| (QREFELT $ 12)) (QREFELT $ 14))) 

(SDEFUN |LIB;setelt!;$S2A;3| ((|f| $) (|v| |Symbol|) (|val| |Any|) ($ |Any|))
        (SPADCALL |f| (SPADCALL |v| (QREFELT $ 12)) |val| (QREFELT $ 16))) 

(DECLAIM (NOTINLINE |Library;|)) 

(DEFUN |Library| ()
  (SPROG NIL
         (PROG (#1=#:G765)
           (RETURN
            (COND
             ((LETT #1# (HGET |$ConstructorCache| '|Library|) . #2=(|Library|))
              (|CDRwithIncrement| (CDAR #1#)))
             ('T
              (UNWIND-PROTECT
                  (PROG1
                      (CDDAR
                       (HPUT |$ConstructorCache| '|Library|
                             (LIST (CONS NIL (CONS 1 (|Library;|))))))
                    (LETT #1# T . #2#))
                (COND ((NOT #1#) (HREM |$ConstructorCache| '|Library|)))))))))) 

(DEFUN |Library;| ()
  (SPROG
   ((|dv$| NIL) ($ NIL) (#1=#:G761 NIL) (#2=#:G760 NIL) (|pv$| NIL)
    (#3=#:G762 NIL) (#4=#:G763 NIL))
   (PROGN
    (LETT |dv$| '(|Library|) . #5=(|Library|))
    (LETT $ (GETREFV 41) . #5#)
    (QSETREFV $ 0 |dv$|)
    (QSETREFV $ 3
              (LETT |pv$|
                    (|buildPredVector| 0 0
                                       (LIST
                                        (|HasCategory|
                                         (|Record| (|:| |key| (|String|))
                                                   (|:| |entry| (|Any|)))
                                         '(|ConvertibleTo| (|InputForm|)))
                                        (|HasCategory|
                                         (|Record| (|:| |key| (|String|))
                                                   (|:| |entry| (|Any|)))
                                         '(|BasicType|))
                                        (|HasCategory| (|String|)
                                                       '(|OrderedSet|))
                                        (OR
                                         (|HasCategory| (|Any|)
                                                        '(|CoercibleTo|
                                                          (|OutputForm|)))
                                         (|HasCategory|
                                          (|Record| (|:| |key| (|String|))
                                                    (|:| |entry| (|Any|)))
                                          '(|CoercibleTo| (|OutputForm|))))
                                        (|HasCategory| (|Any|) '(|BasicType|))
                                        (LETT #1#
                                              (|HasCategory| (|Any|)
                                                             '(|SetCategory|))
                                              . #5#)
                                        (AND
                                         (|HasCategory| (|Any|)
                                                        '(|Evalable| (|Any|)))
                                         #1#)
                                        (LETT #2#
                                              (|HasCategory|
                                               (|Record| (|:| |key| (|String|))
                                                         (|:| |entry| (|Any|)))
                                               '(|SetCategory|))
                                              . #5#)
                                        (AND
                                         (|HasCategory|
                                          (|Record| (|:| |key| (|String|))
                                                    (|:| |entry| (|Any|)))
                                          '(|Evalable|
                                            (|Record| (|:| |key| (|String|))
                                                      (|:| |entry| (|Any|)))))
                                         #2#)
                                        (OR #1# #2#)
                                        (OR
                                         (|HasCategory| (|Any|)
                                                        '(|CoercibleTo|
                                                          (|OutputForm|)))
                                         #1#
                                         (|HasCategory|
                                          (|Record| (|:| |key| (|String|))
                                                    (|:| |entry| (|Any|)))
                                          '(|CoercibleTo| (|OutputForm|)))
                                         #2#)))
                    . #5#))
    (|haddProp| |$ConstructorCache| '|Library| NIL (CONS 1 $))
    (|stuffDomainSlots| $)
    (AND (LETT #3# (|HasCategory| $ '(|finiteAggregate|)) . #5#)
         (|augmentPredVector| $ 2048))
    (AND #3#
         (|HasCategory| (|Record| (|:| |key| (|String|)) (|:| |entry| (|Any|)))
                        '(|BasicType|))
         (|augmentPredVector| $ 4096))
    (AND
     (LETT #4#
           (AND (|HasCategory| $ '(|finiteAggregate|))
                (|HasCategory| (|Any|) '(|BasicType|)))
           . #5#)
     (|augmentPredVector| $ 8192))
    (AND
     (OR #4#
         (AND #3#
              (|HasCategory|
               (|Record| (|:| |key| (|String|)) (|:| |entry| (|Any|)))
               '(|BasicType|)))
         #1# #2#)
     (|augmentPredVector| $ 16384))
    (AND (|HasCategory| $ '(|shallowlyMutable|)) (|augmentPredVector| $ 32768))
    (SETF |pv$| (QREFELT $ 3))
    (QSETREFV $ 6 (|KeyedAccessFile| (|Any|)))
    $))) 

(MAKEPROP '|Library| '|infovec|
          (LIST
           '#(NIL NIL NIL NIL NIL (|KeyedAccessFile| 13) '|Rep| (|FileName|)
              (0 . |open|) |LIB;library;Fn$;1| (|String|) (|Symbol|)
              (5 . |string|) (|Any|) (10 . |elt|) |LIB;elt;$SA;2|
              (16 . |setelt!|) |LIB;setelt!;$S2A;3| (|List| 19) (|Equation| 13)
              (|List| 13) (|Record| (|:| |key| 10) (|:| |entry| 13))
              (|List| 21) (|Equation| 21) (|List| 23) (|Boolean|)
              (|NonNegativeInteger|) (|Mapping| 21 21 21) (|OutputForm|)
              (|HashState|) (|SingleInteger|) (|InputForm|) (|Mapping| 25 13)
              (|Mapping| 25 21) (|Mapping| 13 13) (|Void|) (|Mapping| 21 21)
              (|Mapping| 13 13 13) (|List| 10) (|Union| 13 '"failed")
              (|Union| 21 '"failed"))
           '#(~= 23 |table| 29 |swap!| 38 |size?| 45 |setelt!| 51 |select!| 65
              |select| 71 |search| 77 |sample| 83 |removeDuplicates| 87
              |remove!| 92 |remove| 110 |reduce| 122 |qsetelt!| 143 |qelt| 150
              |parts| 156 |pack!| 166 |more?| 171 |minIndex| 177 |members| 182
              |member?| 192 |maxIndex| 204 |map!| 209 |map| 221 |library| 240
              |less?| 245 |latex| 251 |keys| 256 |key?| 261 |inspect| 267
              |insert!| 272 |indices| 278 |index?| 283 |hashUpdate!| 289 |hash|
              295 |first| 300 |find| 305 |fill!| 311 |extract!| 317 |every?|
              322 |eval| 334 |eq?| 386 |entry?| 392 |entries| 398 |empty?| 403
              |empty| 408 |elt| 412 |dictionary| 431 |count| 440 |copy| 464
              |convert| 469 |construct| 474 |coerce| 479 |close!| 484 |any?|
              489 = 501 |#| 507)
           'NIL
           (CONS
            (|makeByteWordVec2| 11
                                '(0 0 0 0 0 0 0 0 0 0 0 9 7 10 0 0 0 9 1 7 10
                                  11))
            (CONS
             '#(|TableAggregate&| |KeyedDictionary&| |Dictionary&|
                |DictionaryOperations&| |BagAggregate&| |Collection&|
                |IndexedAggregate&| |HomogeneousAggregate&|
                |HomogeneousAggregate&| |EltableAggregate&| |Aggregate&|
                |Evalable&| |Evalable&| |SetCategory&| NIL NIL NIL
                |InnerEvalable&| NIL |InnerEvalable&| |BasicType&| NIL)
             (CONS
              '#((|TableAggregate| 10 13) (|KeyedDictionary| 10 13)
                 (|Dictionary| 21) (|DictionaryOperations| 21)
                 (|BagAggregate| 21) (|Collection| 21)
                 (|IndexedAggregate| 10 13) (|HomogeneousAggregate| 21)
                 (|HomogeneousAggregate| 13) (|EltableAggregate| 10 13)
                 (|Aggregate|) (|Evalable| 21) (|Evalable| 13) (|SetCategory|)
                 (|Eltable| 10 13) (|Type|) (|shallowlyMutable|)
                 (|InnerEvalable| 21 21) (|ConvertibleTo| 31)
                 (|InnerEvalable| 13 13) (|BasicType|) (|CoercibleTo| 28))
              (|makeByteWordVec2| 40
                                  '(1 6 0 7 8 1 11 10 0 12 2 0 13 0 10 14 3 0
                                    13 0 10 13 16 2 15 25 0 0 1 1 0 0 22 1 0 0
                                    0 1 3 16 35 0 10 10 1 2 0 25 0 26 1 3 0 13
                                    0 11 13 17 3 0 13 0 10 13 16 2 12 0 33 0 1
                                    2 12 0 33 0 1 2 0 39 10 0 1 0 0 0 1 1 13 0
                                    0 1 2 13 0 21 0 1 2 12 0 33 0 1 2 0 39 10 0
                                    1 2 13 0 21 0 1 2 12 0 33 0 1 4 13 21 27 0
                                    21 21 1 3 12 21 27 0 21 1 2 12 21 27 0 1 3
                                    16 13 0 10 13 1 2 0 13 0 10 1 1 12 20 0 1 1
                                    12 22 0 1 1 0 0 0 1 2 0 25 0 26 1 1 3 10 0
                                    1 1 12 20 0 1 1 12 22 0 1 2 14 25 13 0 1 2
                                    13 25 21 0 1 1 3 10 0 1 2 16 0 34 0 1 2 16
                                    0 36 0 1 3 0 0 37 0 0 1 2 0 0 34 0 1 2 0 0
                                    36 0 1 1 0 0 7 9 2 0 25 0 26 1 1 10 10 0 1
                                    1 0 38 0 1 2 0 25 10 0 1 1 0 21 0 1 2 0 0
                                    21 0 1 1 0 38 0 1 2 0 25 10 0 1 2 10 29 29
                                    0 1 1 10 30 0 1 1 3 13 0 1 2 0 40 33 0 1 2
                                    16 0 0 13 1 1 0 21 0 1 2 12 25 32 0 1 2 12
                                    25 33 0 1 2 7 0 0 18 1 3 7 0 0 13 13 1 2 7
                                    0 0 19 1 3 7 0 0 20 20 1 3 9 0 0 21 21 1 3
                                    9 0 0 22 22 1 2 9 0 0 23 1 2 9 0 0 24 1 2 0
                                    25 0 0 1 2 14 25 13 0 1 1 0 20 0 1 1 0 25 0
                                    1 0 0 0 1 2 0 13 0 11 15 3 0 13 0 10 13 1 2
                                    0 13 0 10 14 1 0 0 22 1 0 0 0 1 2 14 26 13
                                    0 1 2 13 26 21 0 1 2 12 26 32 0 1 2 12 26
                                    33 0 1 1 0 0 0 1 1 1 31 0 1 1 0 0 22 1 1 4
                                    28 0 1 1 0 0 0 1 2 12 25 32 0 1 2 12 25 33
                                    0 1 2 15 25 0 0 1 1 12 26 0 1)))))
           '|lookupComplete|)) 

(MAKEPROP '|Library| 'NILADIC T) 
