;;; (/VERSIONCHECK 2) 

(defmacro seq (&rest form)
  (let* ((body (reverse form))
         (val `(return-from seq ,(pop body))))
    (nsubstitute '(progn) nil body) ;don't treat NIL as a label
    `(block seq (tagbody ,@(nreverse body) ,val))))

(defmacro exit (&rest value)
 `(return-from seq ,@value))

(defmacro SPADCALL (&rest L)
  (let ((args (butlast l))
        (fn (car (last l)))
        (gi (gensym)))
     ;; (values t) indicates a single return value
    `(let ((,gi ,fn))
       (the (values t)
         (funcall
          (the #-(or :genera :lispworks)
                   (function ,(make-list (length l) :initial-element t) t)
               #+(or :genera :lispworks)function
            (car ,gi))
          ,@args
          (cdr ,gi))))))

(defmacro LETT (var val &rest L) `(SETQ ,var ,val))

(defmacro qrefelt (vec ind) `(svref ,vec ,ind))


(DEFUN |COMMONOP;operator;SBo;1| (|s| $)
  (PROG (#1=#:G1905 #2=#:G1907 #3=#:G1908 |op|)
    (RETURN
     (SEQ
      (EXIT
       (SEQ
        (COND
         ((SPADCALL (QREFELT $ 9) (QREFELT $ 135))
          (|COMMONOP;startUp| 'NIL $)))
        (SEQ
         (EXIT
          (SEQ (LETT |op| NIL . #4=(|COMMONOP;operator;SBo;1|))
               (LETT #3# (QREFELT $ 130) . #4#) G190
               (COND
                ((OR (ATOM #3#) (PROGN (LETT |op| (CAR #3#) . #4#) NIL))
                 (GO G191)))
               (SEQ
                (EXIT
                 (COND
                  ((SPADCALL |op| |s| (QREFELT $ 136))
                   (PROGN
                    (LETT #1#
                          (PROGN
                           (LETT #2# (SPADCALL |op| (QREFELT $ 137)) . #4#)
                           (GO #2#))
                          . #4#)
                    (GO #1#))))))
               (LETT #3# (CDR #3#) . #4#) (GO G190) G191 (EXIT NIL)))
         #1# (EXIT #1#))
        (EXIT (SPADCALL |s| (QREFELT $ 44)))))
      #2# (EXIT #2#))))) 

(DEFUN |COMMONOP;dpi| (|l| $) (SPADCALL '|%pi| (QREFELT $ 140))) 

(DEFUN |COMMONOP;dfact| (|x| $)
  (SPADCALL (SPADCALL '! (QREFELT $ 140))
            (COND ((ATOM |x|) |x|) ('T (SPADCALL |x| (QREFELT $ 141))))
            (QREFELT $ 142))) 

(DEFUN |COMMONOP;dquote| (|l| $)
  (SPADCALL (SPADCALL (|SPADfirst| |l|) (QREFELT $ 143)) (CDR |l|)
            (QREFELT $ 145))) 

(DEFUN |COMMONOP;dgamma| (|l| $)
  (SPADCALL (SPADCALL '|Gamma| (QREFELT $ 140)) |l| (QREFELT $ 145))) 

(DEFUN |COMMONOP;dEllipticE2| (|l| $)
  (SPADCALL (SPADCALL '|ellipticE| (QREFELT $ 140)) |l| (QREFELT $ 145))) 

(DEFUN |COMMONOP;setDummyVar| (|op| |n| $)
  (SPADCALL |op| '|%dummyVar| |n| (QREFELT $ 147))) 

(DEFUN |COMMONOP;dexp| (|x| $)
  (PROG (|e|)
    (RETURN
     (SEQ (LETT |e| (SPADCALL '|%e| (QREFELT $ 140)) |COMMONOP;dexp|)
          (EXIT
           (COND
            ((SPADCALL |x| (SPADCALL 1 (QREFELT $ 148)) (QREFELT $ 149)) |e|)
            ('T (SPADCALL |e| |x| (QREFELT $ 150))))))))) 

(DEFUN |COMMONOP;startUp| (|b| $)
  (PROG (#1=#:G1983 |op| #2=#:G1982 #3=#:G1981 #4=#:G1980 #5=#:G1979 #6=#:G1978
         #7=#:G1977 #8=#:G1976 #9=#:G1975 #10=#:G1974 #11=#:G1973 #12=#:G1972
         #13=#:G1971)
    (RETURN
     (SEQ (SPADCALL (QREFELT $ 9) |b| (QREFELT $ 151))
          (SPADCALL (QREFELT $ 46) (ELT $ 141) (QREFELT $ 153))
          (SPADCALL (QREFELT $ 45) (ELT $ 154) (QREFELT $ 156))
          (SPADCALL (QREFELT $ 16) (CONS (|function| |COMMONOP;dpi|) $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 18) (CONS (|function| |COMMONOP;dexp|) $)
                    (QREFELT $ 153))
          (SPADCALL (QREFELT $ 58) (CONS (|function| |COMMONOP;dgamma|) $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 98) (CONS (|function| |COMMONOP;dEllipticE2|) $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 111) (CONS (|function| |COMMONOP;dfact|) $)
                    (QREFELT $ 153))
          (SPADCALL (QREFELT $ 47) (CONS (|function| |COMMONOP;dquote|) $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 112) (CONS #'|COMMONOP;startUp!0| $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 113) (CONS #'|COMMONOP;startUp!1| $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 114) (CONS #'|COMMONOP;startUp!2| $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 115) (CONS #'|COMMONOP;startUp!3| $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 117) (CONS #'|COMMONOP;startUp!4| $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 108) (CONS #'|COMMONOP;startUp!5| $)
                    (QREFELT $ 156))
          (SPADCALL (QREFELT $ 46) (CONS #'|COMMONOP;startUp!6| $)
                    (QREFELT $ 176))
          (SPADCALL (QREFELT $ 114) (CONS #'|COMMONOP;startUp!7| $)
                    (QREFELT $ 176))
          (SPADCALL (QREFELT $ 15) (CONS #'|COMMONOP;startUp!8| $)
                    (QREFELT $ 176))
          (SEQ (LETT |op| NIL . #14=(|COMMONOP;startUp|))
               (LETT #13# (QREFELT $ 119) . #14#) G190
               (COND
                ((OR (ATOM #13#) (PROGN (LETT |op| (CAR #13#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|%alg| (QREFELT $ 186))))
               (LETT #13# (CDR #13#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #12# (QREFELT $ 120) . #14#) G190
               (COND
                ((OR (ATOM #12#) (PROGN (LETT |op| (CAR #12#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|rtrig| (QREFELT $ 186))))
               (LETT #12# (CDR #12#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #11# (QREFELT $ 121) . #14#) G190
               (COND
                ((OR (ATOM #11#) (PROGN (LETT |op| (CAR #11#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|htrig| (QREFELT $ 186))))
               (LETT #11# (CDR #11#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #10# (QREFELT $ 124) . #14#) G190
               (COND
                ((OR (ATOM #10#) (PROGN (LETT |op| (CAR #10#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|trig| (QREFELT $ 186))))
               (LETT #10# (CDR #10#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #9# (QREFELT $ 125) . #14#) G190
               (COND
                ((OR (ATOM #9#) (PROGN (LETT |op| (CAR #9#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|elem| (QREFELT $ 186))))
               (LETT #9# (CDR #9#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #8# (QREFELT $ 126) . #14#) G190
               (COND
                ((OR (ATOM #8#) (PROGN (LETT |op| (CAR #8#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|prim| (QREFELT $ 186))))
               (LETT #8# (CDR #8#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #7# (QREFELT $ 127) . #14#) G190
               (COND
                ((OR (ATOM #7#) (PROGN (LETT |op| (CAR #7#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|comb| (QREFELT $ 186))))
               (LETT #7# (CDR #7#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #6# (QREFELT $ 128) . #14#) G190
               (COND
                ((OR (ATOM #6#) (PROGN (LETT |op| (CAR #6#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|special| (QREFELT $ 186))))
               (LETT #6# (CDR #6#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #5# (QREFELT $ 129) . #14#) G190
               (COND
                ((OR (ATOM #5#) (PROGN (LETT |op| (CAR #5#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|any| (QREFELT $ 186))))
               (LETT #5# (CDR #5#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #4# (QREFELT $ 131) . #14#) G190
               (COND
                ((OR (ATOM #4#) (PROGN (LETT |op| (CAR #4#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|even| (QREFELT $ 186))))
               (LETT #4# (CDR #4#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #3# (QREFELT $ 132) . #14#) G190
               (COND
                ((OR (ATOM #3#) (PROGN (LETT |op| (CAR #3#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (SPADCALL |op| '|odd| (QREFELT $ 186))))
               (LETT #3# (CDR #3#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #2# (QREFELT $ 133) . #14#) G190
               (COND
                ((OR (ATOM #2#) (PROGN (LETT |op| (CAR #2#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (|COMMONOP;setDummyVar| |op| 1 $)))
               (LETT #2# (CDR #2#) . #14#) (GO G190) G191 (EXIT NIL))
          (SEQ (LETT |op| NIL . #14#) (LETT #1# (QREFELT $ 134) . #14#) G190
               (COND
                ((OR (ATOM #1#) (PROGN (LETT |op| (CAR #1#) . #14#) NIL))
                 (GO G191)))
               (SEQ (EXIT (|COMMONOP;setDummyVar| |op| 2 $)))
               (LETT #1# (CDR #1#) . #14#) (GO G190) G191 (EXIT NIL))
          (SPADCALL (QREFELT $ 46) '|linear| (QREFELT $ 186))
          (EXIT (SPADCALL (QREFELT $ 188))))))) 

(DEFUN |COMMONOP;startUp!8| (|z1| $)
  (SPADCALL
   (LIST (SPADCALL '^ (QREFELT $ 170)) (SPADCALL |z1| (QREFELT $ 177))
         (SPADCALL (|spadConstant| $ 181) (SPADCALL |z1| (QREFELT $ 184))
                   (QREFELT $ 185)))
   (QREFELT $ 174))) 

(DEFUN |COMMONOP;startUp!7| (|z1| $)
  (SPADCALL (SPADCALL (SPADCALL '^ (QREFELT $ 170)) |z1| (QREFELT $ 173))
            (QREFELT $ 174))) 

(DEFUN |COMMONOP;startUp!6| (|z1| $)
  (SPADCALL
   (SPADCALL (SPADCALL '|(| (QREFELT $ 170))
             (SPADCALL |z1| (SPADCALL '|)| (QREFELT $ 170)) (QREFELT $ 172))
             (QREFELT $ 173))
   (QREFELT $ 174))) 

(DEFUN |COMMONOP;startUp!5| (|z1| $)
  (SPADCALL
   (SPADCALL (SPADCALL |z1| (QREFELT $ 159))
             (SPADCALL (SPADCALL '|d| (QREFELT $ 140))
                       (SPADCALL |z1| (QREFELT $ 160)) (QREFELT $ 165))
             (QREFELT $ 166))
   (SPADCALL (QREFELT $ 167)) (SPADCALL |z1| (QREFELT $ 162)) (QREFELT $ 168))) 

(DEFUN |COMMONOP;startUp!4| (|z1| $)
  (SPADCALL (SPADCALL |z1| (QREFELT $ 159)) (SPADCALL |z1| (QREFELT $ 160))
            (SPADCALL |z1| (QREFELT $ 162)) (QREFELT $ 164))) 

(DEFUN |COMMONOP;startUp!3| (|z1| $)
  (SPADCALL (SPADCALL |z1| (QREFELT $ 159)) (SPADCALL |z1| (QREFELT $ 160))
            (SPADCALL |z1| (QREFELT $ 162)) (QREFELT $ 163))) 

(DEFUN |COMMONOP;startUp!2| (|z1| $)
  (SPADCALL (SPADCALL |z1| (QREFELT $ 159)) (SPADCALL |z1| (QREFELT $ 160))
            (QREFELT $ 150))) 

(DEFUN |COMMONOP;startUp!1| (|z1| $)
  (SPADCALL (SPADCALL |z1| (QREFELT $ 159)) (SPADCALL |z1| (QREFELT $ 160))
            (QREFELT $ 161))) 

(DEFUN |COMMONOP;startUp!0| (|z1| $)
  (SPADCALL (SPADCALL 'A (QREFELT $ 140)) |z1| (QREFELT $ 157))) 

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

(DEFUN |CommonOperators;| ()
  (PROG (|dv$| $ |pv$|)
    (RETURN
     (PROGN
      (LETT |dv$| '(|CommonOperators|) . #1=(|CommonOperators|))
      (LETT $ (GETREFV 189) . #1#)
      (QSETREFV $ 0 |dv$|)
      (QSETREFV $ 3 (LETT |pv$| (|buildPredVector| 0 0 NIL) . #1#))
      (|haddProp| |$ConstructorCache| '|CommonOperators| NIL (CONS 1 $))
      (|stuffDomainSlots| $)
      (SETF |pv$| (QREFELT $ 3))
      (QSETREFV $ 9 (SPADCALL 'T (QREFELT $ 8)))
      (QSETREFV $ 14 (SPADCALL '|rootOf| 2 (QREFELT $ 13)))
      (QSETREFV $ 15 (SPADCALL '|nthRoot| 2 (QREFELT $ 13)))
      (QSETREFV $ 16 (SPADCALL '|pi| 0 (QREFELT $ 13)))
      (QSETREFV $ 17 (SPADCALL '|log| 1 (QREFELT $ 13)))
      (QSETREFV $ 18 (SPADCALL '|exp| 1 (QREFELT $ 13)))
      (QSETREFV $ 19 (SPADCALL '|abs| 1 (QREFELT $ 13)))
      (QSETREFV $ 20 (SPADCALL '|sin| 1 (QREFELT $ 13)))
      (QSETREFV $ 21 (SPADCALL '|cos| 1 (QREFELT $ 13)))
      (QSETREFV $ 22 (SPADCALL '|tan| 1 (QREFELT $ 13)))
      (QSETREFV $ 23 (SPADCALL '|cot| 1 (QREFELT $ 13)))
      (QSETREFV $ 24 (SPADCALL '|sec| 1 (QREFELT $ 13)))
      (QSETREFV $ 25 (SPADCALL '|csc| 1 (QREFELT $ 13)))
      (QSETREFV $ 26 (SPADCALL '|asin| 1 (QREFELT $ 13)))
      (QSETREFV $ 27 (SPADCALL '|acos| 1 (QREFELT $ 13)))
      (QSETREFV $ 28 (SPADCALL '|atan| 1 (QREFELT $ 13)))
      (QSETREFV $ 29 (SPADCALL '|acot| 1 (QREFELT $ 13)))
      (QSETREFV $ 30 (SPADCALL '|asec| 1 (QREFELT $ 13)))
      (QSETREFV $ 31 (SPADCALL '|acsc| 1 (QREFELT $ 13)))
      (QSETREFV $ 32 (SPADCALL '|sinh| 1 (QREFELT $ 13)))
      (QSETREFV $ 33 (SPADCALL '|cosh| 1 (QREFELT $ 13)))
      (QSETREFV $ 34 (SPADCALL '|tanh| 1 (QREFELT $ 13)))
      (QSETREFV $ 35 (SPADCALL '|coth| 1 (QREFELT $ 13)))
      (QSETREFV $ 36 (SPADCALL '|sech| 1 (QREFELT $ 13)))
      (QSETREFV $ 37 (SPADCALL '|csch| 1 (QREFELT $ 13)))
      (QSETREFV $ 38 (SPADCALL '|asinh| 1 (QREFELT $ 13)))
      (QSETREFV $ 39 (SPADCALL '|acosh| 1 (QREFELT $ 13)))
      (QSETREFV $ 40 (SPADCALL '|atanh| 1 (QREFELT $ 13)))
      (QSETREFV $ 41 (SPADCALL '|acoth| 1 (QREFELT $ 13)))
      (QSETREFV $ 42 (SPADCALL '|asech| 1 (QREFELT $ 13)))
      (QSETREFV $ 43 (SPADCALL '|acsch| 1 (QREFELT $ 13)))
      (QSETREFV $ 45 (SPADCALL '|%box| (QREFELT $ 44)))
      (QSETREFV $ 46 (SPADCALL '|%paren| (QREFELT $ 44)))
      (QSETREFV $ 47 (SPADCALL '|%quote| (QREFELT $ 44)))
      (QSETREFV $ 48 (SPADCALL '|%diff| 3 (QREFELT $ 13)))
      (QSETREFV $ 49 (SPADCALL '|Si| 1 (QREFELT $ 13)))
      (QSETREFV $ 50 (SPADCALL '|Ci| 1 (QREFELT $ 13)))
      (QSETREFV $ 51 (SPADCALL '|Ei| 1 (QREFELT $ 13)))
      (QSETREFV $ 52 (SPADCALL '|li| 1 (QREFELT $ 13)))
      (QSETREFV $ 53 (SPADCALL '|erf| 1 (QREFELT $ 13)))
      (QSETREFV $ 54 (SPADCALL '|dilog| 1 (QREFELT $ 13)))
      (QSETREFV $ 55 (SPADCALL '|fresnelS| 1 (QREFELT $ 13)))
      (QSETREFV $ 56 (SPADCALL '|fresnelC| 1 (QREFELT $ 13)))
      (QSETREFV $ 57 (SPADCALL '|Gamma| 1 (QREFELT $ 13)))
      (QSETREFV $ 58 (SPADCALL '|Gamma2| 2 (QREFELT $ 13)))
      (QSETREFV $ 59 (SPADCALL '|Beta| 2 (QREFELT $ 13)))
      (QSETREFV $ 60 (SPADCALL '|digamma| 1 (QREFELT $ 13)))
      (QSETREFV $ 61 (SPADCALL '|polygamma| 2 (QREFELT $ 13)))
      (QSETREFV $ 62 (SPADCALL '|besselJ| 2 (QREFELT $ 13)))
      (QSETREFV $ 63 (SPADCALL '|besselY| 2 (QREFELT $ 13)))
      (QSETREFV $ 64 (SPADCALL '|besselI| 2 (QREFELT $ 13)))
      (QSETREFV $ 65 (SPADCALL '|besselK| 2 (QREFELT $ 13)))
      (QSETREFV $ 66 (SPADCALL '|airyAi| 1 (QREFELT $ 13)))
      (QSETREFV $ 67 (SPADCALL '|airyAiPrime| 1 (QREFELT $ 13)))
      (QSETREFV $ 68 (SPADCALL '|airyBi| 1 (QREFELT $ 13)))
      (QSETREFV $ 69 (SPADCALL '|airyBiPrime| 1 (QREFELT $ 13)))
      (QSETREFV $ 70 (SPADCALL '|lambertW| 1 (QREFELT $ 13)))
      (QSETREFV $ 71 (SPADCALL '|polylog| 2 (QREFELT $ 13)))
      (QSETREFV $ 72 (SPADCALL '|weierstrassP| 3 (QREFELT $ 13)))
      (QSETREFV $ 73 (SPADCALL '|weierstrassPPrime| 3 (QREFELT $ 13)))
      (QSETREFV $ 74 (SPADCALL '|weierstrassSigma| 3 (QREFELT $ 13)))
      (QSETREFV $ 75 (SPADCALL '|weierstrassZeta| 3 (QREFELT $ 13)))
      (QSETREFV $ 76 (SPADCALL '|hypergeometricF| (QREFELT $ 44)))
      (QSETREFV $ 77 (SPADCALL '|meijerG| (QREFELT $ 44)))
      (QSETREFV $ 78 (SPADCALL '|whittakerM| 3 (QREFELT $ 13)))
      (QSETREFV $ 79 (SPADCALL '|whittakerW| 3 (QREFELT $ 13)))
      (QSETREFV $ 80 (SPADCALL '|angerJ| 2 (QREFELT $ 13)))
      (QSETREFV $ 81 (SPADCALL '|weberE| 2 (QREFELT $ 13)))
      (QSETREFV $ 82 (SPADCALL '|struveH| 2 (QREFELT $ 13)))
      (QSETREFV $ 83 (SPADCALL '|struveL| 2 (QREFELT $ 13)))
      (QSETREFV $ 84 (SPADCALL '|hankelH1| 2 (QREFELT $ 13)))
      (QSETREFV $ 85 (SPADCALL '|hankelH2| 2 (QREFELT $ 13)))
      (QSETREFV $ 86 (SPADCALL '|lommelS1| 3 (QREFELT $ 13)))
      (QSETREFV $ 87 (SPADCALL '|lommelS2| 3 (QREFELT $ 13)))
      (QSETREFV $ 88 (SPADCALL '|kummerM| 3 (QREFELT $ 13)))
      (QSETREFV $ 89 (SPADCALL '|kummerU| 3 (QREFELT $ 13)))
      (QSETREFV $ 90 (SPADCALL '|legendreP| 3 (QREFELT $ 13)))
      (QSETREFV $ 91 (SPADCALL '|legendreQ| 3 (QREFELT $ 13)))
      (QSETREFV $ 92 (SPADCALL '|kelvinBei| 2 (QREFELT $ 13)))
      (QSETREFV $ 93 (SPADCALL '|kelvinBer| 2 (QREFELT $ 13)))
      (QSETREFV $ 94 (SPADCALL '|kelvinKei| 2 (QREFELT $ 13)))
      (QSETREFV $ 95 (SPADCALL '|kelvinKer| 2 (QREFELT $ 13)))
      (QSETREFV $ 96 (SPADCALL '|ellipticK| 1 (QREFELT $ 13)))
      (QSETREFV $ 97 (SPADCALL '|ellipticE| 1 (QREFELT $ 13)))
      (QSETREFV $ 98 (SPADCALL '|ellipticE2| 2 (QREFELT $ 13)))
      (QSETREFV $ 99 (SPADCALL '|ellipticF| 2 (QREFELT $ 13)))
      (QSETREFV $ 100 (SPADCALL '|ellipticPi| 3 (QREFELT $ 13)))
      (QSETREFV $ 101 (SPADCALL '|jacobiSn| 2 (QREFELT $ 13)))
      (QSETREFV $ 102 (SPADCALL '|jacobiCn| 2 (QREFELT $ 13)))
      (QSETREFV $ 103 (SPADCALL '|jacobiDn| 2 (QREFELT $ 13)))
      (QSETREFV $ 104 (SPADCALL '|jacobiTheta| 2 (QREFELT $ 13)))
      (QSETREFV $ 105 (SPADCALL '|weierstrassPInverse| 3 (QREFELT $ 13)))
      (QSETREFV $ 106 (SPADCALL '|lerchPhi| 3 (QREFELT $ 13)))
      (QSETREFV $ 107 (SPADCALL '|riemannZeta| 1 (QREFELT $ 13)))
      (QSETREFV $ 108 (SPADCALL '|integral| 3 (QREFELT $ 13)))
      (QSETREFV $ 109 (SPADCALL '|%iint| (QREFELT $ 44)))
      (QSETREFV $ 110 (SPADCALL '|%defint| 5 (QREFELT $ 13)))
      (QSETREFV $ 111 (SPADCALL '|factorial| 1 (QREFELT $ 13)))
      (QSETREFV $ 112 (SPADCALL '|permutation| 2 (QREFELT $ 13)))
      (QSETREFV $ 113 (SPADCALL '|binomial| 2 (QREFELT $ 13)))
      (QSETREFV $ 114 (SPADCALL '|%power| 2 (QREFELT $ 13)))
      (QSETREFV $ 115 (SPADCALL '|summation| 3 (QREFELT $ 13)))
      (QSETREFV $ 116 (SPADCALL '|%defsum| 5 (QREFELT $ 13)))
      (QSETREFV $ 117 (SPADCALL '|product| 3 (QREFELT $ 13)))
      (QSETREFV $ 118 (SPADCALL '|%defprod| 5 (QREFELT $ 13)))
      (QSETREFV $ 119 (LIST (QREFELT $ 15) (QREFELT $ 14)))
      (QSETREFV $ 120
                (LIST (QREFELT $ 20) (QREFELT $ 21) (QREFELT $ 22)
                      (QREFELT $ 23) (QREFELT $ 24) (QREFELT $ 25)
                      (QREFELT $ 26) (QREFELT $ 27) (QREFELT $ 28)
                      (QREFELT $ 29) (QREFELT $ 30) (QREFELT $ 31)))
      (QSETREFV $ 121
                (LIST (QREFELT $ 32) (QREFELT $ 33) (QREFELT $ 34)
                      (QREFELT $ 35) (QREFELT $ 36) (QREFELT $ 37)
                      (QREFELT $ 38) (QREFELT $ 39) (QREFELT $ 40)
                      (QREFELT $ 41) (QREFELT $ 42) (QREFELT $ 43)))
      (QSETREFV $ 124
                (SPADCALL (QREFELT $ 120) (QREFELT $ 121) (QREFELT $ 123)))
      (QSETREFV $ 125
                (SPADCALL (QREFELT $ 124)
                          (LIST (QREFELT $ 16) (QREFELT $ 17) (QREFELT $ 18))
                          (QREFELT $ 123)))
      (QSETREFV $ 126
                (LIST (QREFELT $ 51) (QREFELT $ 52) (QREFELT $ 49)
                      (QREFELT $ 50) (QREFELT $ 53) (QREFELT $ 54)
                      (QREFELT $ 108) (QREFELT $ 110) (QREFELT $ 55)
                      (QREFELT $ 56) (QREFELT $ 109)))
      (QSETREFV $ 127
                (LIST (QREFELT $ 111) (QREFELT $ 112) (QREFELT $ 113)
                      (QREFELT $ 114) (QREFELT $ 115) (QREFELT $ 116)
                      (QREFELT $ 117) (QREFELT $ 118)))
      (QSETREFV $ 128
                (LIST (QREFELT $ 57) (QREFELT $ 58) (QREFELT $ 59)
                      (QREFELT $ 60) (QREFELT $ 61) (QREFELT $ 19)
                      (QREFELT $ 62) (QREFELT $ 63) (QREFELT $ 64)
                      (QREFELT $ 65) (QREFELT $ 66) (QREFELT $ 68)
                      (QREFELT $ 67) (QREFELT $ 69) (QREFELT $ 70)
                      (QREFELT $ 71) (QREFELT $ 72) (QREFELT $ 73)
                      (QREFELT $ 75) (QREFELT $ 74) (QREFELT $ 76)
                      (QREFELT $ 77) (QREFELT $ 78) (QREFELT $ 79)
                      (QREFELT $ 80) (QREFELT $ 81) (QREFELT $ 82)
                      (QREFELT $ 83) (QREFELT $ 84) (QREFELT $ 85)
                      (QREFELT $ 86) (QREFELT $ 87) (QREFELT $ 88)
                      (QREFELT $ 89) (QREFELT $ 90) (QREFELT $ 91)
                      (QREFELT $ 92) (QREFELT $ 93) (QREFELT $ 94)
                      (QREFELT $ 95) (QREFELT $ 96) (QREFELT $ 97)
                      (QREFELT $ 98) (QREFELT $ 99) (QREFELT $ 100)
                      (QREFELT $ 101) (QREFELT $ 102) (QREFELT $ 103)
                      (QREFELT $ 104) (QREFELT $ 106) (QREFELT $ 107)))
      (QSETREFV $ 129
                (LIST (QREFELT $ 46) (QREFELT $ 48) (QREFELT $ 45)
                      (QREFELT $ 47)))
      (QSETREFV $ 130
                (SPADCALL
                 (SPADCALL
                  (SPADCALL
                   (SPADCALL
                    (SPADCALL (QREFELT $ 119) (QREFELT $ 125) (QREFELT $ 123))
                    (QREFELT $ 126) (QREFELT $ 123))
                   (QREFELT $ 127) (QREFELT $ 123))
                  (QREFELT $ 128) (QREFELT $ 123))
                 (QREFELT $ 129) (QREFELT $ 123)))
      (QSETREFV $ 131
                (LIST (QREFELT $ 21) (QREFELT $ 24) (QREFELT $ 33)
                      (QREFELT $ 36) (QREFELT $ 19) (QREFELT $ 72)))
      (QSETREFV $ 132
                (LIST (QREFELT $ 20) (QREFELT $ 25) (QREFELT $ 22)
                      (QREFELT $ 23) (QREFELT $ 26) (QREFELT $ 31)
                      (QREFELT $ 28) (QREFELT $ 32) (QREFELT $ 37)
                      (QREFELT $ 34) (QREFELT $ 35) (QREFELT $ 38)
                      (QREFELT $ 43) (QREFELT $ 40) (QREFELT $ 41)
                      (QREFELT $ 49) (QREFELT $ 53) (QREFELT $ 73)
                      (QREFELT $ 75)))
      (QSETREFV $ 133
                (LIST (QREFELT $ 48) (QREFELT $ 14) (QREFELT $ 108)
                      (QREFELT $ 115) (QREFELT $ 117)))
      (QSETREFV $ 134 (LIST (QREFELT $ 110) (QREFELT $ 116) (QREFELT $ 118)))
      $)))) 

(MAKEPROP '|CommonOperators| '|infovec|
          (LIST
           '#(NIL NIL NIL NIL NIL NIL (|Boolean|) (|Reference| 6) (0 . |ref|)
              '|brandNew?| (|Symbol|) (|NonNegativeInteger|) (|BasicOperator|)
              (5 . |operator|) '|opalg| '|oproot| '|oppi| '|oplog| '|opexp|
              '|opabs| '|opsin| '|opcos| '|optan| '|opcot| '|opsec| '|opcsc|
              '|opasin| '|opacos| '|opatan| '|opacot| '|opasec| '|opacsc|
              '|opsinh| '|opcosh| '|optanh| '|opcoth| '|opsech| '|opcsch|
              '|opasinh| '|opacosh| '|opatanh| '|opacoth| '|opasech| '|opacsch|
              (11 . |operator|) '|opbox| '|oppren| '|opquote| '|opdiff| '|opsi|
              '|opci| '|opei| '|opli| '|operf| '|opli2| '|opfis| '|opfic|
              '|opGamma| '|opGamma2| '|opBeta| '|opdigamma| '|oppolygamma|
              '|opBesselJ| '|opBesselY| '|opBesselI| '|opBesselK| '|opAiryAi|
              '|opAiryAiPrime| '|opAiryBi| '|opAiryBiPrime| '|opLambertW|
              '|opPolylog| '|opWeierstrassP| '|opWeierstrassPPrime|
              '|opWeierstrassSigma| '|opWeierstrassZeta| '|opHypergeometricF|
              '|opMeijerG| '|opWhittakerM| '|opWhittakerW| '|opAngerJ|
              '|opWeberE| '|opStruveH| '|opStruveL| '|opHankelH1| '|opHankelH2|
              '|opLommelS1| '|opLommelS2| '|opKummerM| '|opKummerU|
              '|opLegendreP| '|opLegendreQ| '|opKelvinBei| '|opKelvinBer|
              '|opKelvinKei| '|opKelvinKer| '|opEllipticK| '|opEllipticE|
              '|opEllipticE2| '|opEllipticF| '|opEllipticPi| '|opJacobiSn|
              '|opJacobiCn| '|opJacobiDn| '|opJacobiTheta|
              '|opWeierstrassPInverse| '|opLerchPhi| '|opRiemannZeta| '|opint|
              '|opiint| '|opdint| '|opfact| '|opperm| '|opbinom| '|oppow|
              '|opsum| '|opdsum| '|opprod| '|opdprod| '|algop| '|rtrigop|
              '|htrigop| (|List| 12) (16 . |concat|) '|trigop| '|elemop|
              '|primop| '|combop| '|specop| '|anyop| '|allop| '|evenop|
              '|oddop| '|dummyvarop1| '|dummyvarop2| (22 . |deref|)
              (27 . |is?|) (33 . |copy|) |COMMONOP;operator;SBo;1|
              (|OutputForm|) (38 . |coerce|) (43 . |paren|) (48 . |postfix|)
              (54 . |quote|) (|List| $) (59 . |prefix|) (|None|)
              (65 . |setProperty|) (72 . |coerce|) (77 . =) (83 . ^)
              (89 . |setelt|) (|Mapping| 139 139) (95 . |display|)
              (101 . |commaSeparate|) (|Mapping| 139 158) (106 . |display|)
              (112 . |supersub|) (|List| 139) (118 . |first|) (123 . |second|)
              (128 . |binomial|) (134 . |third|) (139 . |sum|) (146 . |prod|)
              (153 . |hconcat|) (159 . *) (165 . |empty|) (169 . |int|)
              (|InputForm|) (176 . |convert|) (|List| 169) (181 . |concat|)
              (187 . |concat|) (193 . |convert|) (|Mapping| 169 171)
              (198 . |input|) (204 . |first|) (209 . |One|) (|Integer|)
              (213 . |One|) (217 . |One|) (|DoubleFloat|) (221 . |One|)
              (225 . |second|) (230 . /) (236 . |assert|) (|Void|)
              (242 . |void|))
           '#(|operator| 246) 'NIL
           (CONS (|makeByteWordVec2| 1 'NIL)
                 (CONS '#()
                       (CONS '#()
                             (|makeByteWordVec2| 188
                                                 '(1 7 0 6 8 2 12 0 10 11 13 1
                                                   12 0 10 44 2 122 0 0 0 123 1
                                                   7 6 0 135 2 12 6 0 10 136 1
                                                   12 0 0 137 1 10 139 0 140 1
                                                   139 0 0 141 2 139 0 0 0 142
                                                   1 139 0 0 143 2 139 0 0 144
                                                   145 3 12 0 0 10 146 147 1 11
                                                   139 0 148 2 139 6 0 0 149 2
                                                   139 0 0 0 150 2 7 6 0 6 151
                                                   2 12 0 0 152 153 1 139 0 144
                                                   154 2 12 0 0 155 156 2 139 0
                                                   0 144 157 1 158 139 0 159 1
                                                   158 139 0 160 2 139 0 0 0
                                                   161 1 158 139 0 162 3 139 0
                                                   0 0 0 163 3 139 0 0 0 0 164
                                                   2 139 0 0 0 165 2 139 0 0 0
                                                   166 0 139 0 167 3 139 0 0 0
                                                   0 168 1 10 169 0 170 2 171 0
                                                   0 169 172 2 171 0 169 0 173
                                                   1 169 0 144 174 2 12 0 0 175
                                                   176 1 171 169 0 177 0 11 0
                                                   178 0 179 0 180 0 169 0 181
                                                   0 182 0 183 1 171 169 0 184
                                                   2 169 0 0 0 185 2 12 0 0 10
                                                   186 0 187 0 188 1 0 12 10
                                                   138)))))
           '|lookupComplete|)) 

(MAKEPROP '|CommonOperators| 'NILADIC T)