
(/VERSIONCHECK 2) 

(DEFUN |REP1;calcCoef| (|beta| C $)
  (PROG (|i| #0=#:G1821 |prod|)
    (RETURN
      (SEQ (LETT |prod| 1 . #1=(|REP1;calcCoef|))
           (SEQ (LETT |i| 1 . #1#)
                (LETT #0# (SPADCALL |beta| (QREFELT $ 9)) . #1#) G190
                (COND ((QSGREATERP |i| #0#) (GO G191)))
                (SEQ (EXIT (LETT |prod|
                                 (* |prod|
                                    (SPADCALL
                                     (SPADCALL |beta| |i|
                                      (QREFELT $ 10))
                                     (SPADCALL
                                      (SPADCALL C |i| (QREFELT $ 13))
                                      (QREFELT $ 14))
                                     (QREFELT $ 16))) . #1#)))
                (LETT |i| (QSADD1 |i|) . #1#) (GO G190) G191
                (EXIT NIL))
           (EXIT |prod|))))) 

(DEFUN |REP1;invContent| (|alpha| $)
  (PROG (#0=#:G1815 #1=#:G1835 #2=#:G1827 #3=#:G1825 #4=#:G1826
            #5=#:G1828 |n| |f| |og| #6=#:G1836 |j| |k| |i|)
    (RETURN
      (SEQ (LETT |n|
                 (PROG1 (LETT #5#
                              (PROGN
                                (LETT #4# NIL . #7=(|REP1;invContent|))
                                (SEQ (LETT #0# NIL . #7#)
                                     (LETT #1# |alpha| . #7#) G190
                                     (COND
                                       ((OR (ATOM #1#)
                                         (PROGN
                                           (LETT #0# (CAR #1#) . #7#)
                                           NIL))
                                        #8=(GO G191)))
                                     (SEQ
                                      (EXIT
                                       (PROGN
                                         (LETT #2# #0# . #7#)
                                         (COND
                                           (#4#
                                            (LETT #3#
                                             (+ #3# #2#) . #7#))
                                           ('T
                                            (PROGN
                                              (LETT #3# #2# . #7#)
                                              (LETT #4# 'T . #7#)))))))
                                     (LETT #1# (CDR #1#) . #7#)
                                     #9=(GO G190) G191 (EXIT NIL))
                                (COND (#4# #3#) ('T 0))) . #7#)
                   (|check-subtype| (>= #5# 0) '(|NonNegativeInteger|)
                       #5#)) . #7#)
           (LETT |f| (SPADCALL |n| 0 (QREFELT $ 19)) . #7#)
           (LETT |i| 1 . #7#) (LETT |j| -1 . #7#)
           (SEQ (LETT |og| NIL . #7#) (LETT #6# |alpha| . #7#) G190
                (COND
                  ((OR (ATOM #6#)
                       (PROGN (LETT |og| (CAR #6#) . #7#) NIL))
                   #8#))
                (SEQ (LETT |j| (+ |j| 1) . #7#)
                     (EXIT (SEQ (LETT |k| 1 . #7#) G190
                                (COND ((QSGREATERP |k| |og|) #8#))
                                (SEQ (SPADCALL |f| |i| |j|
                                      (QREFELT $ 21))
                                     (EXIT (LETT |i| (+ |i| 1) . #7#)))
                                (LETT |k| (QSADD1 |k|) . #7#) #9# G191
                                (EXIT NIL))))
                (LETT #6# (CDR #6#) . #7#) #9# G191 (EXIT NIL))
           (EXIT |f|))))) 

(DEFUN |REP1;antisymmetricTensors;MPiM;3| (|a| |k| $)
  (PROG (|n| |m| #0=#:G1849 #1=#:G1850 |il| #2=#:G1838 #3=#:G1839 |b|
             |i| |j| |c| |lr| |lt| |r| |t| |rr| |tt|)
    (RETURN
      (SEQ (LETT |n| (SPADCALL |a| (QREFELT $ 23))
                 . #4=(|REP1;antisymmetricTensors;MPiM;3|))
           (EXIT (COND
                   ((EQL |k| 1) |a|)
                   ((< |n| |k|)
                    (|error| "second parameter for antisymmetricTensors is too large"))
                   ('T
                    (SEQ (LETT |m|
                               (SPADCALL |n| |k| (QREFELT $ 24)) . #4#)
                         (LETT |il|
                               (PROGN
                                 (LETT #0# NIL . #4#)
                                 (SEQ (LETT |i| 0 . #4#)
                                      (LETT #1# (- |m| 1) . #4#) G190
                                      (COND
                                        ((QSGREATERP |i| #1#)
                                         #5=(GO G191)))
                                      (SEQ
                                       (EXIT
                                        (LETT #0#
                                         (CONS
                                          (SPADCALL |n| |k| |i|
                                           (QREFELT $ 26))
                                          #0#) . #4#)))
                                      (LETT |i| (QSADD1 |i|) . #4#)
                                      #6=(GO G190) G191
                                      (EXIT (NREVERSE0 #0#)))) . #4#)
                         (LETT |b|
                               (SPADCALL
                                   (PROG1 (LETT #2# |m| . #4#)
                                     (|check-subtype| (>= #2# 0)
                                      '(|NonNegativeInteger|) #2#))
                                   (PROG1 (LETT #3# |m| . #4#)
                                     (|check-subtype| (>= #3# 0)
                                      '(|NonNegativeInteger|) #3#))
                                   (QREFELT $ 27)) . #4#)
                         (SEQ (LETT |i| 1 . #4#) G190
                              (COND ((QSGREATERP |i| |m|) #5#))
                              (SEQ (EXIT
                                    (SEQ (LETT |j| 1 . #4#) G190
                                     (COND ((QSGREATERP |j| |m|) #5#))
                                     (SEQ
                                      (LETT |c|
                                       (SPADCALL |k| |k|
                                        (QREFELT $ 27)) . #4#)
                                      (LETT |lr|
                                       (SPADCALL |il| |i|
                                        (QREFELT $ 29)) . #4#)
                                      (LETT |lt|
                                       (SPADCALL |il| |j|
                                        (QREFELT $ 29)) . #4#)
                                      (SEQ (LETT |r| 1 . #4#) G190
                                       (COND
                                         ((QSGREATERP |r| |k|) #5#))
                                       (SEQ
                                        (EXIT
                                         (SEQ (LETT |t| 1 . #4#) G190
                                          (COND
                                            ((QSGREATERP |t| |k|) #5#))
                                          (SEQ
                                           (LETT |rr|
                                            (SPADCALL |lr| |r|
                                             (QREFELT $ 10)) . #4#)
                                           (LETT |tt|
                                            (SPADCALL |lt| |t|
                                             (QREFELT $ 10)) . #4#)
                                           (EXIT
                                            (SPADCALL |c| |r| |t|
                                             (SPADCALL |a| (+ 1 |rr|)
                                              (+ 1 |tt|)
                                              (QREFELT $ 30))
                                             (QREFELT $ 31))))
                                          (LETT |t| (QSADD1 |t|) . #4#)
                                          #6# G191 (EXIT NIL))))
                                       (LETT |r| (QSADD1 |r|) . #4#)
                                       #6# G191 (EXIT NIL))
                                      (EXIT
                                       (SPADCALL |b| |i| |j|
                                        (SPADCALL |c| (QREFELT $ 32))
                                        (QREFELT $ 31))))
                                     (LETT |j| (QSADD1 |j|) . #4#) #6#
                                     G191 (EXIT NIL))))
                              (LETT |i| (QSADD1 |i|) . #4#) #6# G191
                              (EXIT NIL))
                         (EXIT |b|))))))))) 

(DEFUN |REP1;antisymmetricTensors;LPiL;4| (|la| |k| $)
  (PROG (#0=#:G1853 |ma| #1=#:G1854)
    (RETURN
      (SEQ (PROGN
             (LETT #0# NIL . #2=(|REP1;antisymmetricTensors;LPiL;4|))
             (SEQ (LETT |ma| NIL . #2#) (LETT #1# |la| . #2#) G190
                  (COND
                    ((OR (ATOM #1#)
                         (PROGN (LETT |ma| (CAR #1#) . #2#) NIL))
                     (GO G191)))
                  (SEQ (EXIT (LETT #0#
                                   (CONS
                                    (SPADCALL |ma| |k| (QREFELT $ 34))
                                    #0#) . #2#)))
                  (LETT #1# (CDR #1#) . #2#) (GO G190) G191
                  (EXIT (NREVERSE0 #0#)))))))) 

(DEFUN |REP1;symmetricTensors;MPiM;5| (|a| |n| $)
  (PROG (|m| #0=#:G1856 |dim| |c| |nullMatrix| |i| |alpha| |f| |j|
             |beta| |g| |gamma| |k| #1=#:G1857 #2=#:G1858 |help|
             |colemanMatrix|)
    (RETURN
      (SEQ (LETT |m| (SPADCALL |a| (QREFELT $ 23))
                 . #3=(|REP1;symmetricTensors;MPiM;5|))
           (COND
             ((NULL (EQL |m| (SPADCALL |a| (QREFELT $ 37))))
              (EXIT (|error| "Input to symmetricTensors is no square matrix"))))
           (EXIT (COND
                   ((EQL |n| 1) |a|)
                   ('T
                    (SEQ (LETT |dim|
                               (PROG1 (LETT #0#
                                       (SPADCALL (- (+ |m| |n|) 1) |n|
                                        (QREFELT $ 24)) . #3#)
                                 (|check-subtype| (>= #0# 0)
                                     '(|NonNegativeInteger|) #0#)) . #3#)
                         (LETT |c|
                               (SPADCALL |dim| |dim|
                                   (|spadConstant| $ 17)
                                   (QREFELT $ 38)) . #3#)
                         (LETT |f|
                               (SPADCALL |n| 0 (QREFELT $ 19)) . #3#)
                         (LETT |g|
                               (SPADCALL |n| 0 (QREFELT $ 19)) . #3#)
                         (LETT |nullMatrix|
                               (SPADCALL 1 1 0 (QREFELT $ 39)) . #3#)
                         (SEQ (LETT |i| 1 . #3#) G190
                              (COND
                                ((QSGREATERP |i| |dim|) #4=(GO G191)))
                              (SEQ (LETT |alpha|
                                    (SPADCALL |n| |m| (- |i| 1)
                                     (QREFELT $ 40)) . #3#)
                                   (LETT |f|
                                    (|REP1;invContent| |alpha| $) . #3#)
                                   (EXIT
                                    (SEQ (LETT |j| 1 . #3#) G190
                                     (COND
                                       ((QSGREATERP |j| |dim|) #4#))
                                     (SEQ
                                      (LETT |beta|
                                       (SPADCALL |n| |m| (- |j| 1)
                                        (QREFELT $ 40)) . #3#)
                                      (LETT |g|
                                       (|REP1;invContent| |beta| $) . #3#)
                                      (LETT |colemanMatrix|
                                       (SPADCALL |alpha| |beta|
                                        |nullMatrix| (QREFELT $ 41)) . #3#)
                                      (EXIT
                                       (SEQ G190
                                        (COND
                                          ((NULL
                                            (COND
                                              ((SPADCALL
                                                |colemanMatrix|
                                                |nullMatrix|
                                                (QREFELT $ 43))
                                               'NIL)
                                              ('T 'T)))
                                           #4#))
                                        (SEQ
                                         (LETT |gamma|
                                          (SPADCALL |alpha| |beta|
                                           |colemanMatrix|
                                           (QREFELT $ 44)) . #3#)
                                         (LETT |help|
                                          (SPADCALL
                                           (|REP1;calcCoef| |beta|
                                            |colemanMatrix| $)
                                           (QREFELT $ 45)) . #3#)
                                         (SEQ (LETT |k| 1 . #3#) G190
                                          (COND
                                            ((QSGREATERP |k| |n|) #4#))
                                          (SEQ
                                           (EXIT
                                            (LETT |help|
                                             (SPADCALL |help|
                                              (SPADCALL |a|
                                               (PROG1
                                                (LETT #1#
                                                 (+ 1
                                                  (SPADCALL |f| |k|
                                                   (QREFELT $ 46))) . #3#)
                                                 (|check-subtype|
                                                  (>= #1# 0)
                                                  '(|NonNegativeInteger|)
                                                  #1#))
                                               (PROG1
                                                (LETT #2#
                                                 (+ 1
                                                  (SPADCALL |g|
                                                   (SPADCALL |gamma|
                                                    |k| (QREFELT $ 10))
                                                   (QREFELT $ 46))) . #3#)
                                                 (|check-subtype|
                                                  (>= #2# 0)
                                                  '(|NonNegativeInteger|)
                                                  #2#))
                                               (QREFELT $ 30))
                                              (QREFELT $ 47)) . #3#)))
                                          (LETT |k| (QSADD1 |k|) . #3#)
                                          #5=(GO G190) G191 (EXIT NIL))
                                         (SPADCALL |c| |i| |j|
                                          (SPADCALL
                                           (SPADCALL |c| |i| |j|
                                            (QREFELT $ 30))
                                           |help| (QREFELT $ 48))
                                          (QREFELT $ 31))
                                         (EXIT
                                          (LETT |colemanMatrix|
                                           (SPADCALL |alpha| |beta|
                                            |colemanMatrix|
                                            (QREFELT $ 41)) . #3#)))
                                        NIL #5# G191 (EXIT NIL))))
                                     (LETT |j| (QSADD1 |j|) . #3#) #5#
                                     G191 (EXIT NIL))))
                              (LETT |i| (QSADD1 |i|) . #3#) #5# G191
                              (EXIT NIL))
                         (EXIT |c|))))))))) 

(DEFUN |REP1;symmetricTensors;LPiL;6| (|la| |k| $)
  (PROG (#0=#:G1871 |ma| #1=#:G1872)
    (RETURN
      (SEQ (PROGN
             (LETT #0# NIL . #2=(|REP1;symmetricTensors;LPiL;6|))
             (SEQ (LETT |ma| NIL . #2#) (LETT #1# |la| . #2#) G190
                  (COND
                    ((OR (ATOM #1#)
                         (PROGN (LETT |ma| (CAR #1#) . #2#) NIL))
                     (GO G191)))
                  (SEQ (EXIT (LETT #0#
                                   (CONS
                                    (SPADCALL |ma| |k| (QREFELT $ 49))
                                    #0#) . #2#)))
                  (LETT #1# (CDR #1#) . #2#) (GO G190) G191
                  (EXIT (NREVERSE0 #0#)))))))) 

(DEFUN |REP1;tensorProduct;3M;7| (|a| |b| $)
  (PROG (|n| |m| |nc| |mc| |c| |i| |k| |j| |l| |indexc| |indexr|)
    (RETURN
      (SEQ (LETT |n| (SPADCALL |a| (QREFELT $ 23))
                 . #0=(|REP1;tensorProduct;3M;7|))
           (LETT |m| (SPADCALL |b| (QREFELT $ 23)) . #0#)
           (LETT |nc| (SPADCALL |a| (QREFELT $ 37)) . #0#)
           (LETT |mc| (SPADCALL |b| (QREFELT $ 37)) . #0#)
           (LETT |c|
                 (SPADCALL (* |n| |m|) (* |nc| |mc|) (QREFELT $ 27)) . #0#)
           (LETT |indexr| 1 . #0#)
           (SEQ (LETT |i| 1 . #0#) G190
                (COND ((QSGREATERP |i| |n|) #1=(GO G191)))
                (SEQ (EXIT (SEQ (LETT |k| 1 . #0#) G190
                                (COND ((QSGREATERP |k| |m|) #1#))
                                (SEQ (LETT |indexc| 1 . #0#)
                                     (SEQ (LETT |j| 1 . #0#) G190
                                      (COND
                                        ((QSGREATERP |j| |nc|) #1#))
                                      (SEQ
                                       (EXIT
                                        (SEQ (LETT |l| 1 . #0#) G190
                                         (COND
                                           ((QSGREATERP |l| |mc|) #1#))
                                         (SEQ
                                          (SPADCALL |c| |indexr|
                                           |indexc|
                                           (SPADCALL
                                            (SPADCALL |a| |i| |j|
                                             (QREFELT $ 30))
                                            (SPADCALL |b| |k| |l|
                                             (QREFELT $ 30))
                                            (QREFELT $ 47))
                                           (QREFELT $ 31))
                                          (EXIT
                                           (LETT |indexc|
                                            (+ |indexc| 1) . #0#)))
                                         (LETT |l| (QSADD1 |l|) . #0#)
                                         #2=(GO G190) G191 (EXIT NIL))))
                                      (LETT |j| (QSADD1 |j|) . #0#) #2#
                                      G191 (EXIT NIL))
                                     (EXIT
                                      (LETT |indexr|
                                       (+ |indexr| 1) . #0#)))
                                (LETT |k| (QSADD1 |k|) . #0#) #2# G191
                                (EXIT NIL))))
                (LETT |i| (QSADD1 |i|) . #0#) #2# G191 (EXIT NIL))
           (EXIT |c|))))) 

(DEFUN |REP1;tensorProduct;3L;8| (|la| |lb| $)
  (PROG (#0=#:G1883 |i| #1=#:G1884)
    (RETURN
      (SEQ (PROGN
             (LETT #0# NIL . #2=(|REP1;tensorProduct;3L;8|))
             (SEQ (LETT |i| 1 . #2#)
                  (LETT #1# (SPADCALL |la| (QREFELT $ 52)) . #2#) G190
                  (COND ((QSGREATERP |i| #1#) (GO G191)))
                  (SEQ (EXIT (LETT #0#
                                   (CONS
                                    (SPADCALL
                                     (SPADCALL |la| |i| (QREFELT $ 53))
                                     (SPADCALL |lb| |i| (QREFELT $ 53))
                                     (QREFELT $ 51))
                                    #0#) . #2#)))
                  (LETT |i| (QSADD1 |i|) . #2#) (GO G190) G191
                  (EXIT (NREVERSE0 #0#)))))))) 

(DEFUN |REP1;tensorProduct;2M;9| (|a| $)
  (SPADCALL |a| |a| (QREFELT $ 51))) 

(DEFUN |REP1;tensorProduct;2L;10| (|la| $)
  (SPADCALL |la| |la| (QREFELT $ 54))) 

(DEFUN |REP1;permutationRepresentation;PIM;11| (|p| |n| $)
  (PROG (#0=#:G1887 #1=#:G1888 |a| |i|)
    (RETURN
      (SEQ (LETT |a|
                 (SPADCALL
                     (PROG1 (LETT #0# |n|
                                  . #2=(|REP1;permutationRepresentation;PIM;11|))
                       (|check-subtype| (>= #0# 0)
                           '(|NonNegativeInteger|) #0#))
                     (PROG1 (LETT #1# |n| . #2#)
                       (|check-subtype| (>= #1# 0)
                           '(|NonNegativeInteger|) #1#))
                     (QREFELT $ 57)) . #2#)
           (SEQ (LETT |i| 1 . #2#) G190
                (COND ((QSGREATERP |i| |n|) (GO G191)))
                (SEQ (EXIT (SPADCALL |a|
                               (SPADCALL |p| |i| (QREFELT $ 59)) |i| 1
                               (QREFELT $ 60))))
                (LETT |i| (QSADD1 |i|) . #2#) (GO G190) G191
                (EXIT NIL))
           (EXIT |a|))))) 

(DEFUN |REP1;permutationRepresentation;LM;12| (|p| $)
  (PROG (|n| #0=#:G1892 #1=#:G1893 |a| |i|)
    (RETURN
      (SEQ (LETT |n| (LENGTH |p|)
                 . #2=(|REP1;permutationRepresentation;LM;12|))
           (LETT |a|
                 (SPADCALL
                     (PROG1 (LETT #0# |n| . #2#)
                       (|check-subtype| (>= #0# 0)
                           '(|NonNegativeInteger|) #0#))
                     (PROG1 (LETT #1# |n| . #2#)
                       (|check-subtype| (>= #1# 0)
                           '(|NonNegativeInteger|) #1#))
                     (QREFELT $ 57)) . #2#)
           (SEQ (LETT |i| 1 . #2#) G190
                (COND ((QSGREATERP |i| |n|) (GO G191)))
                (SEQ (EXIT (SPADCALL |a|
                               (SPADCALL |p| |i| (QREFELT $ 10)) |i| 1
                               (QREFELT $ 60))))
                (LETT |i| (QSADD1 |i|) . #2#) (GO G190) G191
                (EXIT NIL))
           (EXIT |a|))))) 

(DEFUN |REP1;permutationRepresentation;LIL;13| (|listperm| |n| $)
  (PROG (#0=#:G1899 |perm| #1=#:G1900)
    (RETURN
      (SEQ (PROGN
             (LETT #0# NIL
                   . #2=(|REP1;permutationRepresentation;LIL;13|))
             (SEQ (LETT |perm| NIL . #2#) (LETT #1# |listperm| . #2#)
                  G190
                  (COND
                    ((OR (ATOM #1#)
                         (PROGN (LETT |perm| (CAR #1#) . #2#) NIL))
                     (GO G191)))
                  (SEQ (EXIT (LETT #0#
                                   (CONS
                                    (SPADCALL |perm| |n|
                                     (QREFELT $ 61))
                                    #0#) . #2#)))
                  (LETT #1# (CDR #1#) . #2#) (GO G190) G191
                  (EXIT (NREVERSE0 #0#)))))))) 

(DEFUN |REP1;permutationRepresentation;LL;14| (|listperm| $)
  (PROG (#0=#:G1903 |perm| #1=#:G1904)
    (RETURN
      (SEQ (PROGN
             (LETT #0# NIL
                   . #2=(|REP1;permutationRepresentation;LL;14|))
             (SEQ (LETT |perm| NIL . #2#) (LETT #1# |listperm| . #2#)
                  G190
                  (COND
                    ((OR (ATOM #1#)
                         (PROGN (LETT |perm| (CAR #1#) . #2#) NIL))
                     (GO G191)))
                  (SEQ (EXIT (LETT #0#
                                   (CONS
                                    (SPADCALL |perm| (QREFELT $ 62))
                                    #0#) . #2#)))
                  (LETT #1# (CDR #1#) . #2#) (GO G190) G191
                  (EXIT (NREVERSE0 #0#)))))))) 

(DEFUN |REP1;createGenericMatrix;NniM;15| (|m| $)
  (PROG (|res| |i| |j| |iof| |jof| |le| |sy|)
    (RETURN
      (SEQ (LETT |res|
                 (SPADCALL |m| |m| (|spadConstant| $ 68)
                     (QREFELT $ 70))
                 . #0=(|REP1;createGenericMatrix;NniM;15|))
           (SEQ (LETT |i| 1 . #0#) G190
                (COND ((QSGREATERP |i| |m|) #1=(GO G191)))
                (SEQ (EXIT (SEQ (LETT |j| 1 . #0#) G190
                                (COND ((QSGREATERP |j| |m|) #1#))
                                (SEQ (LETT |iof|
                                      (SPADCALL |i| (QREFELT $ 72)) . #0#)
                                     (LETT |jof|
                                      (SPADCALL |j| (QREFELT $ 72)) . #0#)
                                     (LETT |le|
                                      (CONS |iof|
                                       (SPADCALL |jof| (QREFELT $ 74))) . #0#)
                                     (LETT |sy|
                                      (SPADCALL '|x| |le|
                                       (QREFELT $ 76)) . #0#)
                                     (EXIT
                                      (SPADCALL |res| |i| |j|
                                       (SPADCALL |sy| (QREFELT $ 77))
                                       (QREFELT $ 78))))
                                (LETT |j| (QSADD1 |j|) . #0#)
                                #2=(GO G190) G191 (EXIT NIL))))
                (LETT |i| (QSADD1 |i|) . #0#) #2# G191 (EXIT NIL))
           (EXIT |res|))))) 

(DEFUN |RepresentationPackage1| (#0=#:G1910)
  (PROG ()
    (RETURN
      (PROG (#1=#:G1911)
        (RETURN
          (COND
            ((LETT #1#
                   (|lassocShiftWithFunction| (LIST (|devaluate| #0#))
                       (HGET |$ConstructorCache|
                             '|RepresentationPackage1|)
                       '|domainEqualList|)
                   . #2=(|RepresentationPackage1|))
             (|CDRwithIncrement| #1#))
            ('T
             (UNWIND-PROTECT
               (PROG1 (|RepresentationPackage1;| #0#)
                 (LETT #1# T . #2#))
               (COND
                 ((NOT #1#)
                  (HREM |$ConstructorCache| '|RepresentationPackage1|))))))))))) 

(DEFUN |RepresentationPackage1;| (|#1|)
  (PROG (DV$1 |dv$| $ |pv$|)
    (RETURN
      (PROGN
        (LETT DV$1 (|devaluate| |#1|) . #0=(|RepresentationPackage1|))
        (LETT |dv$| (LIST '|RepresentationPackage1| DV$1) . #0#)
        (LETT $ (GETREFV 80) . #0#)
        (QSETREFV $ 0 |dv$|)
        (QSETREFV $ 3
            (LETT |pv$|
                  (|buildPredVector| 0 0
                      (LIST (|HasCategory| |#1| '(|CommutativeRing|)))) . #0#))
        (|haddProp| |$ConstructorCache| '|RepresentationPackage1|
            (LIST DV$1) (CONS 1 $))
        (|stuffDomainSlots| $)
        (QSETREFV $ 6 |#1|)
        (COND
          ((|testBitVector| |pv$| 1)
           (PROGN
             (QSETREFV $ 34
                 (CONS (|dispatchFunction|
                           |REP1;antisymmetricTensors;MPiM;3|)
                       $))
             (QSETREFV $ 36
                 (CONS (|dispatchFunction|
                           |REP1;antisymmetricTensors;LPiL;4|)
                       $)))))
        $)))) 

(MAKEPROP '|RepresentationPackage1| '|infovec|
    (LIST '#(NIL NIL NIL NIL NIL NIL (|local| |#1|) (|Integer|)
             (|List| 7) (0 . |maxIndex|) (5 . |elt|) (|Vector| 7)
             (|Matrix| 7) (11 . |row|) (17 . |entries|)
             (|IntegerCombinatoricFunctions| 7) (22 . |multinomial|)
             (28 . |Zero|) (|NonNegativeInteger|) (32 . |new|)
             (38 . |One|) (42 . |setelt|) (|Matrix| 6) (49 . |nrows|)
             (54 . |binomial|) (|SymmetricGroupCombinatoricFunctions|)
             (60 . |subSet|) (67 . |zero|) (|List| 8) (73 . |elt|)
             (79 . |elt|) (86 . |setelt|) (94 . |determinant|)
             (|PositiveInteger|) (99 . |antisymmetricTensors|)
             (|List| 22) (105 . |antisymmetricTensors|) (111 . |ncols|)
             (116 . |new|) (123 . |new|)
             (130 . |unrankImproperPartitions1|) (137 . |nextColeman|)
             (|Boolean|) (144 . =) (150 . |inverseColeman|)
             (157 . |coerce|) (162 . |elt|) (168 . *) (174 . +)
             |REP1;symmetricTensors;MPiM;5|
             |REP1;symmetricTensors;LPiL;6| |REP1;tensorProduct;3M;7|
             (180 . |maxIndex|) (185 . |elt|) |REP1;tensorProduct;3L;8|
             |REP1;tensorProduct;2M;9| |REP1;tensorProduct;2L;10|
             (191 . |zero|) (|Permutation| 7) (197 . |eval|)
             (203 . |setelt|) |REP1;permutationRepresentation;PIM;11|
             |REP1;permutationRepresentation;LM;12| (|List| 12)
             (|List| 58) |REP1;permutationRepresentation;LIL;13|
             |REP1;permutationRepresentation;LL;14| (|Polynomial| 6)
             (211 . |Zero|) (|Matrix| 67) (215 . |new|) (|OutputForm|)
             (222 . |coerce|) (|List| 71) (227 . |list|) (|Symbol|)
             (232 . |subscript|) (238 . |coerce|) (243 . |setelt|)
             |REP1;createGenericMatrix;NniM;15|)
          '#(|tensorProduct| 251 |symmetricTensors| 273
             |permutationRepresentation| 285 |createGenericMatrix| 307
             |antisymmetricTensors| 312)
          'NIL
          (CONS (|makeByteWordVec2| 1 'NIL)
                (CONS '#()
                      (CONS '#()
                            (|makeByteWordVec2| 79
                                '(1 8 7 0 9 2 8 7 0 7 10 2 12 11 0 7 13
                                  1 11 8 0 14 2 15 7 7 8 16 0 6 0 17 2
                                  11 0 18 7 19 0 6 0 20 3 11 7 0 7 7 21
                                  1 22 18 0 23 2 15 7 7 7 24 3 25 8 7 7
                                  7 26 2 22 0 18 18 27 2 28 8 0 7 29 3
                                  22 6 0 7 7 30 4 22 6 0 7 7 6 31 1 22
                                  6 0 32 2 0 22 22 33 34 2 0 35 35 33
                                  36 1 22 18 0 37 3 22 0 18 18 6 38 3
                                  12 0 18 18 7 39 3 25 8 7 7 7 40 3 25
                                  12 8 8 12 41 2 12 42 0 0 43 3 25 8 8
                                  8 12 44 1 6 0 7 45 2 11 7 0 7 46 2 6
                                  0 0 0 47 2 6 0 0 0 48 1 35 7 0 52 2
                                  35 22 0 7 53 2 12 0 18 18 57 2 58 7 0
                                  7 59 4 12 7 0 7 7 7 60 0 67 0 68 3 69
                                  0 18 18 67 70 1 7 71 0 72 1 73 0 71
                                  74 2 75 0 0 73 76 1 67 0 75 77 4 69
                                  67 0 7 7 67 78 2 0 22 22 22 51 2 0 35
                                  35 35 54 1 0 35 35 56 1 0 22 22 55 2
                                  0 22 22 33 49 2 0 35 35 33 50 1 0 12
                                  8 62 2 0 12 58 7 61 1 0 63 28 66 2 0
                                  63 64 7 65 1 0 69 18 79 2 1 22 22 33
                                  34 2 1 35 35 33 36)))))
          '|lookupComplete|)) 
