
(/VERSIONCHECK 2) 

(DEFUN |ANTISYM;One;$;1| ($)
  (LIST (CONS (SPADCALL (QREFELT $ 9) (QREFELT $ 12))
              (|spadConstant| $ 13)))) 

(DEFUN |ANTISYM;coefficient;2$R;2| (|a| |u| $)
  (PROG (|x| |t| #0=#:G1844 #1=#:G1843)
    (RETURN
      (SEQ (EXIT (COND
                   ((NULL (NULL (CDR |u|)))
                    (|error| "2nd argument must be a basis element"))
                   ('T
                    (SEQ (LETT |x| (QCAR (|SPADfirst| |u|))
                               . #2=(|ANTISYM;coefficient;2$R;2|))
                         (SEQ (LETT |t| NIL . #2#) (LETT #0# |a| . #2#)
                              G190
                              (COND
                                ((OR (ATOM #0#)
                                     (PROGN
                                       (LETT |t| (CAR #0#) . #2#)
                                       NIL))
                                 (GO G191)))
                              (SEQ (COND
                                     ((SPADCALL (QCAR |t|) |x|
                                       (QREFELT $ 16))
                                      (PROGN
                                        (LETT #1# (QCDR |t|) . #2#)
                                        (GO #1#))))
                                   (EXIT
                                    (COND
                                      ((SPADCALL (QCAR |t|) |x|
                                        (QREFELT $ 17))
                                       (PROGN
                                         (LETT #1#
                                          (|spadConstant| $ 18) . #2#)
                                         (GO #1#))))))
                              (LETT #0# (CDR #0#) . #2#) (GO G190) G191
                              (EXIT NIL))
                         (EXIT (|spadConstant| $ 18))))))
           #1# (EXIT #1#))))) 

(DEFUN |ANTISYM;retractable?;$B;3| (|a| $)
  (COND
    ((NULL |a|) 'T)
    ('T
     (SPADCALL (QCAR (|SPADfirst| |a|))
         (SPADCALL (QREFELT $ 9) (QREFELT $ 12)) (QREFELT $ 16))))) 

(DEFUN |ANTISYM;retractIfCan;$U;4| (|a| $)
  (COND
    ((NULL |a|) (CONS 0 (|spadConstant| $ 18)))
    ((SPADCALL (QCAR (|SPADfirst| |a|))
         (SPADCALL (QREFELT $ 9) (QREFELT $ 12)) (QREFELT $ 16))
     (CONS 0 (SPADCALL |a| (QREFELT $ 21))))
    ('T (CONS 1 "failed")))) 

(DEFUN |ANTISYM;retract;$R;5| (|a| $)
  (COND
    ((NULL |a|) (|spadConstant| $ 18))
    ('T (SPADCALL |a| (QREFELT $ 21))))) 

(DEFUN |ANTISYM;homogeneous?;$B;6| (|a| $)
  (PROG (#0=#:G1815 #1=#:G1898 #2=#:G1860 #3=#:G1858 #4=#:G1859 |siz|
            |ta| #5=#:G1899 #6=#:G1816 #7=#:G1900 #8=#:G1893 #9=#:G1891
            #10=#:G1892 #11=#:G1897 #12=#:G1895)
    (RETURN
      (SEQ (EXIT (COND
                   ((NULL |a|) 'T)
                   (#13='T
                    (SEQ (LETT |siz|
                               (PROGN
                                 (LETT #4# NIL
                                       . #14=(|ANTISYM;homogeneous?;$B;6|))
                                 (SEQ (LETT #0# NIL . #14#)
                                      (LETT #1#
                                       (SPADCALL
                                        (QCAR (|SPADfirst| |a|))
                                        (QREFELT $ 26)) . #14#)
                                      G190
                                      (COND
                                        ((OR (ATOM #1#)
                                          (PROGN
                                            (LETT #0# (CAR #1#) . #14#)
                                            NIL))
                                         #15=(GO G191)))
                                      (SEQ
                                       (EXIT
                                        (PROGN
                                          (LETT #2# #0# . #14#)
                                          (COND
                                            (#4#
                                             (LETT #3#
                                              (+ #3# #2#) . #14#))
                                            ('T
                                             (PROGN
                                               (LETT #3# #2# . #14#)
                                               (LETT #4# 'T . #14#)))))))
                                      (LETT #1# (CDR #1#) . #14#)
                                      #16=(GO G190) G191 (EXIT NIL))
                                 (COND (#4# #3#) (#13# 0))) . #14#)
                         (SEQ (EXIT (SEQ (LETT |ta| NIL . #14#)
                                     (LETT #5#
                                      (SPADCALL |a| (QREFELT $ 27)) . #14#)
                                     G190
                                     (COND
                                       ((OR (ATOM #5#)
                                         (PROGN
                                           (LETT |ta| (CAR #5#) . #14#)
                                           NIL))
                                        #15#))
                                     (SEQ
                                      (EXIT
                                       (COND
                                         ((NULL
                                           (EQL
                                            (PROGN
                                              (LETT #10# NIL . #14#)
                                              (SEQ
                                               (LETT #6# NIL . #14#)
                                               (LETT #7#
                                                (SPADCALL (QCAR |ta|)
                                                 (QREFELT $ 26)) . #14#)
                                               G190
                                               (COND
                                                 ((OR (ATOM #7#)
                                                   (PROGN
                                                     (LETT #6#
                                                      (CAR #7#) . #14#)
                                                     NIL))
                                                  #15#))
                                               (SEQ
                                                (EXIT
                                                 (PROGN
                                                   (LETT #8#
                                                    #6# . #14#)
                                                   (COND
                                                     (#10#
                                                      (LETT #9#
                                                       (+ #9# #8#) . #14#))
                                                     ('T
                                                      (PROGN
                                                        (LETT #9#
                                                         #8# . #14#)
                                                        (LETT #10#
                                                         'T . #14#)))))))
                                               (LETT #7#
                                                (CDR #7#) . #14#)
                                               #16# G191 (EXIT NIL))
                                              (COND (#10# #9#) ('T 0)))
                                            |siz|))
                                          (PROGN
                                            (LETT #12#
                                             (PROGN
                                               (LETT #11# 'NIL . #14#)
                                               (GO #11#)) . #14#)
                                            (GO #12#))))))
                                     (LETT #5# (CDR #5#) . #14#) #16#
                                     G191 (EXIT NIL)))
                              #12# (EXIT #12#))
                         (EXIT 'T)))))
           #11# (EXIT #11#))))) 

(DEFUN |ANTISYM;degree;$Nni;7| (|a| $)
  (PROG (#0=#:G1817 #1=#:G1911 #2=#:G1907 #3=#:G1905 #4=#:G1906
            #5=#:G1908)
    (RETURN
      (SEQ (COND
             ((NULL |a|) 0)
             ((SPADCALL |a| (QREFELT $ 28))
              (PROG1 (LETT #5#
                           (PROGN
                             (LETT #4# NIL
                                   . #6=(|ANTISYM;degree;$Nni;7|))
                             (SEQ (LETT #0# NIL . #6#)
                                  (LETT #1#
                                        (SPADCALL
                                         (QCAR (|SPADfirst| |a|))
                                         (QREFELT $ 26)) . #6#)
                                  G190
                                  (COND
                                    ((OR (ATOM #1#)
                                      (PROGN
                                        (LETT #0# (CAR #1#) . #6#)
                                        NIL))
                                     (GO G191)))
                                  (SEQ (EXIT
                                        (PROGN
                                          (LETT #2# #0# . #6#)
                                          (COND
                                            (#4#
                                             (LETT #3#
                                              (+ #3# #2#) . #6#))
                                            ('T
                                             (PROGN
                                               (LETT #3# #2# . #6#)
                                               (LETT #4# 'T . #6#)))))))
                                  (LETT #1# (CDR #1#) . #6#) (GO G190)
                                  G191 (EXIT NIL))
                             (COND (#4# #3#) ('T 0))) . #6#)
                (|check-subtype| (>= #5# 0) '(|NonNegativeInteger|)
                    #5#)))
             ('T (|error| "not a homogeneous element"))))))) 

(DEFUN |ANTISYM;zo| (|p| |q| $)
  (COND
    ((EQL |p| 0) (LIST 1 |q|))
    ((EQL |q| 0) (LIST 1 1))
    ('T (LIST 0 0)))) 

(DEFUN |ANTISYM;getsgn| (|x| |y| $)
  (PROG (|yy| |i| #0=#:G1939 |xx| #1=#:G1818 #2=#:G1940 #3=#:G1933
              #4=#:G1931 #5=#:G1932 |sgn|)
    (RETURN
      (SEQ (LETT |sgn| 0 . #6=(|ANTISYM;getsgn|))
           (LETT |xx| (SPADCALL |x| (QREFELT $ 26)) . #6#)
           (LETT |yy| (SPADCALL |y| (QREFELT $ 26)) . #6#)
           (SEQ (LETT |i| 1 . #6#) (LETT #0# (- (QREFELT $ 9) 1) . #6#)
                G190 (COND ((QSGREATERP |i| #0#) #7=(GO G191)))
                (SEQ (LETT |xx| (CDR |xx|) . #6#)
                     (EXIT (LETT |sgn|
                                 (+ |sgn|
                                    (*
                                     (PROGN
                                       (LETT #5# NIL . #6#)
                                       (SEQ (LETT #1# NIL . #6#)
                                        (LETT #2# |xx| . #6#) G190
                                        (COND
                                          ((OR (ATOM #2#)
                                            (PROGN
                                              (LETT #1#
                                               (CAR #2#) . #6#)
                                              NIL))
                                           #7#))
                                        (SEQ
                                         (EXIT
                                          (PROGN
                                            (LETT #3# #1# . #6#)
                                            (COND
                                              (#5#
                                               (LETT #4#
                                                (+ #4# #3#) . #6#))
                                              ('T
                                               (PROGN
                                                 (LETT #4# #3# . #6#)
                                                 (LETT #5# 'T . #6#)))))))
                                        (LETT #2# (CDR #2#) . #6#)
                                        #8=(GO G190) G191 (EXIT NIL))
                                       (COND (#5# #4#) ('T 0)))
                                     (SPADCALL |yy| |i| (QREFELT $ 32)))) . #6#)))
                (LETT |i| (QSADD1 |i|) . #6#) #8# G191 (EXIT NIL))
           (EXIT (COND ((EQL (REMAINDER2 |sgn| 2) 0) 1) ('T -1))))))) 

(DEFUN |ANTISYM;Nalpha| (|x| |y| $)
  (PROG (#0=#:G1947 #1=#:G1948 |dum2| |j| #2=#:G1949 |dum| |i|
            #3=#:G1944)
    (RETURN
      (SEQ (LETT |i| 1 . #4=(|ANTISYM;Nalpha|))
           (LETT |dum2|
                 (PROGN
                   (LETT #0# NIL . #4#)
                   (SEQ (LETT |i| 1 . #4#)
                        (LETT #1# (QREFELT $ 9) . #4#) G190
                        (COND ((QSGREATERP |i| #1#) #5=(GO G191)))
                        (SEQ (EXIT (LETT #0# (CONS 0 #0#) . #4#)))
                        (LETT |i| (QSADD1 |i|) . #4#) #6=(GO G190) G191
                        (EXIT (NREVERSE0 #0#)))) . #4#)
           (SEQ (EXIT (SEQ (LETT |j| 1 . #4#)
                           (LETT #2# (QREFELT $ 9) . #4#) G190
                           (COND ((QSGREATERP |j| #2#) #5#))
                           (SEQ (LETT |dum|
                                      (|ANTISYM;zo|
                                       (SPADCALL
                                        (SPADCALL |x| (QREFELT $ 26))
                                        |j| (QREFELT $ 32))
                                       (SPADCALL
                                        (SPADCALL |y| (QREFELT $ 26))
                                        |j| (QREFELT $ 32))
                                       $) . #4#)
                                (LETT |i|
                                      (SPADCALL |i|
                                       (SPADCALL |dum| 1
                                        (QREFELT $ 32))
                                       (QREFELT $ 33)) . #4#)
                                (EXIT (COND
                                        ((EQL |i| 0)
                                         (PROGN
                                           (LETT #3# |$NoValue| . #4#)
                                           (GO #3#)))
                                        ('T
                                         (SPADCALL |dum2| |j|
                                          (SPADCALL |dum| 2
                                           (QREFELT $ 32))
                                          (QREFELT $ 34))))))
                           (LETT |j| (QSADD1 |j|) . #4#) #6# G191
                           (EXIT NIL)))
                #3# (EXIT #3#))
           (EXIT (COND
                   ((EQL |i| 0) (CONS |i| |dum2|))
                   ('T (CONS (|ANTISYM;getsgn| |x| |y| $) |dum2|)))))))) 

(DEFUN |ANTISYM;*;3$;11| (|a| |b| $)
  (PROG (|tb| #0=#:G1960 |ta| #1=#:G1961 |stuff| |r| |z|)
    (RETURN
      (SEQ (COND
             ((OR (NULL |a|) (NULL |b|)) (|spadConstant| $ 30))
             ('T
              (SEQ (COND
                     ((NULL (CDR |a|))
                      (COND
                        ((SPADCALL (QCAR (|SPADfirst| |a|))
                             (SPADCALL (QREFELT $ 9) (QREFELT $ 12))
                             (QREFELT $ 16))
                         (EXIT (SPADCALL (QCDR (|SPADfirst| |a|)) |b|
                                         (QREFELT $ 35)))))))
                   (COND
                     ((NULL (CDR |b|))
                      (COND
                        ((SPADCALL (QCAR (|SPADfirst| |b|))
                             (SPADCALL (QREFELT $ 9) (QREFELT $ 12))
                             (QREFELT $ 16))
                         (EXIT (SPADCALL (QCDR (|SPADfirst| |b|)) |a|
                                         (QREFELT $ 35)))))))
                   (LETT |z| (|spadConstant| $ 30)
                         . #2=(|ANTISYM;*;3$;11|))
                   (SEQ (LETT |tb| NIL . #2#) (LETT #0# |b| . #2#) G190
                        (COND
                          ((OR (ATOM #0#)
                               (PROGN (LETT |tb| (CAR #0#) . #2#) NIL))
                           #3=(GO G191)))
                        (SEQ (EXIT (SEQ (LETT |ta| NIL . #2#)
                                    (LETT #1# |a| . #2#) G190
                                    (COND
                                      ((OR (ATOM #1#)
                                        (PROGN
                                          (LETT |ta| (CAR #1#) . #2#)
                                          NIL))
                                       #3#))
                                    (SEQ
                                     (LETT |stuff|
                                      (|ANTISYM;Nalpha| (QCAR |ta|)
                                       (QCAR |tb|) $) . #2#)
                                     (LETT |r|
                                      (SPADCALL
                                       (SPADCALL (|SPADfirst| |stuff|)
                                        (QCDR |ta|) (QREFELT $ 36))
                                       (QCDR |tb|) (QREFELT $ 37)) . #2#)
                                     (EXIT
                                      (COND
                                        ((NULL
                                          (SPADCALL |r|
                                           (|spadConstant| $ 18)
                                           (QREFELT $ 38)))
                                         (LETT |z|
                                          (SPADCALL |z|
                                           (LIST
                                            (CONS
                                             (SPADCALL (CDR |stuff|)
                                              (QREFELT $ 39))
                                             |r|))
                                           (QREFELT $ 40)) . #2#)))))
                                    (LETT #1# (CDR #1#) . #2#)
                                    #4=(GO G190) G191 (EXIT NIL))))
                        (LETT #0# (CDR #0#) . #2#) #4# G191 (EXIT NIL))
                   (EXIT |z|)))))))) 

(DEFUN |ANTISYM;coerce;R$;12| (|r| $)
  (COND
    ((SPADCALL |r| (|spadConstant| $ 18) (QREFELT $ 38))
     (|spadConstant| $ 30))
    ('T (LIST (CONS (SPADCALL (QREFELT $ 9) (QREFELT $ 12)) |r|))))) 

(DEFUN |ANTISYM;coerce;I$;13| (|m| $)
  (COND
    ((EQL |m| 0) (|spadConstant| $ 30))
    ('T
     (LIST (CONS (SPADCALL (QREFELT $ 9) (QREFELT $ 12))
                 (SPADCALL |m| (QREFELT $ 43))))))) 

(DEFUN |ANTISYM;characteristic;Nni;14| ($) (SPADCALL (QREFELT $ 45))) 

(DEFUN |ANTISYM;generator;Nni$;15| (|j| $)
  (PROG (#0=#:G1971 |i| #1=#:G1972 |dum|)
    (RETURN
      (SEQ (LETT |dum|
                 (PROGN
                   (LETT #0# NIL . #2=(|ANTISYM;generator;Nni$;15|))
                   (SEQ (LETT |i| 1 . #2#)
                        (LETT #1# (QREFELT $ 9) . #2#) G190
                        (COND ((QSGREATERP |i| #1#) (GO G191)))
                        (SEQ (EXIT (LETT #0# (CONS 0 #0#) . #2#)))
                        (LETT |i| (QSADD1 |i|) . #2#) (GO G190) G191
                        (EXIT (NREVERSE0 #0#)))) . #2#)
           (SPADCALL |dum| |j| 1 (QREFELT $ 34))
           (EXIT (LIST (CONS (SPADCALL |dum| (QREFELT $ 39))
                             (|spadConstant| $ 13)))))))) 

(DEFUN |ANTISYM;exp;L$;16| (|li| $)
  (LIST (CONS (SPADCALL |li| (QREFELT $ 39)) (|spadConstant| $ 13)))) 

(DEFUN |ANTISYM;leadingBasisTerm;2$;17| (|a| $)
  (LIST (CONS (QCAR (|SPADfirst| |a|)) (|spadConstant| $ 13)))) 

(DEFUN |ANTISYM;displayList| (|x| $)
  (PROG (|le| #0=#:G1982 |i| #1=#:G1983)
    (RETURN
      (SEQ (LETT |le| (SPADCALL |x| (QREFELT $ 26))
                 . #2=(|ANTISYM;displayList|))
           (EXIT (SPADCALL (ELT $ 51)
                     (PROGN
                       (LETT #0# NIL . #2#)
                       (SEQ (LETT |i| 1 . #2#)
                            (LETT #1# (QREFELT $ 9) . #2#) G190
                            (COND ((QSGREATERP |i| #1#) (GO G191)))
                            (SEQ (EXIT (COND
                                         ((EQL
                                           (SPADCALL |le| |i|
                                            (QREFELT $ 32))
                                           1)
                                          (LETT #0#
                                           (CONS
                                            (SPADCALL
                                             (SPADCALL (QREFELT $ 7)
                                              |i| (QREFELT $ 54))
                                             (QREFELT $ 55))
                                            #0#) . #2#)))))
                            (LETT |i| (QSADD1 |i|) . #2#) (GO G190)
                            G191 (EXIT (NREVERSE0 #0#))))
                     (QREFELT $ 58))))))) 

(DEFUN |ANTISYM;makeTerm| (|r| |x| $)
  (COND
    ((SPADCALL |x| (SPADCALL (QREFELT $ 9) (QREFELT $ 12))
         (QREFELT $ 16))
     (SPADCALL |r| (QREFELT $ 59)))
    ((SPADCALL |r| (|spadConstant| $ 13) (QREFELT $ 38))
     (|ANTISYM;displayList| |x| $))
    ('T
     (SPADCALL (SPADCALL |r| (QREFELT $ 59))
         (|ANTISYM;displayList| |x| $) (QREFELT $ 51))))) 

(DEFUN |ANTISYM;coerce;$Of;20| (|a| $)
  (PROG (#0=#:G1992 |t| #1=#:G1993)
    (RETURN
      (SEQ (COND
             ((SPADCALL |a| (QREFELT $ 60))
              (SPADCALL 0 (QREFELT $ 61)))
             ((NULL (CDR |a|))
              (SEQ (LETT |t| (|SPADfirst| |a|)
                         . #2=(|ANTISYM;coerce;$Of;20|))
                   (EXIT (|ANTISYM;makeTerm| (QCDR |t|) (QCAR |t|) $))))
             ('T
              (SPADCALL (ELT $ 62)
                  (PROGN
                    (LETT #0# NIL . #2#)
                    (SEQ (LETT |t| NIL . #2#) (LETT #1# |a| . #2#) G190
                         (COND
                           ((OR (ATOM #1#)
                                (PROGN (LETT |t| (CAR #1#) . #2#) NIL))
                            (GO G191)))
                         (SEQ (EXIT (LETT #0#
                                     (CONS
                                      (|ANTISYM;makeTerm| (QCDR |t|)
                                       (QCAR |t|) $)
                                      #0#) . #2#)))
                         (LETT #1# (CDR #1#) . #2#) (GO G190) G191
                         (EXIT (NREVERSE0 #0#))))
                  (QREFELT $ 58)))))))) 

(DEFUN |AntiSymm| (&REST #0=#:G1998)
  (PROG ()
    (RETURN
      (PROG (#1=#:G1999)
        (RETURN
          (COND
            ((LETT #1#
                   (|lassocShiftWithFunction| (|devaluateList| #0#)
                       (HGET |$ConstructorCache| '|AntiSymm|)
                       '|domainEqualList|)
                   . #2=(|AntiSymm|))
             (|CDRwithIncrement| #1#))
            ('T
             (UNWIND-PROTECT
               (PROG1 (APPLY (|function| |AntiSymm;|) #0#)
                 (LETT #1# T . #2#))
               (COND
                 ((NOT #1#) (HREM |$ConstructorCache| '|AntiSymm|))))))))))) 

(DEFUN |AntiSymm;| (|#1| |#2|)
  (PROG (DV$1 DV$2 |dv$| $ |pv$|)
    (RETURN
      (PROGN
        (LETT DV$1 (|devaluate| |#1|) . #0=(|AntiSymm|))
        (LETT DV$2 (|devaluate| |#2|) . #0#)
        (LETT |dv$| (LIST '|AntiSymm| DV$1 DV$2) . #0#)
        (LETT $ (GETREFV 69) . #0#)
        (QSETREFV $ 0 |dv$|)
        (QSETREFV $ 3 (LETT |pv$| (|buildPredVector| 0 0 NIL) . #0#))
        (|haddProp| |$ConstructorCache| '|AntiSymm| (LIST DV$1 DV$2)
            (CONS 1 $))
        (|stuffDomainSlots| $)
        (QSETREFV $ 6 |#1|)
        (QSETREFV $ 7 |#2|)
        (QSETREFV $ 8
            (|List| (|Record| (|:| |k| (|ExtAlgBasis|)) (|:| |c| |#1|))))
        (QSETREFV $ 9 (LENGTH |#2|))
        $)))) 

(MAKEPROP '|AntiSymm| '|infovec|
    (LIST '#(NIL NIL NIL NIL NIL (|FreeModule| 6 11) (|local| |#1|)
             (|local| |#2|) '|Rep| '|dim| (|NonNegativeInteger|)
             (|ExtAlgBasis|) (0 . |Nul|) (5 . |One|)
             (CONS IDENTITY
                   (FUNCALL (|dispatchFunction| |ANTISYM;One;$;1|) $))
             (|Boolean|) (9 . =) (15 . <) (21 . |Zero|)
             |ANTISYM;coefficient;2$R;2| |ANTISYM;retractable?;$B;3|
             (25 . |leadingCoefficient|) (|Union| 6 '"failed")
             |ANTISYM;retractIfCan;$U;4| |ANTISYM;retract;$R;5|
             (|List| 31) (30 . |exponents|) (35 . |reductum|)
             |ANTISYM;homogeneous?;$B;6| |ANTISYM;degree;$Nni;7|
             (40 . |Zero|) (|Integer|) (44 . |elt|) (50 . *)
             (56 . |setelt|) (63 . *) (69 . *) (75 . *) (81 . =)
             (87 . |coerce|) (92 . +) |ANTISYM;*;3$;11|
             |ANTISYM;coerce;R$;12| (98 . |coerce|)
             |ANTISYM;coerce;I$;13| (103 . |characteristic|)
             |ANTISYM;characteristic;Nni;14|
             |ANTISYM;generator;Nni$;15| |ANTISYM;exp;L$;16|
             |ANTISYM;leadingBasisTerm;2$;17| (|OutputForm|) (107 . *)
             (|Symbol|) (|List| 52) (113 . |elt|) (119 . |coerce|)
             (|Mapping| 50 50 50) (|List| 50) (124 . |reduce|)
             (130 . |coerce|) (135 . |zero?|) (140 . |coerce|)
             (145 . +) |ANTISYM;coerce;$Of;20| (|Mapping| 6 6)
             (|Union| $ '"failed") (|PositiveInteger|)
             (|SingleInteger|) (|String|))
          '#(~= 151 |zero?| 157 |subtractIfCan| 162 |sample| 168
             |retractable?| 172 |retractIfCan| 177 |retract| 182
             |reductum| 187 |recip| 192 |one?| 197 |map| 202
             |leadingCoefficient| 208 |leadingBasisTerm| 213 |latex|
             218 |homogeneous?| 223 |hash| 228 |generator| 233 |exp|
             238 |degree| 243 |coerce| 248 |coefficient| 263
             |characteristic| 269 ^ 273 |Zero| 285 |One| 289 = 293 -
             299 + 310 ** 316 * 328)
          'NIL
          (CONS (|makeByteWordVec2| 1
                    '(0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0))
                (CONS '#(|LeftAlgebra&| |Ring&| NIL NIL NIL
                         |AbelianGroup&| NIL NIL |AbelianMonoid&|
                         |Monoid&| NIL |SemiGroup&| |AbelianSemiGroup&|
                         |SetCategory&| |RetractableTo&| NIL
                         |BasicType&| NIL)
                      (CONS '#((|LeftAlgebra| 6) (|Ring|) (|Rng|)
                               (|LeftModule| 6) (|LeftModule| $$)
                               (|AbelianGroup|)
                               (|CancellationAbelianMonoid|)
                               (|SemiRing|) (|AbelianMonoid|)
                               (|Monoid|) (|SemiRng|) (|SemiGroup|)
                               (|AbelianSemiGroup|) (|SetCategory|)
                               (|RetractableTo| 6) (|unitsKnown|)
                               (|BasicType|) (|CoercibleTo| 50))
                            (|makeByteWordVec2| 68
                                '(1 11 0 10 12 0 6 0 13 2 11 15 0 0 16
                                  2 11 15 0 0 17 0 6 0 18 1 0 6 0 21 1
                                  11 25 0 26 1 0 0 0 27 0 0 0 30 2 25
                                  31 0 31 32 2 31 0 10 0 33 3 25 31 0
                                  31 31 34 2 0 0 6 0 35 2 6 0 31 0 36 2
                                  6 0 0 0 37 2 6 15 0 0 38 1 11 0 25 39
                                  2 0 0 0 0 40 1 6 0 31 43 0 6 10 45 2
                                  50 0 0 0 51 2 53 52 0 31 54 1 52 50 0
                                  55 2 57 50 56 0 58 1 6 50 0 59 1 0 15
                                  0 60 1 31 50 0 61 2 50 0 0 0 62 2 0
                                  15 0 0 1 1 0 15 0 60 2 0 65 0 0 1 0 0
                                  0 1 1 0 15 0 20 1 0 22 0 23 1 0 6 0
                                  24 1 0 0 0 27 1 0 65 0 1 1 0 15 0 1 2
                                  0 0 64 0 1 1 0 6 0 21 1 0 0 0 49 1 0
                                  68 0 1 1 0 15 0 28 1 0 67 0 1 1 0 0
                                  10 47 1 0 0 25 48 1 0 10 0 29 1 0 0 6
                                  42 1 0 0 31 44 1 0 50 0 63 2 0 6 0 0
                                  19 0 0 10 46 2 0 0 0 10 1 2 0 0 0 66
                                  1 0 0 0 30 0 0 0 14 2 0 15 0 0 1 2 0
                                  0 0 0 1 1 0 0 0 1 2 0 0 0 0 40 2 0 0
                                  0 10 1 2 0 0 0 66 1 2 0 0 6 0 35 2 0
                                  0 0 0 41 2 0 0 31 0 1 2 0 0 10 0 1 2
                                  0 0 66 0 1)))))
          '|lookupComplete|)) 
