
(/VERSIONCHECK 2) 

(DEFUN |ZDSOLVE;convert;NsmpNsmp;1| (|q| $)
  (PROG (|q2| |lq2| |iq2| |v2| #1=#:G1836 |d| |v|)
    (RETURN
     (SEQ
      (COND
       ((SPADCALL |q| (QREFELT $ 22))
        (SPADCALL (SPADCALL |q| (QREFELT $ 23)) (QREFELT $ 24)))
       ('T
        (SEQ
         (LETT |q2| (|spadConstant| $ 25) . #2=(|ZDSOLVE;convert;NsmpNsmp;1|))
         (SEQ G190
              (COND
               ((NULL (COND ((SPADCALL |q| (QREFELT $ 22)) 'NIL) ('T 'T)))
                (GO G191)))
              (SEQ (LETT |v| (SPADCALL |q| (QREFELT $ 27)) . #2#)
                   (LETT |d| (SPADCALL |q| (QREFELT $ 29)) . #2#)
                   (LETT |v2|
                         (PROG2
                             (LETT #1#
                                   (SPADCALL (SPADCALL |v| (QREFELT $ 30))
                                             (QREFELT $ 15))
                                   . #2#)
                             (QCDR #1#)
                           (|check-union| (QEQCAR #1# 0)
                                          (|OrderedVariableList| (QREFELT $ 8))
                                          #1#))
                         . #2#)
                   (LETT |iq2|
                         (SPADCALL (SPADCALL |q| (QREFELT $ 31))
                                   (QREFELT $ 32))
                         . #2#)
                   (LETT |lq2| (SPADCALL |v2| (QREFELT $ 18)) . #2#)
                   (LETT |lq2| (SPADCALL |lq2| |d| (QREFELT $ 33)) . #2#)
                   (LETT |q2|
                         (SPADCALL (SPADCALL |iq2| |lq2| (QREFELT $ 34)) |q2|
                                   (QREFELT $ 35))
                         . #2#)
                   (EXIT (LETT |q| (SPADCALL |q| (QREFELT $ 36)) . #2#)))
              NIL (GO G190) G191 (EXIT NIL))
         (EXIT
          (SPADCALL |q2|
                    (SPADCALL (SPADCALL |q| (QREFELT $ 23)) (QREFELT $ 24))
                    (QREFELT $ 35)))))))))) 

(DEFUN |ZDSOLVE;squareFree;RcL;2| (|ts| $)
  (PROG (|toSee| |newlq| #1=#:G1877 |q| #2=#:G1876 |newts| |st| #3=#:G1875
         |sfqwt| |lsfqwt| |lq| |toSave| |lqwt| #4=#:G1874 |f| |lf| #5=#:G1873
         |p| #6=#:G1872 |irred?|)
    (RETURN
     (SEQ (LETT |irred?| 'NIL . #7=(|ZDSOLVE;squareFree;RcL;2|))
          (LETT |st| (SPADCALL (LIST (QREFELT $ 19)) (QREFELT $ 39)) . #7#)
          (LETT |lq|
                (PROGN
                 (LETT #6# NIL . #7#)
                 (SEQ (LETT |p| NIL . #7#)
                      (LETT #5# (SPADCALL |ts| (QREFELT $ 42)) . #7#) G190
                      (COND
                       ((OR (ATOM #5#) (PROGN (LETT |p| (CAR #5#) . #7#) NIL))
                        #8=(GO G191)))
                      (SEQ
                       (EXIT
                        (LETT #6# (CONS (SPADCALL |p| (QREFELT $ 32)) #6#)
                              . #7#)))
                      (LETT #5# (CDR #5#) . #7#) #9=(GO G190) G191
                      (EXIT (NREVERSE0 #6#))))
                . #7#)
          (LETT |lq| (SPADCALL (ELT $ 43) |lq| (QREFELT $ 45)) . #7#)
          (LETT |toSee| NIL . #7#)
          (COND
           (|irred?|
            (SEQ
             (LETT |lf| (SPADCALL (LIST (|SPADfirst| |lq|)) (QREFELT $ 47))
                   . #7#)
             (LETT |lq| (CDR |lq|) . #7#)
             (EXIT
              (SEQ (LETT |f| NIL . #7#) (LETT #4# |lf| . #7#) G190
                   (COND
                    ((OR (ATOM #4#) (PROGN (LETT |f| (CAR #4#) . #7#) NIL))
                     #8#))
                   (SEQ
                    (EXIT
                     (LETT |toSee| (CONS (CONS (CONS |f| |lq|) |st|) |toSee|)
                           . #7#)))
                   (LETT #4# (CDR #4#) . #7#) #9# G191 (EXIT NIL)))))
           ('T (LETT |toSee| (LIST (CONS |lq| |st|)) . #7#)))
          (LETT |toSave| NIL . #7#)
          (SEQ G190 (COND ((NULL (COND ((NULL |toSee|) 'NIL) ('T 'T))) #8#))
               (SEQ (LETT |lqwt| (|SPADfirst| |toSee|) . #7#)
                    (LETT |toSee| (CDR |toSee|) . #7#)
                    (LETT |lq| (QCAR |lqwt|) . #7#)
                    (LETT |st| (QCDR |lqwt|) . #7#)
                    (EXIT
                     (COND
                      ((NULL |lq|) (LETT |toSave| (CONS |st| |toSave|) . #7#))
                      ('T
                       (SEQ (LETT |q| (|SPADfirst| |lq|) . #7#)
                            (LETT |lq| (CDR |lq|) . #7#)
                            (LETT |lsfqwt| (SPADCALL |q| |st| (QREFELT $ 50))
                                  . #7#)
                            (EXIT
                             (SEQ (LETT |sfqwt| NIL . #7#)
                                  (LETT #3# |lsfqwt| . #7#) G190
                                  (COND
                                   ((OR (ATOM #3#)
                                        (PROGN
                                         (LETT |sfqwt| (CAR #3#) . #7#)
                                         NIL))
                                    #8#))
                                  (SEQ (LETT |q| (QCAR |sfqwt|) . #7#)
                                       (LETT |st| (QCDR |sfqwt|) . #7#)
                                       (COND
                                        ((NULL
                                          (SPADCALL
                                           (SPADCALL |q| (QREFELT $ 51))
                                           (QREFELT $ 52)))
                                         (LETT |q|
                                               (SPADCALL |q| |st|
                                                         (QREFELT $ 54))
                                               . #7#)))
                                       (LETT |newts|
                                             (SPADCALL |q| |st| (QREFELT $ 55))
                                             . #7#)
                                       (LETT |newlq|
                                             (PROGN
                                              (LETT #2# NIL . #7#)
                                              (SEQ (LETT |q| NIL . #7#)
                                                   (LETT #1# |lq| . #7#) G190
                                                   (COND
                                                    ((OR (ATOM #1#)
                                                         (PROGN
                                                          (LETT |q| (CAR #1#)
                                                                . #7#)
                                                          NIL))
                                                     #8#))
                                                   (SEQ
                                                    (EXIT
                                                     (LETT #2#
                                                           (CONS
                                                            (QVELT
                                                             (SPADCALL |q|
                                                                       |newts|
                                                                       (QREFELT
                                                                        $ 57))
                                                             1)
                                                            #2#)
                                                           . #7#)))
                                                   (LETT #1# (CDR #1#) . #7#)
                                                   #9# G191
                                                   (EXIT (NREVERSE0 #2#))))
                                             . #7#)
                                       (EXIT
                                        (LETT |toSee|
                                              (CONS (CONS |newlq| |newts|)
                                                    |toSee|)
                                              . #7#)))
                                  (LETT #3# (CDR #3#) . #7#) #9# G191
                                  (EXIT NIL))))))))
               NIL #9# G191 (EXIT NIL))
          (EXIT |toSave|))))) 

(DEFUN |ZDSOLVE;triangSolve;L2BL;3| (|lp| |info?| |lextri?| $)
  (PROG (|lq| #1=#:G1885 |p| #2=#:G1884)
    (RETURN
     (SEQ
      (LETT |lq|
            (PROGN
             (LETT #2# NIL . #3=(|ZDSOLVE;triangSolve;L2BL;3|))
             (SEQ (LETT |p| NIL . #3#) (LETT #1# |lp| . #3#) G190
                  (COND
                   ((OR (ATOM #1#) (PROGN (LETT |p| (CAR #1#) . #3#) NIL))
                    (GO G191)))
                  (SEQ
                   (EXIT
                    (LETT #2# (CONS (SPADCALL |p| (QREFELT $ 61)) #2#) . #3#)))
                  (LETT #1# (CDR #1#) . #3#) (GO G190) G191
                  (EXIT (NREVERSE0 #2#))))
            . #3#)
      (EXIT
       (COND (|lextri?| (SPADCALL |lq| 'NIL (QREFELT $ 64)))
             ('T (SPADCALL |lq| 'T |info?| (QREFELT $ 66))))))))) 

(DEFUN |ZDSOLVE;triangSolve;LBL;4| (|lp| |info?| $)
  (SPADCALL |lp| |info?| 'NIL (QREFELT $ 68))) 

(DEFUN |ZDSOLVE;triangSolve;LL;5| (|lp| $) (SPADCALL |lp| 'NIL (QREFELT $ 69))) 

(DEFUN |ZDSOLVE;convert;SupSup;6| (|u| $)
  (PROG (|uu|)
    (RETURN
     (SEQ
      (COND ((SPADCALL |u| (QREFELT $ 72)) (|spadConstant| $ 74))
            ((SPADCALL |u| (QREFELT $ 75))
             (SPADCALL
              (SPADCALL (SPADCALL (SPADCALL |u| (QREFELT $ 76)) (QREFELT $ 78))
                        (QREFELT $ 80))
              (QREFELT $ 81)))
            ('T
             (SEQ
              (LETT |uu| (|spadConstant| $ 74)
                    . #1=(|ZDSOLVE;convert;SupSup;6|))
              (SEQ G190
                   (COND
                    ((NULL (COND ((SPADCALL |u| (QREFELT $ 75)) 'NIL) ('T 'T)))
                     (GO G191)))
                   (SEQ
                    (LETT |uu|
                          (SPADCALL
                           (SPADCALL
                            (SPADCALL
                             (SPADCALL (SPADCALL |u| (QREFELT $ 82))
                                       (QREFELT $ 78))
                             (QREFELT $ 80))
                            (SPADCALL |u| (QREFELT $ 83)) (QREFELT $ 84))
                           |uu| (QREFELT $ 85))
                          . #1#)
                    (EXIT (LETT |u| (SPADCALL |u| (QREFELT $ 86)) . #1#)))
                   NIL (GO G190) G191 (EXIT NIL))
              (EXIT
               (SPADCALL |uu|
                         (SPADCALL
                          (SPADCALL
                           (SPADCALL (SPADCALL |u| (QREFELT $ 76))
                                     (QREFELT $ 78))
                           (QREFELT $ 80))
                          (QREFELT $ 81))
                         (QREFELT $ 85)))))))))) 

(DEFUN |ZDSOLVE;coerceFromRtoRC| (|r| $)
  (SPADCALL (SPADCALL |r| (QREFELT $ 78)) (QREFELT $ 80))) 

(DEFUN |ZDSOLVE;convert;PP;8| (|p| $)
  (SPADCALL (CONS (|function| |ZDSOLVE;coerceFromRtoRC|) $) |p| (QREFELT $ 91))) 

(DEFUN |ZDSOLVE;convert;NsmpP;9| (|q2| $)
  (PROG (|p|)
    (RETURN
     (SEQ (LETT |p| (SPADCALL |q2| (QREFELT $ 93)) |ZDSOLVE;convert;NsmpP;9|)
          (EXIT (SPADCALL |p| (QREFELT $ 92))))))) 

(DEFUN |ZDSOLVE;convert;SfrtsL;10| (|sts| $)
  (PROG (|lq2|)
    (RETURN
     (SEQ
      (LETT |lq2| (SPADCALL |sts| (QREFELT $ 95))
            . #1=(|ZDSOLVE;convert;SfrtsL;10|))
      (LETT |lq2| (SPADCALL (ELT $ 43) |lq2| (QREFELT $ 45)) . #1#)
      (EXIT (CDR |lq2|)))))) 

(DEFUN |ZDSOLVE;realSolve;RcL;11| (|ts| $)
  (PROG (|toSee| #1=#:G1938 |urcRoot| |urcRoots| |urc| |lv| #2=#:G1927 |qrc|
         #3=#:G1936 |r| #4=#:G1937 |v| |lq2| |q2| |toSave| |lr| |wip|
         #5=#:G1935 |sts| #6=#:G1934 |lsts|)
    (RETURN
     (SEQ
      (LETT |lsts| (SPADCALL |ts| (QREFELT $ 59))
            . #7=(|ZDSOLVE;realSolve;RcL;11|))
      (LETT |lr| NIL . #7#) (LETT |lv| NIL . #7#)
      (LETT |toSee|
            (PROGN
             (LETT #6# NIL . #7#)
             (SEQ (LETT |sts| NIL . #7#) (LETT #5# |lsts| . #7#) G190
                  (COND
                   ((OR (ATOM #5#) (PROGN (LETT |sts| (CAR #5#) . #7#) NIL))
                    #8=(GO G191)))
                  (SEQ
                   (EXIT
                    (LETT #6#
                          (CONS
                           (VECTOR |lr| |lv| (SPADCALL |sts| (QREFELT $ 96)))
                           #6#)
                          . #7#)))
                  (LETT #5# (CDR #5#) . #7#) #9=(GO G190) G191
                  (EXIT (NREVERSE0 #6#))))
            . #7#)
      (LETT |toSave| NIL . #7#)
      (SEQ G190 (COND ((NULL (COND ((NULL |toSee|) 'NIL) ('T 'T))) #8#))
           (SEQ (LETT |wip| (|SPADfirst| |toSee|) . #7#)
                (LETT |toSee| (CDR |toSee|) . #7#)
                (LETT |lr| (QVELT |wip| 0) . #7#)
                (LETT |lv| (QVELT |wip| 1) . #7#)
                (LETT |lq2| (QVELT |wip| 2) . #7#)
                (COND
                 ((NULL |lq2|)
                  (COND
                   ((NULL (NULL |lr|))
                    (EXIT
                     (LETT |toSave| (CONS (REVERSE |lr|) |toSave|) . #7#))))))
                (LETT |q2| (|SPADfirst| |lq2|) . #7#)
                (LETT |lq2| (CDR |lq2|) . #7#)
                (LETT |qrc| (SPADCALL |q2| (QREFELT $ 94)) . #7#)
                (COND
                 ((NULL (NULL |lr|))
                  (SEQ (LETT |v| NIL . #7#) (LETT #4# (REVERSE |lv|) . #7#)
                       (LETT |r| NIL . #7#) (LETT #3# (REVERSE |lr|) . #7#)
                       G190
                       (COND
                        ((OR (ATOM #3#) (PROGN (LETT |r| (CAR #3#) . #7#) NIL)
                             (ATOM #4#) (PROGN (LETT |v| (CAR #4#) . #7#) NIL))
                         #8#))
                       (SEQ
                        (EXIT
                         (LETT |qrc| (SPADCALL |qrc| |v| |r| (QREFELT $ 97))
                               . #7#)))
                       (LETT #3# (PROG1 (CDR #3#) (LETT #4# (CDR #4#) . #7#))
                             . #7#)
                       #9# G191 (EXIT NIL))))
                (LETT |lv|
                      (CONS
                       (PROG2
                           (LETT #2# (SPADCALL |qrc| (QREFELT $ 99)) . #7#)
                           (QCDR #2#)
                         (|check-union| (QEQCAR #2# 0) (|Symbol|) #2#))
                       |lv|)
                      . #7#)
                (LETT |urc| (SPADCALL |qrc| (QREFELT $ 100)) . #7#)
                (LETT |urcRoots| (SPADCALL |urc| (QREFELT $ 102)) . #7#)
                (EXIT
                 (SEQ (LETT |urcRoot| NIL . #7#) (LETT #1# |urcRoots| . #7#)
                      G190
                      (COND
                       ((OR (ATOM #1#)
                            (PROGN (LETT |urcRoot| (CAR #1#) . #7#) NIL))
                        #8#))
                      (SEQ
                       (EXIT
                        (LETT |toSee|
                              (CONS (VECTOR (CONS |urcRoot| |lr|) |lv| |lq2|)
                                    |toSee|)
                              . #7#)))
                      (LETT #1# (CDR #1#) . #7#) #9# G191 (EXIT NIL))))
           NIL #9# G191 (EXIT NIL))
      (EXIT |toSave|))))) 

(DEFUN |ZDSOLVE;realSolve;L3BL;12| (|lp| |info?| |check?| |lextri?| $)
  (PROG (#1=#:G1963 |prc| #2=#:G1978 |rr| #3=#:G1979 |symb| #4=#:G1977
         |realsol| #5=#:G1976 |p| |toSee| #6=#:G1975 |urcRoot| |urcRoots| |urc|
         |lv| #7=#:G1957 |qrc| #8=#:G1973 |r| #9=#:G1974 |v| |lq2| |q2|
         |toSave| |lr| |wip| #10=#:G1972 |sts| #11=#:G1971 |lsts| #12=#:G1970
         |ts| |lts| |lq| #13=#:G1969 #14=#:G1968)
    (RETURN
     (SEQ
      (LETT |lq|
            (PROGN
             (LETT #14# NIL . #15=(|ZDSOLVE;realSolve;L3BL;12|))
             (SEQ (LETT |p| NIL . #15#) (LETT #13# |lp| . #15#) G190
                  (COND
                   ((OR (ATOM #13#) (PROGN (LETT |p| (CAR #13#) . #15#) NIL))
                    #16=(GO G191)))
                  (SEQ
                   (EXIT
                    (LETT #14# (CONS (SPADCALL |p| (QREFELT $ 61)) #14#)
                          . #15#)))
                  (LETT #13# (CDR #13#) . #15#) #17=(GO G190) G191
                  (EXIT (NREVERSE0 #14#))))
            . #15#)
      (COND (|lextri?| (LETT |lts| (SPADCALL |lq| 'NIL (QREFELT $ 64)) . #15#))
            ('T (LETT |lts| (SPADCALL |lq| 'T |info?| (QREFELT $ 66)) . #15#)))
      (LETT |lsts| NIL . #15#)
      (SEQ (LETT |ts| NIL . #15#) (LETT #12# |lts| . #15#) G190
           (COND
            ((OR (ATOM #12#) (PROGN (LETT |ts| (CAR #12#) . #15#) NIL)) #16#))
           (SEQ
            (EXIT
             (LETT |lsts|
                   (SPADCALL (SPADCALL |ts| (QREFELT $ 59)) |lsts|
                             (QREFELT $ 105))
                   . #15#)))
           (LETT #12# (CDR #12#) . #15#) #17# G191 (EXIT NIL))
      (LETT |lsts| (SPADCALL |lsts| (QREFELT $ 107)) . #15#)
      (LETT |lr| NIL . #15#) (LETT |lv| NIL . #15#)
      (LETT |toSee|
            (PROGN
             (LETT #11# NIL . #15#)
             (SEQ (LETT |sts| NIL . #15#) (LETT #10# |lsts| . #15#) G190
                  (COND
                   ((OR (ATOM #10#) (PROGN (LETT |sts| (CAR #10#) . #15#) NIL))
                    #16#))
                  (SEQ
                   (EXIT
                    (LETT #11#
                          (CONS
                           (VECTOR |lr| |lv| (SPADCALL |sts| (QREFELT $ 96)))
                           #11#)
                          . #15#)))
                  (LETT #10# (CDR #10#) . #15#) #17# G191
                  (EXIT (NREVERSE0 #11#))))
            . #15#)
      (LETT |toSave| NIL . #15#)
      (SEQ G190 (COND ((NULL (COND ((NULL |toSee|) 'NIL) ('T 'T))) #16#))
           (SEQ (LETT |wip| (|SPADfirst| |toSee|) . #15#)
                (LETT |toSee| (CDR |toSee|) . #15#)
                (LETT |lr| (QVELT |wip| 0) . #15#)
                (LETT |lv| (QVELT |wip| 1) . #15#)
                (LETT |lq2| (QVELT |wip| 2) . #15#)
                (COND
                 ((NULL |lq2|)
                  (COND
                   ((NULL (NULL |lr|))
                    (EXIT
                     (LETT |toSave| (CONS (REVERSE |lr|) |toSave|) . #15#))))))
                (LETT |q2| (|SPADfirst| |lq2|) . #15#)
                (LETT |lq2| (CDR |lq2|) . #15#)
                (LETT |qrc| (SPADCALL |q2| (QREFELT $ 94)) . #15#)
                (COND
                 ((NULL (NULL |lr|))
                  (SEQ (LETT |v| NIL . #15#) (LETT #9# (REVERSE |lv|) . #15#)
                       (LETT |r| NIL . #15#) (LETT #8# (REVERSE |lr|) . #15#)
                       G190
                       (COND
                        ((OR (ATOM #8#) (PROGN (LETT |r| (CAR #8#) . #15#) NIL)
                             (ATOM #9#)
                             (PROGN (LETT |v| (CAR #9#) . #15#) NIL))
                         #16#))
                       (SEQ
                        (EXIT
                         (LETT |qrc| (SPADCALL |qrc| |v| |r| (QREFELT $ 97))
                               . #15#)))
                       (LETT #8# (PROG1 (CDR #8#) (LETT #9# (CDR #9#) . #15#))
                             . #15#)
                       #17# G191 (EXIT NIL))))
                (LETT |lv|
                      (CONS
                       (PROG2
                           (LETT #7# (SPADCALL |qrc| (QREFELT $ 99)) . #15#)
                           (QCDR #7#)
                         (|check-union| (QEQCAR #7# 0) (|Symbol|) #7#))
                       |lv|)
                      . #15#)
                (LETT |urc| (SPADCALL |qrc| (QREFELT $ 100)) . #15#)
                (LETT |urcRoots| (SPADCALL |urc| (QREFELT $ 102)) . #15#)
                (EXIT
                 (SEQ (LETT |urcRoot| NIL . #15#) (LETT #6# |urcRoots| . #15#)
                      G190
                      (COND
                       ((OR (ATOM #6#)
                            (PROGN (LETT |urcRoot| (CAR #6#) . #15#) NIL))
                        #16#))
                      (SEQ
                       (EXIT
                        (LETT |toSee|
                              (CONS (VECTOR (CONS |urcRoot| |lr|) |lv| |lq2|)
                                    |toSee|)
                              . #15#)))
                      (LETT #6# (CDR #6#) . #15#) #17# G191 (EXIT NIL))))
           NIL #17# G191 (EXIT NIL))
      (COND
       (|check?|
        (SEQ (LETT |p| NIL . #15#) (LETT #5# |lp| . #15#) G190
             (COND
              ((OR (ATOM #5#) (PROGN (LETT |p| (CAR #5#) . #15#) NIL)) #16#))
             (SEQ
              (EXIT
               (SEQ (LETT |realsol| NIL . #15#) (LETT #4# |toSave| . #15#) G190
                    (COND
                     ((OR (ATOM #4#)
                          (PROGN (LETT |realsol| (CAR #4#) . #15#) NIL))
                      #16#))
                    (SEQ
                     (EXIT
                      (SEQ (LETT |prc| (SPADCALL |p| (QREFELT $ 92)) . #15#)
                           (SEQ (LETT |symb| NIL . #15#)
                                (LETT #3# (REVERSE (QREFELT $ 7)) . #15#)
                                (LETT |rr| NIL . #15#)
                                (LETT #2# |realsol| . #15#) G190
                                (COND
                                 ((OR (ATOM #2#)
                                      (PROGN (LETT |rr| (CAR #2#) . #15#) NIL)
                                      (ATOM #3#)
                                      (PROGN
                                       (LETT |symb| (CAR #3#) . #15#)
                                       NIL))
                                  #16#))
                                (SEQ
                                 (EXIT
                                  (LETT |prc|
                                        (SPADCALL |prc| |symb| |rr|
                                                  (QREFELT $ 97))
                                        . #15#)))
                                (LETT #2#
                                      (PROG1 (CDR #2#)
                                        (LETT #3# (CDR #3#) . #15#))
                                      . #15#)
                                #17# G191 (EXIT NIL))
                           (EXIT
                            (COND
                             ((NULL (SPADCALL |prc| (QREFELT $ 108)))
                              (PROGN
                               (LETT #1#
                                     (|error| "realSolve$ZDSOLVE: bad result")
                                     . #15#)
                               (GO #1#)))))))
                     #1# (EXIT #1#))
                    (LETT #4# (CDR #4#) . #15#) #17# G191 (EXIT NIL))))
             (LETT #5# (CDR #5#) . #15#) #17# G191 (EXIT NIL))))
      (EXIT |toSave|))))) 

(DEFUN |ZDSOLVE;realSolve;L2BL;13| (|lp| |info?| |check?| $)
  (SPADCALL |lp| |info?| |check?| 'NIL (QREFELT $ 109))) 

(DEFUN |ZDSOLVE;realSolve;LBL;14| (|lp| |info?| $)
  (SPADCALL |lp| |info?| 'NIL 'NIL (QREFELT $ 109))) 

(DEFUN |ZDSOLVE;realSolve;LL;15| (|lp| $)
  (SPADCALL |lp| 'NIL 'NIL 'NIL (QREFELT $ 109))) 

(DEFUN |ZDSOLVE;positiveSolve;RcL;16| (|ts| $)
  (PROG (|toSee| #1=#:G2003 |urcRoot| |urcRoots| |urc| |lv| #2=#:G1991 |qrc|
         #3=#:G2001 |r| #4=#:G2002 |v| |lq2| |q2| |toSave| |lr| |wip|
         #5=#:G2000 |sts| #6=#:G1999 |lsts|)
    (RETURN
     (SEQ
      (LETT |lsts| (SPADCALL |ts| (QREFELT $ 59))
            . #7=(|ZDSOLVE;positiveSolve;RcL;16|))
      (LETT |lr| NIL . #7#) (LETT |lv| NIL . #7#)
      (LETT |toSee|
            (PROGN
             (LETT #6# NIL . #7#)
             (SEQ (LETT |sts| NIL . #7#) (LETT #5# |lsts| . #7#) G190
                  (COND
                   ((OR (ATOM #5#) (PROGN (LETT |sts| (CAR #5#) . #7#) NIL))
                    #8=(GO G191)))
                  (SEQ
                   (EXIT
                    (LETT #6#
                          (CONS
                           (VECTOR |lr| |lv| (SPADCALL |sts| (QREFELT $ 96)))
                           #6#)
                          . #7#)))
                  (LETT #5# (CDR #5#) . #7#) #9=(GO G190) G191
                  (EXIT (NREVERSE0 #6#))))
            . #7#)
      (LETT |toSave| NIL . #7#)
      (SEQ G190 (COND ((NULL (COND ((NULL |toSee|) 'NIL) ('T 'T))) #8#))
           (SEQ (LETT |wip| (|SPADfirst| |toSee|) . #7#)
                (LETT |toSee| (CDR |toSee|) . #7#)
                (LETT |lr| (QVELT |wip| 0) . #7#)
                (LETT |lv| (QVELT |wip| 1) . #7#)
                (LETT |lq2| (QVELT |wip| 2) . #7#)
                (COND
                 ((NULL |lq2|)
                  (COND
                   ((NULL (NULL |lr|))
                    (EXIT
                     (LETT |toSave| (CONS (REVERSE |lr|) |toSave|) . #7#))))))
                (LETT |q2| (|SPADfirst| |lq2|) . #7#)
                (LETT |lq2| (CDR |lq2|) . #7#)
                (LETT |qrc| (SPADCALL |q2| (QREFELT $ 94)) . #7#)
                (COND
                 ((NULL (NULL |lr|))
                  (SEQ (LETT |v| NIL . #7#) (LETT #4# (REVERSE |lv|) . #7#)
                       (LETT |r| NIL . #7#) (LETT #3# (REVERSE |lr|) . #7#)
                       G190
                       (COND
                        ((OR (ATOM #3#) (PROGN (LETT |r| (CAR #3#) . #7#) NIL)
                             (ATOM #4#) (PROGN (LETT |v| (CAR #4#) . #7#) NIL))
                         #8#))
                       (SEQ
                        (EXIT
                         (LETT |qrc| (SPADCALL |qrc| |v| |r| (QREFELT $ 97))
                               . #7#)))
                       (LETT #3# (PROG1 (CDR #3#) (LETT #4# (CDR #4#) . #7#))
                             . #7#)
                       #9# G191 (EXIT NIL))))
                (LETT |lv|
                      (CONS
                       (PROG2
                           (LETT #2# (SPADCALL |qrc| (QREFELT $ 99)) . #7#)
                           (QCDR #2#)
                         (|check-union| (QEQCAR #2# 0) (|Symbol|) #2#))
                       |lv|)
                      . #7#)
                (LETT |urc| (SPADCALL |qrc| (QREFELT $ 100)) . #7#)
                (LETT |urcRoots| (SPADCALL |urc| (QREFELT $ 102)) . #7#)
                (EXIT
                 (SEQ (LETT |urcRoot| NIL . #7#) (LETT #1# |urcRoots| . #7#)
                      G190
                      (COND
                       ((OR (ATOM #1#)
                            (PROGN (LETT |urcRoot| (CAR #1#) . #7#) NIL))
                        #8#))
                      (SEQ
                       (EXIT
                        (COND
                         ((SPADCALL |urcRoot| (QREFELT $ 113))
                          (LETT |toSee|
                                (CONS (VECTOR (CONS |urcRoot| |lr|) |lv| |lq2|)
                                      |toSee|)
                                . #7#)))))
                      (LETT #1# (CDR #1#) . #7#) #9# G191 (EXIT NIL))))
           NIL #9# G191 (EXIT NIL))
      (EXIT |toSave|))))) 

(DEFUN |ZDSOLVE;positiveSolve;L2BL;17| (|lp| |info?| |lextri?| $)
  (PROG (|toSee| #1=#:G2029 |urcRoot| |urcRoots| |urc| |lv| #2=#:G2014 |qrc|
         #3=#:G2027 |r| #4=#:G2028 |v| |lq2| |q2| |toSave| |lr| |wip|
         #5=#:G2026 |sts| #6=#:G2025 |lsts| #7=#:G2024 |ts| |lts| |lq|
         #8=#:G2023 |p| #9=#:G2022)
    (RETURN
     (SEQ
      (LETT |lq|
            (PROGN
             (LETT #9# NIL . #10=(|ZDSOLVE;positiveSolve;L2BL;17|))
             (SEQ (LETT |p| NIL . #10#) (LETT #8# |lp| . #10#) G190
                  (COND
                   ((OR (ATOM #8#) (PROGN (LETT |p| (CAR #8#) . #10#) NIL))
                    #11=(GO G191)))
                  (SEQ
                   (EXIT
                    (LETT #9# (CONS (SPADCALL |p| (QREFELT $ 61)) #9#)
                          . #10#)))
                  (LETT #8# (CDR #8#) . #10#) #12=(GO G190) G191
                  (EXIT (NREVERSE0 #9#))))
            . #10#)
      (COND (|lextri?| (LETT |lts| (SPADCALL |lq| 'NIL (QREFELT $ 64)) . #10#))
            ('T (LETT |lts| (SPADCALL |lq| 'T |info?| (QREFELT $ 66)) . #10#)))
      (LETT |lsts| NIL . #10#)
      (SEQ (LETT |ts| NIL . #10#) (LETT #7# |lts| . #10#) G190
           (COND
            ((OR (ATOM #7#) (PROGN (LETT |ts| (CAR #7#) . #10#) NIL)) #11#))
           (SEQ
            (EXIT
             (LETT |lsts|
                   (SPADCALL (SPADCALL |ts| (QREFELT $ 59)) |lsts|
                             (QREFELT $ 105))
                   . #10#)))
           (LETT #7# (CDR #7#) . #10#) #12# G191 (EXIT NIL))
      (LETT |lsts| (SPADCALL |lsts| (QREFELT $ 107)) . #10#)
      (LETT |lr| NIL . #10#) (LETT |lv| NIL . #10#)
      (LETT |toSee|
            (PROGN
             (LETT #6# NIL . #10#)
             (SEQ (LETT |sts| NIL . #10#) (LETT #5# |lsts| . #10#) G190
                  (COND
                   ((OR (ATOM #5#) (PROGN (LETT |sts| (CAR #5#) . #10#) NIL))
                    #11#))
                  (SEQ
                   (EXIT
                    (LETT #6#
                          (CONS
                           (VECTOR |lr| |lv| (SPADCALL |sts| (QREFELT $ 96)))
                           #6#)
                          . #10#)))
                  (LETT #5# (CDR #5#) . #10#) #12# G191
                  (EXIT (NREVERSE0 #6#))))
            . #10#)
      (LETT |toSave| NIL . #10#)
      (SEQ G190 (COND ((NULL (COND ((NULL |toSee|) 'NIL) ('T 'T))) #11#))
           (SEQ (LETT |wip| (|SPADfirst| |toSee|) . #10#)
                (LETT |toSee| (CDR |toSee|) . #10#)
                (LETT |lr| (QVELT |wip| 0) . #10#)
                (LETT |lv| (QVELT |wip| 1) . #10#)
                (LETT |lq2| (QVELT |wip| 2) . #10#)
                (COND
                 ((NULL |lq2|)
                  (COND
                   ((NULL (NULL |lr|))
                    (EXIT
                     (LETT |toSave| (CONS (REVERSE |lr|) |toSave|) . #10#))))))
                (LETT |q2| (|SPADfirst| |lq2|) . #10#)
                (LETT |lq2| (CDR |lq2|) . #10#)
                (LETT |qrc| (SPADCALL |q2| (QREFELT $ 94)) . #10#)
                (COND
                 ((NULL (NULL |lr|))
                  (SEQ (LETT |v| NIL . #10#) (LETT #4# (REVERSE |lv|) . #10#)
                       (LETT |r| NIL . #10#) (LETT #3# (REVERSE |lr|) . #10#)
                       G190
                       (COND
                        ((OR (ATOM #3#) (PROGN (LETT |r| (CAR #3#) . #10#) NIL)
                             (ATOM #4#)
                             (PROGN (LETT |v| (CAR #4#) . #10#) NIL))
                         #11#))
                       (SEQ
                        (EXIT
                         (LETT |qrc| (SPADCALL |qrc| |v| |r| (QREFELT $ 97))
                               . #10#)))
                       (LETT #3# (PROG1 (CDR #3#) (LETT #4# (CDR #4#) . #10#))
                             . #10#)
                       #12# G191 (EXIT NIL))))
                (LETT |lv|
                      (CONS
                       (PROG2
                           (LETT #2# (SPADCALL |qrc| (QREFELT $ 99)) . #10#)
                           (QCDR #2#)
                         (|check-union| (QEQCAR #2# 0) (|Symbol|) #2#))
                       |lv|)
                      . #10#)
                (LETT |urc| (SPADCALL |qrc| (QREFELT $ 100)) . #10#)
                (LETT |urcRoots| (SPADCALL |urc| (QREFELT $ 102)) . #10#)
                (EXIT
                 (SEQ (LETT |urcRoot| NIL . #10#) (LETT #1# |urcRoots| . #10#)
                      G190
                      (COND
                       ((OR (ATOM #1#)
                            (PROGN (LETT |urcRoot| (CAR #1#) . #10#) NIL))
                        #11#))
                      (SEQ
                       (EXIT
                        (COND
                         ((SPADCALL |urcRoot| (QREFELT $ 113))
                          (LETT |toSee|
                                (CONS (VECTOR (CONS |urcRoot| |lr|) |lv| |lq2|)
                                      |toSee|)
                                . #10#)))))
                      (LETT #1# (CDR #1#) . #10#) #12# G191 (EXIT NIL))))
           NIL #12# G191 (EXIT NIL))
      (EXIT |toSave|))))) 

(DEFUN |ZDSOLVE;positiveSolve;LBL;18| (|lp| |info?| $)
  (SPADCALL |lp| |info?| 'NIL (QREFELT $ 115))) 

(DEFUN |ZDSOLVE;positiveSolve;LL;19| (|lp| $)
  (SPADCALL |lp| 'NIL 'NIL (QREFELT $ 115))) 

(DEFUN |ZDSOLVE;univariateSolve;RcL;20| (|ts| $)
  (PROG (|toSave| |lc| #1=#:G2051 |q2| #2=#:G2050 |g| #3=#:G2037 #4=#:G2049
         |us| |lus| #5=#:G2048 |st| |toSee|)
    (RETURN
     (SEQ
      (LETT |toSee| (SPADCALL |ts| (QREFELT $ 59))
            . #6=(|ZDSOLVE;univariateSolve;RcL;20|))
      (LETT |toSave| NIL . #6#)
      (SEQ (LETT |st| NIL . #6#) (LETT #5# |toSee| . #6#) G190
           (COND
            ((OR (ATOM #5#) (PROGN (LETT |st| (CAR #5#) . #6#) NIL))
             #7=(GO G191)))
           (SEQ (LETT |lus| (SPADCALL |st| 'T (QREFELT $ 119)) . #6#)
                (EXIT
                 (SEQ (LETT |us| NIL . #6#) (LETT #4# |lus| . #6#) G190
                      (COND
                       ((OR (ATOM #4#) (PROGN (LETT |us| (CAR #4#) . #6#) NIL))
                        #7#))
                      (SEQ
                       (LETT |g|
                             (SPADCALL
                              (PROG2
                                  (LETT #3#
                                        (SPADCALL |us| (QREFELT $ 16)
                                                  (QREFELT $ 121))
                                        . #6#)
                                  (QCDR #3#)
                                (|check-union| (QEQCAR #3# 0)
                                               (|NewSparseMultivariatePolynomial|
                                                (QREFELT $ 6)
                                                (|OrderedVariableList|
                                                 (QREFELT $ 8)))
                                               #3#))
                              (QREFELT $ 122))
                             . #6#)
                       (LETT |lc|
                             (PROGN
                              (LETT #2# NIL . #6#)
                              (SEQ (LETT |q2| NIL . #6#)
                                   (LETT #1#
                                         (SPADCALL
                                          (SPADCALL |us| (QREFELT $ 16)
                                                    (QREFELT $ 123))
                                          (QREFELT $ 95))
                                         . #6#)
                                   G190
                                   (COND
                                    ((OR (ATOM #1#)
                                         (PROGN
                                          (LETT |q2| (CAR #1#) . #6#)
                                          NIL))
                                     #7#))
                                   (SEQ
                                    (EXIT
                                     (LETT #2#
                                           (CONS
                                            (SPADCALL |q2| (QREFELT $ 124))
                                            #2#)
                                           . #6#)))
                                   (LETT #1# (CDR #1#) . #6#) #8=(GO G190) G191
                                   (EXIT (NREVERSE0 #2#))))
                             . #6#)
                       (EXIT
                        (LETT |toSave| (CONS (CONS |g| |lc|) |toSave|) . #6#)))
                      (LETT #4# (CDR #4#) . #6#) #8# G191 (EXIT NIL))))
           (LETT #5# (CDR #5#) . #6#) #8# G191 (EXIT NIL))
      (EXIT |toSave|))))) 

(DEFUN |ZDSOLVE;univariateSolve;L3BL;21| (|lp| |info?| |check?| |lextri?| $)
  (PROG (|toSave| |lc| #1=#:G2089 |q2| #2=#:G2088 |g| #3=#:G2070 #4=#:G2068
         |rems| #5=#:G2087 #6=#:G2086 #7=#:G2085 |us| |lus| #8=#:G2084 |st|
         |lq2| #9=#:G2083 |p| #10=#:G2082 |toSee| #11=#:G2081 |ts| |lts| |lq|
         #12=#:G2080 #13=#:G2079)
    (RETURN
     (SEQ
      (LETT |lq|
            (PROGN
             (LETT #13# NIL . #14=(|ZDSOLVE;univariateSolve;L3BL;21|))
             (SEQ (LETT |p| NIL . #14#) (LETT #12# |lp| . #14#) G190
                  (COND
                   ((OR (ATOM #12#) (PROGN (LETT |p| (CAR #12#) . #14#) NIL))
                    #15=(GO G191)))
                  (SEQ
                   (EXIT
                    (LETT #13# (CONS (SPADCALL |p| (QREFELT $ 61)) #13#)
                          . #14#)))
                  (LETT #12# (CDR #12#) . #14#) #16=(GO G190) G191
                  (EXIT (NREVERSE0 #13#))))
            . #14#)
      (COND (|lextri?| (LETT |lts| (SPADCALL |lq| 'NIL (QREFELT $ 64)) . #14#))
            ('T (LETT |lts| (SPADCALL |lq| 'T |info?| (QREFELT $ 66)) . #14#)))
      (LETT |toSee| NIL . #14#)
      (SEQ (LETT |ts| NIL . #14#) (LETT #11# |lts| . #14#) G190
           (COND
            ((OR (ATOM #11#) (PROGN (LETT |ts| (CAR #11#) . #14#) NIL)) #15#))
           (SEQ
            (EXIT
             (LETT |toSee|
                   (SPADCALL (SPADCALL |ts| (QREFELT $ 59)) |toSee|
                             (QREFELT $ 105))
                   . #14#)))
           (LETT #11# (CDR #11#) . #14#) #16# G191 (EXIT NIL))
      (LETT |toSee| (SPADCALL |toSee| (QREFELT $ 107)) . #14#)
      (LETT |toSave| NIL . #14#)
      (COND
       (|check?|
        (LETT |lq2|
              (PROGN
               (LETT #10# NIL . #14#)
               (SEQ (LETT |p| NIL . #14#) (LETT #9# |lp| . #14#) G190
                    (COND
                     ((OR (ATOM #9#) (PROGN (LETT |p| (CAR #9#) . #14#) NIL))
                      #15#))
                    (SEQ
                     (EXIT
                      (LETT #10# (CONS (SPADCALL |p| (QREFELT $ 128)) #10#)
                            . #14#)))
                    (LETT #9# (CDR #9#) . #14#) #16# G191
                    (EXIT (NREVERSE0 #10#))))
              . #14#)))
      (SEQ (LETT |st| NIL . #14#) (LETT #8# |toSee| . #14#) G190
           (COND
            ((OR (ATOM #8#) (PROGN (LETT |st| (CAR #8#) . #14#) NIL)) #15#))
           (SEQ (LETT |lus| (SPADCALL |st| 'T (QREFELT $ 119)) . #14#)
                (EXIT
                 (SEQ (LETT |us| NIL . #14#) (LETT #7# |lus| . #14#) G190
                      (COND
                       ((OR (ATOM #7#)
                            (PROGN (LETT |us| (CAR #7#) . #14#) NIL))
                        #15#))
                      (SEQ
                       (COND
                        (|check?|
                         (SEQ
                          (EXIT
                           (SEQ
                            (LETT |rems|
                                  (PROGN
                                   (LETT #6# NIL . #14#)
                                   (SEQ (LETT |q2| NIL . #14#)
                                        (LETT #5# |lq2| . #14#) G190
                                        (COND
                                         ((OR (ATOM #5#)
                                              (PROGN
                                               (LETT |q2| (CAR #5#) . #14#)
                                               NIL))
                                          #15#))
                                        (SEQ
                                         (EXIT
                                          (LETT #6#
                                                (CONS
                                                 (SPADCALL |q2| |us|
                                                           (QREFELT $ 129))
                                                 #6#)
                                                . #14#)))
                                        (LETT #5# (CDR #5#) . #14#) #16# G191
                                        (EXIT (NREVERSE0 #6#))))
                                  . #14#)
                            (EXIT
                             (COND
                              ((NULL
                                (SPADCALL (ELT $ 132) |rems| (QREFELT $ 134)))
                               (PROGN
                                (LETT #4#
                                      (SEQ
                                       (SPADCALL
                                        (SPADCALL |st| (QREFELT $ 136))
                                        (QREFELT $ 139))
                                       (SPADCALL "Has a bad RUR component:"
                                                 (QREFELT $ 141))
                                       (SPADCALL
                                        (SPADCALL |us| (QREFELT $ 136))
                                        (QREFELT $ 139))
                                       (EXIT
                                        (|error|
                                         "univariateSolve$ZDSOLVE: bad RUR")))
                                      . #14#)
                                (GO #4#)))))))
                          #4# (EXIT #4#))))
                       (LETT |g|
                             (SPADCALL
                              (PROG2
                                  (LETT #3#
                                        (SPADCALL |us| (QREFELT $ 16)
                                                  (QREFELT $ 121))
                                        . #14#)
                                  (QCDR #3#)
                                (|check-union| (QEQCAR #3# 0)
                                               (|NewSparseMultivariatePolynomial|
                                                (QREFELT $ 6)
                                                (|OrderedVariableList|
                                                 (QREFELT $ 8)))
                                               #3#))
                              (QREFELT $ 122))
                             . #14#)
                       (LETT |lc|
                             (PROGN
                              (LETT #2# NIL . #14#)
                              (SEQ (LETT |q2| NIL . #14#)
                                   (LETT #1#
                                         (SPADCALL
                                          (SPADCALL |us| (QREFELT $ 16)
                                                    (QREFELT $ 123))
                                          (QREFELT $ 95))
                                         . #14#)
                                   G190
                                   (COND
                                    ((OR (ATOM #1#)
                                         (PROGN
                                          (LETT |q2| (CAR #1#) . #14#)
                                          NIL))
                                     #15#))
                                   (SEQ
                                    (EXIT
                                     (LETT #2#
                                           (CONS
                                            (SPADCALL |q2| (QREFELT $ 124))
                                            #2#)
                                           . #14#)))
                                   (LETT #1# (CDR #1#) . #14#) #16# G191
                                   (EXIT (NREVERSE0 #2#))))
                             . #14#)
                       (EXIT
                        (LETT |toSave| (CONS (CONS |g| |lc|) |toSave|)
                              . #14#)))
                      (LETT #7# (CDR #7#) . #14#) #16# G191 (EXIT NIL))))
           (LETT #8# (CDR #8#) . #14#) #16# G191 (EXIT NIL))
      (EXIT |toSave|))))) 

(DEFUN |ZDSOLVE;univariateSolve;L2BL;22| (|lp| |info?| |check?| $)
  (SPADCALL |lp| |info?| |check?| 'NIL (QREFELT $ 142))) 

(DEFUN |ZDSOLVE;univariateSolve;LBL;23| (|lp| |info?| $)
  (SPADCALL |lp| |info?| 'NIL 'NIL (QREFELT $ 142))) 

(DEFUN |ZDSOLVE;univariateSolve;LL;24| (|lp| $)
  (SPADCALL |lp| 'NIL 'NIL 'NIL (QREFELT $ 142))) 

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

(DEFUN |ZeroDimensionalSolvePackage;| (|#1| |#2| |#3|)
  (PROG (#1=#:G1836 |pv$| $ |dv$| DV$3 DV$2 DV$1)
    (RETURN
     (PROGN
      (LETT DV$1 (|devaluate| |#1|) . #2=(|ZeroDimensionalSolvePackage|))
      (LETT DV$2 (|devaluate| |#2|) . #2#)
      (LETT DV$3 (|devaluate| |#3|) . #2#)
      (LETT |dv$| (LIST '|ZeroDimensionalSolvePackage| DV$1 DV$2 DV$3) . #2#)
      (LETT $ (GETREFV 146) . #2#)
      (QSETREFV $ 0 |dv$|)
      (QSETREFV $ 3 (LETT |pv$| (|buildPredVector| 0 0 NIL) . #2#))
      (|haddProp| |$ConstructorCache| '|ZeroDimensionalSolvePackage|
                  (LIST DV$1 DV$2 DV$3) (CONS 1 $))
      (|stuffDomainSlots| $)
      (QSETREFV $ 6 |#1|)
      (QSETREFV $ 7 |#2|)
      (QSETREFV $ 8 |#3|)
      (QSETREFV $ 12 (SPADCALL |#3| (QREFELT $ 11)))
      (QSETREFV $ 16
                (PROG2
                    (LETT #1# (SPADCALL (QREFELT $ 12) (QREFELT $ 15)) . #2#)
                    (QCDR #1#)
                  (|check-union| (QEQCAR #1# 0) (|OrderedVariableList| |#3|)
                                 #1#)))
      (QSETREFV $ 19 (SPADCALL (QREFELT $ 16) (QREFELT $ 18)))
      $)))) 

(MAKEPROP '|ZeroDimensionalSolvePackage| '|infovec|
          (LIST
           '#(NIL NIL NIL NIL NIL NIL (|local| |#1|) (|local| |#2|)
              (|local| |#3|) (|Symbol|) (|List| 9) (0 . |last|) '|news|
              (|Union| $ '"failed") (|OrderedVariableList| 8) (5 . |variable|)
              '|newv| (|NewSparseMultivariatePolynomial| 6 14) (10 . |coerce|)
              '|newq| (|Boolean|) (|NewSparseMultivariatePolynomial| 6 26)
              (15 . |ground?|) (20 . |ground|) (25 . |coerce|) (30 . |Zero|)
              (|OrderedVariableList| 7) (34 . |mvar|) (|NonNegativeInteger|)
              (39 . |mdeg|) (44 . |convert|) (49 . |init|)
              |ZDSOLVE;convert;NsmpNsmp;1| (54 . ^) (60 . *) (66 . +)
              (72 . |tail|) (|List| 17)
              (|SquareFreeRegularTriangularSet| 6 (|IndexedExponents| 14) 14
                                                17)
              (77 . |construct|) (|List| 21) (|RegularChain| 6 7)
              (82 . |parts|) (87 . |infRittWu?|) (|Mapping| 20 17 17)
              (93 . |sort|)
              (|PolynomialSetUtilitiesPackage| 6 (|IndexedExponents| 14) 14 17)
              (99 . |irreducibleFactors|)
              (|Record| (|:| |val| 17) (|:| |tower| $)) (|List| 48)
              (104 . |squareFreePart|) (110 . |init|) (115 . |ground?|)
              (|NormalizationPackage| 6 (|IndexedExponents| 14) 14 17 38)
              (120 . |normalizedAssociate|) (126 . |internalAugment|)
              (|Record| (|:| |rnum| 6) (|:| |polnum| 17) (|:| |den| 6))
              (132 . |remainder|) (|List| 38) |ZDSOLVE;squareFree;RcL;2|
              (|Polynomial| 6) (138 . |convert|) (|List| 41)
              (|LexTriangularPackage| 6 7) (143 . |zeroSetSplit|) (|List| $)
              (149 . |zeroSetSplit|) (|List| 60) |ZDSOLVE;triangSolve;L2BL;3|
              |ZDSOLVE;triangSolve;LBL;4| |ZDSOLVE;triangSolve;LL;5|
              (|SparseUnivariatePolynomial| 6) (156 . |zero?|)
              (|SparseUnivariatePolynomial| 79) (161 . |Zero|)
              (165 . |ground?|) (170 . |ground|) (|Fraction| 6)
              (175 . |coerce|) (|RealClosure| 77) (180 . |coerce|)
              (185 . |coerce|) (190 . |leadingCoefficient|) (195 . |degree|)
              (200 . |monomial|) (206 . +) (212 . |reductum|)
              |ZDSOLVE;convert;SupSup;6| (|Polynomial| 79) (|Mapping| 79 6)
              (|PolynomialFunctions2| 6 79) (217 . |map|)
              |ZDSOLVE;convert;PP;8| (223 . |coerce|) |ZDSOLVE;convert;NsmpP;9|
              (228 . |parts|) |ZDSOLVE;convert;SfrtsL;10| (233 . |eval|)
              (|Union| 9 '"failed") (240 . |mainVariable|) (245 . |univariate|)
              (|SparseUnivariatePolynomial| $) (250 . |allRootsOf|)
              (|List| (|List| 79)) |ZDSOLVE;realSolve;RcL;11| (255 . |concat|)
              (|SquareFreeQuasiComponentPackage| 6 (|IndexedExponents| 14) 14
                                                 17 38)
              (261 . |removeSuperfluousQuasiComponents|) (266 . |zero?|)
              |ZDSOLVE;realSolve;L3BL;12| |ZDSOLVE;realSolve;L2BL;13|
              |ZDSOLVE;realSolve;LBL;14| |ZDSOLVE;realSolve;LL;15|
              (271 . |positive?|) |ZDSOLVE;positiveSolve;RcL;16|
              |ZDSOLVE;positiveSolve;L2BL;17| |ZDSOLVE;positiveSolve;LBL;18|
              |ZDSOLVE;positiveSolve;LL;19|
              (|InternalRationalUnivariateRepresentationPackage| 6
                                                                 (|IndexedExponents|
                                                                  14)
                                                                 14 17 38)
              (276 . |rur|) (|Union| 17 '"failed") (282 . |select|)
              (288 . |univariate|) (293 . |collectUpper|) (299 . |convert|)
              (|Record| (|:| |complexRoots| 71) (|:| |coordinates| 67))
              (|List| 125) |ZDSOLVE;univariateSolve;RcL;20| (304 . |convert|)
              (309 . |removeZero|) (315 . |zero?|) (320 . |zero?|)
              (325 . |zero?|) (|Mapping| 20 17) (330 . |every?|) (|OutputForm|)
              (336 . |coerce|) (|Void|) (|OutputPackage|) (341 . |output|)
              (|String|) (346 . |output|) |ZDSOLVE;univariateSolve;L3BL;21|
              |ZDSOLVE;univariateSolve;L2BL;22|
              |ZDSOLVE;univariateSolve;LBL;23| |ZDSOLVE;univariateSolve;LL;24|)
           '#(|univariateSolve| 351 |triangSolve| 382 |squareFree| 400
              |realSolve| 405 |positiveSolve| 436 |convert| 459)
           'NIL
           (CONS (|makeByteWordVec2| 1 'NIL)
                 (CONS '#()
                       (CONS '#()
                             (|makeByteWordVec2| 145
                                                 '(1 10 9 0 11 1 14 13 9 15 1
                                                   17 0 14 18 1 21 20 0 22 1 21
                                                   6 0 23 1 17 0 6 24 0 17 0 25
                                                   1 21 26 0 27 1 21 28 0 29 1
                                                   26 9 0 30 1 21 0 0 31 2 17 0
                                                   0 28 33 2 17 0 0 0 34 2 17 0
                                                   0 0 35 1 21 0 0 36 1 38 0 37
                                                   39 1 41 40 0 42 2 17 20 0 0
                                                   43 2 37 0 44 0 45 1 46 37 37
                                                   47 2 38 49 17 0 50 1 17 0 0
                                                   51 1 17 20 0 52 2 53 17 17
                                                   38 54 2 38 0 17 0 55 2 38 56
                                                   17 0 57 1 21 0 60 61 2 63 62
                                                   40 20 64 3 41 65 40 20 20 66
                                                   1 71 20 0 72 0 73 0 74 1 71
                                                   20 0 75 1 71 6 0 76 1 77 0 6
                                                   78 1 79 0 77 80 1 73 0 79 81
                                                   1 71 6 0 82 1 71 28 0 83 2
                                                   73 0 79 28 84 2 73 0 0 0 85
                                                   1 71 0 0 86 2 90 88 89 60 91
                                                   1 17 60 0 93 1 38 37 0 95 3
                                                   88 0 0 9 79 97 1 88 98 0 99
                                                   1 88 73 0 100 1 79 65 101
                                                   102 2 58 0 0 0 105 1 106 58
                                                   58 107 1 88 20 0 108 1 79 20
                                                   0 113 2 118 58 38 20 119 2
                                                   38 120 0 14 121 1 17 71 0
                                                   122 2 38 0 0 14 123 1 17 60
                                                   0 124 1 17 0 60 128 2 38 17
                                                   17 0 129 1 60 20 0 130 1 21
                                                   20 0 131 1 17 20 0 132 2 37
                                                   20 133 0 134 1 38 135 0 136
                                                   1 138 137 135 139 1 138 137
                                                   140 141 4 0 126 67 20 20 20
                                                   142 1 0 126 41 127 3 0 126
                                                   67 20 20 143 1 0 126 67 145
                                                   2 0 126 67 20 144 2 0 62 67
                                                   20 69 3 0 62 67 20 20 68 1 0
                                                   62 67 70 1 0 58 41 59 1 0
                                                   103 41 104 3 0 103 67 20 20
                                                   110 4 0 103 67 20 20 20 109
                                                   2 0 103 67 20 111 1 0 103 67
                                                   112 1 0 103 41 114 3 0 103
                                                   67 20 20 115 1 0 103 67 117
                                                   2 0 103 67 20 116 1 0 88 60
                                                   92 1 0 17 21 32 1 0 88 17 94
                                                   1 0 37 38 96 1 0 73 71
                                                   87)))))
           '|lookupComplete|)) 
