
(/VERSIONCHECK 2) 

(DEFUN |BITS;bits;NniB$;1| (|n| |b| $)
  (SPADCALL |n| |b| (QREFELT $ 8))) 

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

(DEFUN |Bits;| ()
  (PROG (|dv$| $ #0=#:G1822 |pv$| #1=#:G1824 #2=#:G1823)
    (RETURN
      (PROGN
        (LETT |dv$| '(|Bits|) . #3=(|Bits|))
        (LETT $ (GETREFV 25) . #3#)
        (QSETREFV $ 0 |dv$|)
        (QSETREFV $ 3
            (LETT |pv$|
                  (|buildPredVector| 0 0
                      (LIST (|HasCategory| (|Boolean|)
                                '(|ConvertibleTo| (|InputForm|)))
                            (|HasCategory| (|Boolean|) '(|OrderedSet|))
                            (|HasCategory| (|Integer|) '(|OrderedSet|))
                            (LETT #0#
                                  (|HasCategory| (|Boolean|)
                                      '(|SetCategory|)) . #3#)
                            (AND #0#
                                 (|HasCategory| (|Boolean|)
                                     '(|Evalable| (|Boolean|)))))) . #3#))
        (|haddProp| |$ConstructorCache| '|Bits| NIL (CONS 1 $))
        (|stuffDomainSlots| $)
        (AND (LETT #1# (|HasCategory| $ '(|shallowlyMutable|)) . #3#)
             (|augmentPredVector| $ 32))
        (AND #1# (|HasCategory| (|Boolean|) '(|OrderedSet|))
             (|augmentPredVector| $ 64))
        (AND (LETT #2# (|HasCategory| $ '(|finiteAggregate|)) . #3#)
             (|augmentPredVector| $ 128))
        (AND #2# #0# (|augmentPredVector| $ 256))
        $)))) 

(MAKEPROP '|Bits| '|infovec|
    (LIST '#(NIL NIL NIL NIL NIL (|IndexedBits| (NRTEVAL 1))
             (|NonNegativeInteger|) (|Boolean|) (0 . |new|)
             |BITS;bits;NniB$;1| (|List| 11) (|Equation| 7) (|List| 7)
             (|Mapping| 7 7 7) (|InputForm|) (|Integer|)
             (|Mapping| 7 7) (|Void|) (|UniversalSegment| 15)
             (|List| 15) (|Union| 7 '"failed") (|List| $)
             (|SingleInteger|) (|String|) (|OutputForm|))
          '#(~= 6 ~ 12 |xor| 17 |swap!| 23 |sorted?| 30 |sort!| 41
             |sort| 52 |size?| 63 |setelt| 69 |select| 83 |sample| 89
             |reverse!| 93 |reverse| 98 |removeDuplicates| 103 |remove|
             108 |reduce| 120 |qsetelt!| 141 |qelt| 148 |position| 154
             |parts| 173 |or| 178 |not| 184 |nor| 189 |new| 195 |nand|
             201 |more?| 207 |minIndex| 213 |min| 218 |merge| 224
             |members| 237 |member?| 242 |maxIndex| 248 |max| 253
             |map!| 259 |map| 265 |less?| 278 |latex| 284 |insert| 289
             |indices| 303 |index?| 308 |hash| 314 |first| 319 |find|
             324 |fill!| 330 |every?| 336 |eval| 342 |eq?| 368 |entry?|
             374 |entries| 380 |empty?| 385 |empty| 390 |elt| 394
             |delete| 413 |count| 425 |copyInto!| 437 |copy| 444
             |convert| 449 |construct| 454 |concat| 459 |coerce| 482
             |bits| 487 |any?| 493 |and| 499 |\\/| 505 >= 511 > 517 =
             523 <= 529 < 535 |/\\| 541 |#| 547)
          'NIL
          (CONS (|makeByteWordVec2| 5
                    '(0 0 0 0 0 0 0 0 0 0 0 0 5 0 0 0 0 0 0 5 1))
                (CONS '#(|BitAggregate&|
                         |OneDimensionalArrayAggregate&|
                         |FiniteLinearAggregate&| |LinearAggregate&|
                         |Collection&| |IndexedAggregate&|
                         |OrderedSet&| |HomogeneousAggregate&|
                         |SetCategory&| |EltableAggregate&|
                         |Aggregate&| |Logic&| |Evalable&| NIL NIL NIL
                         NIL |BasicType&| NIL |InnerEvalable&| NIL)
                      (CONS '#((|BitAggregate|)
                               (|OneDimensionalArrayAggregate| 7)
                               (|FiniteLinearAggregate| 7)
                               (|LinearAggregate| 7) (|Collection| 7)
                               (|IndexedAggregate| 15 7) (|OrderedSet|)
                               (|HomogeneousAggregate| 7)
                               (|SetCategory|)
                               (|EltableAggregate| 15 7) (|Aggregate|)
                               (|Logic|) (|Evalable| 7)
                               (|shallowlyMutable|) (|finiteAggregate|)
                               (|Eltable| 15 7) (|Type|) (|BasicType|)
                               (|CoercibleTo| 24) (|InnerEvalable| 7 7)
                               (|ConvertibleTo| 14))
                            (|makeByteWordVec2| 24
                                '(2 0 0 6 7 8 2 0 7 0 0 1 1 0 0 0 1 2 0
                                  0 0 0 1 3 6 17 0 15 15 1 1 2 7 0 1 2
                                  0 7 13 0 1 1 7 0 0 1 2 6 0 13 0 1 1 2
                                  0 0 1 2 0 0 13 0 1 2 0 7 0 6 1 3 6 7
                                  0 15 7 1 3 6 7 0 18 7 1 2 8 0 16 0 1
                                  0 0 0 1 1 6 0 0 1 1 0 0 0 1 1 9 0 0 1
                                  2 9 0 7 0 1 2 8 0 16 0 1 4 9 7 13 0 7
                                  7 1 2 8 7 13 0 1 3 8 7 13 0 7 1 3 6 7
                                  0 15 7 1 2 0 7 0 15 1 3 4 15 7 0 15 1
                                  2 4 15 7 0 1 2 0 15 16 0 1 1 8 12 0 1
                                  2 0 0 0 0 1 1 0 0 0 1 2 0 0 0 0 1 2 0
                                  0 6 7 8 2 0 0 0 0 1 2 0 7 0 6 1 1 3
                                  15 0 1 2 0 0 0 0 1 2 2 0 0 0 1 3 0 0
                                  13 0 0 1 1 8 12 0 1 2 9 7 7 0 1 1 3
                                  15 0 1 2 0 0 0 0 1 2 6 0 16 0 1 2 0 0
                                  16 0 1 3 0 0 13 0 0 1 2 0 7 0 6 1 1 0
                                  23 0 1 3 0 0 7 0 15 1 3 0 0 0 0 15 1
                                  1 0 19 0 1 2 0 7 15 0 1 1 0 22 0 1 1
                                  3 7 0 1 2 0 20 16 0 1 2 6 0 0 7 1 2 8
                                  7 16 0 1 2 5 0 0 10 1 3 5 0 0 7 7 1 2
                                  5 0 0 11 1 3 5 0 0 12 12 1 2 0 7 0 0
                                  1 2 9 7 7 0 1 1 0 12 0 1 1 0 7 0 1 0
                                  0 0 1 2 0 7 0 15 1 3 0 7 0 15 7 1 2 0
                                  0 0 18 1 2 0 0 0 15 1 2 0 0 0 18 1 2
                                  9 6 7 0 1 2 8 6 16 0 1 3 6 0 0 0 15 1
                                  1 0 0 0 1 1 1 14 0 1 1 0 0 12 1 2 0 0
                                  0 7 1 2 0 0 0 0 1 2 0 0 7 0 1 1 0 0
                                  21 1 1 0 24 0 1 2 0 0 6 7 9 2 8 7 16
                                  0 1 2 0 0 0 0 1 2 0 0 0 0 1 2 0 7 0 0
                                  1 2 0 7 0 0 1 2 0 7 0 0 1 2 0 7 0 0 1
                                  2 0 7 0 0 1 2 0 0 0 0 1 1 8 6 0 1)))))
          '|lookupComplete|)) 

(MAKEPROP '|Bits| 'NILADIC T) 
