| Inputs |
|---|
(/.f64 (*.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
(*.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(pow.f64 (hypot.f64 x.im x.re) y.re) |
(hypot.f64 x.im x.re) |
x.im |
x.re |
y.re |
(cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)) |
y.im |
(log.f64 (hypot.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(atan2.f64 x.im x.re) |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(*.f64 (exp.f64 (fma.f64 (*.f64 y.re (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(exp.f64 (fma.f64 (*.f64 y.re (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(fma.f64 (*.f64 y.re (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 y.re (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) |
(log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(fma.f64 x.re x.re (*.f64 x.im x.im)) |
(*.f64 x.im x.im) |
#s(literal 1/2 binary64) |
(*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) |
(neg.f64 y.im) |
(cos.f64 (fma.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 y.im #s(literal 1/2 binary64)) |
(*.f64 (exp.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im) (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(exp.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) |
(*.f64 y.re #s(literal 1/2 binary64)) |
(sin.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im) (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im) (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
#s(literal -1/2 binary64) |
(*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im) |
(fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(neg.f64 y.re) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(*.f64 (exp.f64 (fma.f64 (*.f64 y.re (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(fma.f64 (atan2.f64 x.im x.re) y.re (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(*.f64 (*.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(*.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(pow.f64 (hypot.f64 x.re x.im) y.re) |
(hypot.f64 x.re x.im) |
(exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(sin.f64 (+.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(+.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)))))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re)))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))))) (pow x.im 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (* (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))))) (pow x.im 2)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* y.re (log (pow x.im 2))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* y.re (log (pow x.im 2))) (/ (* (pow x.re 2) y.re) (pow x.im 2))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* y.re (log (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (/ y.re (pow x.im 2))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* y.re (log (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ y.re (pow x.im 4))) (* 1/3 (/ (* (pow x.re 2) y.re) (pow x.im 6))))) (/ y.re (pow x.im 2))))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (log (pow x.im 2)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (log (pow x.im 2)) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* -1/2 (/ (pow x.re 2) (pow x.im 4))) (/ 1 (pow x.im 2))))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/3 (/ (pow x.re 2) (pow x.im 6))) (* 1/2 (/ 1 (pow x.im 4))))) (/ 1 (pow x.im 2))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* (neg y.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (pow x.im 2)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 6))) (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (+ (* -1/6 (/ y.im (pow x.im 6))) (* 1/48 (/ (pow y.im 3) (pow x.im 6))))))))))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* 1/2 (* y.re (log (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* 1/2 (* y.re (log (pow x.im 2)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* 1/2 (* y.re (log (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) (pow x.im 6))) (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI))))) (+ (* -1/6 (/ y.im (pow x.im 6))) (* 1/48 (/ (pow y.im 3) (pow x.im 6))))))))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (+ (* 1/2 (PI)) (* (pow x.re 2) (+ (* -1/2 (/ y.im (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4)))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.im 2)))) (+ (* 1/2 (PI)) (* (pow x.re 2) (+ (* -1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))) (* 1/4 (/ y.im (pow x.im 4)))))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (* y.im (log (pow x.im 2))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* y.im (log (pow x.im 2))) (/ (* (pow x.re 2) y.im) (pow x.im 2))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* y.im (log (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (/ y.im (pow x.im 2))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* y.im (log (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ y.im (pow x.im 4))) (* 1/3 (/ (* (pow x.re 2) y.im) (pow x.im 6))))) (/ y.im (pow x.im 2))))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2))))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.im 2)))))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (/ (* y.im (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (pow x.im 2))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.re 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (/ (* y.im (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (pow x.im 2))))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re))))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.re 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (/ (* y.im (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (pow x.im 2))))) (* (pow x.re 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re))))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (/ (* y.im (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re))) (pow x.im 2))) (+ (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ y.im (pow x.im 6))) (* 1/48 (/ (pow y.im 3) (pow x.im 6)))))) (pow x.im y.re)))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.im y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.im y.re)))) (pow x.im 2))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.im y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.im y.re))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re)))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re)))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ y.im (pow x.im 6))) (* 1/48 (/ (pow y.im 3) (pow x.im 6))))))))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* 1/2 (PI))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* 1/2 (PI)) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* 1/2 (PI)) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))) (* -1/4 (/ y.im (pow x.im 4))))) (* 1/2 (/ y.im (pow x.im 2)))))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))) (* -1/4 (/ y.im (pow x.im 4))))) (* 1/2 (/ y.im (pow x.im 2))))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re)))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/6 (* (pow x.im 6) y.im)))))) (pow x.re 6))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re))))) (pow x.re 6))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/6 (/ (* (pow x.im 6) y.re) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -2 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ 1 x.re)))) (/ (* (pow x.im 2) y.re) (pow x.re 2))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ 1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ 1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/3 (/ (* (pow x.im 6) y.re) (pow x.re 6))) (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -2 (log (/ 1 x.re))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/6 (* (pow x.im 6) y.im)))) (pow x.re 6))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/6 (/ (* (pow x.im 6) y.im) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re)))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (+ (* -1/6 (* (pow x.im 6) y.im)) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))) (pow x.re 6))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re))))) (pow x.re 6))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/6 (/ (* (pow x.im 6) y.re) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/6 (/ (* (pow x.im 6) y.re) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) (pow x.re 4))) (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) (pow x.re 4)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) (pow x.re 4))) (/ (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))) (+ (* -1/6 (* (pow x.im 6) y.im)) (* 1/48 (* (pow x.im 6) (pow y.im 3))))) (pow x.re 6))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* -1/6 (/ (* (pow x.im 6) y.im) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.re)))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (* -2 (* y.im (log (/ 1 x.re)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ 1 x.re)))) (/ (* (pow x.im 2) y.im) (pow x.re 2))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ 1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ 1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/3 (/ (* (pow x.im 6) y.im) (pow x.re 6))) (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re)))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 2))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (pow x.re 4)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (pow x.re 4))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (/ (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))) (pow x.re 6))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* 1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re)))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/6 (* (pow x.im 6) y.im)))))) (pow x.re 6))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re))))) (pow x.re 6))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/6 (/ (* (pow x.im 6) y.re) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -2 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ -1 x.re)))) (/ (* (pow x.im 2) y.re) (pow x.re 2))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ -1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ -1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/3 (/ (* (pow x.im 6) y.re) (pow x.re 6))) (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -2 (log (/ -1 x.re))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/6 (* (pow x.im 6) y.im)))) (pow x.re 6))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/6 (/ (* (pow x.im 6) y.im) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re)))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (+ (* -1/6 (* (pow x.im 6) y.im)) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))) (pow x.re 6))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re))))) (pow x.re 6))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/6 (/ (* (pow x.im 6) y.re) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/6 (/ (* (pow x.im 6) y.re) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) (pow x.re 4))) (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) (pow x.re 4)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) (pow x.re 4))) (/ (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))) (+ (* -1/6 (* (pow x.im 6) y.im)) (* 1/48 (* (pow x.im 6) (pow y.im 3))))) (pow x.re 6))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* -1/6 (/ (* (pow x.im 6) y.im) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.re)))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (* -2 (* y.im (log (/ -1 x.re)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ -1 x.re)))) (/ (* (pow x.im 2) y.im) (pow x.re 2))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ -1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ -1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/3 (/ (* (pow x.im 6) y.im) (pow x.re 6))) (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.im 6) (pow y.re 3))) (* 1/6 (* (pow x.im 6) y.re)))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 2))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (pow x.re 4)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (pow x.re 4))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (/ (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))) (pow x.re 6))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* 1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)))))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re)))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))))) (pow x.re 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (* (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))))) (pow x.re 2)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* y.re (log (pow x.re 2))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* y.re (log (pow x.re 2))) (/ (* (pow x.im 2) y.re) (pow x.re 2))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* y.re (log (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (/ y.re (pow x.re 2))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* y.re (log (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ y.re (pow x.re 4))) (* 1/3 (/ (* (pow x.im 2) y.re) (pow x.re 6))))) (/ y.re (pow x.re 2))))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (log (pow x.re 2)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (log (pow x.re 2)) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* -1/2 (/ (pow x.im 2) (pow x.re 4))) (/ 1 (pow x.re 2))))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/3 (/ (pow x.im 2) (pow x.re 6))) (* 1/2 (/ 1 (pow x.re 4))))) (/ 1 (pow x.re 2))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (pow x.re 2)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 6))) (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (+ (* -1/6 (/ y.im (pow x.re 6))) (* 1/48 (/ (pow y.im 3) (pow x.re 6))))))))))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* 1/2 (* y.re (log (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* 1/2 (* y.re (log (pow x.re 2)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* 1/2 (* y.re (log (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) (pow x.re 6))) (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI))))) (+ (* -1/6 (/ y.im (pow x.re 6))) (* 1/48 (/ (pow y.im 3) (pow x.re 6))))))))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (+ (* 1/2 (PI)) (* (pow x.im 2) (+ (* -1/2 (/ y.im (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4)))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (pow x.re 2)))) (+ (* 1/2 (PI)) (* (pow x.im 2) (+ (* -1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))) (* 1/4 (/ y.im (pow x.re 4)))))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (* y.im (log (pow x.re 2))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* y.im (log (pow x.re 2))) (/ (* (pow x.im 2) y.im) (pow x.re 2))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* y.im (log (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (/ y.im (pow x.re 2))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* y.im (log (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ y.im (pow x.re 4))) (* 1/3 (/ (* (pow x.im 2) y.im) (pow x.re 6))))) (/ y.im (pow x.re 2))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2))))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (pow x.re 2)))))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (/ (* y.im (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (pow x.re 2))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.im 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (/ (* y.im (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (pow x.re 2))))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re))))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.im 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (/ (* y.im (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (pow x.re 2))))) (* (pow x.im 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re))))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (/ (* y.im (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re))) (pow x.re 2))) (+ (* (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ y.im (pow x.re 6))) (* 1/48 (/ (pow y.im 3) (pow x.re 6)))))) (pow x.re y.re)))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.re y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.re y.re)))) (pow x.re 2))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.re y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.re y.re))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re)))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re)))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ y.im (pow x.re 6))) (* 1/48 (/ (pow y.im 3) (pow x.re 6))))))))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* 1/2 (PI))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* 1/2 (PI)) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* 1/2 (PI)) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))) (* -1/4 (/ y.im (pow x.re 4))))) (* 1/2 (/ y.im (pow x.re 2)))))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))) (* -1/4 (/ y.im (pow x.re 4))))) (* 1/2 (/ y.im (pow x.re 2))))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re)))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/6 (* (pow x.re 6) y.im)))))) (pow x.im 6))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re))))) (pow x.im 6))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/6 (/ (* (pow x.re 6) y.re) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -2 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ 1 x.im)))) (/ (* (pow x.re 2) y.re) (pow x.im 2))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ 1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ 1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/3 (/ (* (pow x.re 6) y.re) (pow x.im 6))) (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -2 (log (/ 1 x.im))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/6 (* (pow x.re 6) y.im)))) (pow x.im 6))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/6 (/ (* (pow x.re 6) y.im) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re)))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (+ (* -1/6 (* (pow x.re 6) y.im)) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))) (pow x.im 6))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re))))) (pow x.im 6))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/6 (/ (* (pow x.re 6) y.re) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/6 (/ (* (pow x.re 6) y.re) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) (pow x.im 4))) (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) (pow x.im 4)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) (pow x.im 4))) (/ (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))) (+ (* -1/6 (* (pow x.re 6) y.im)) (* 1/48 (* (pow x.re 6) (pow y.im 3))))) (pow x.im 6))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* -1/6 (/ (* (pow x.re 6) y.im) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* y.im (log (/ 1 x.im)))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (* -2 (* y.im (log (/ 1 x.im)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ 1 x.im)))) (/ (* (pow x.re 2) y.im) (pow x.im 2))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ 1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ 1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/3 (/ (* (pow x.re 6) y.im) (pow x.im 6))) (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re)))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 2))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (pow x.im 4)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (pow x.im 4))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (/ (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))) (pow x.im 6))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* 1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re)))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/6 (* (pow x.re 6) y.im)))))) (pow x.im 6))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re))))) (pow x.im 6))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/6 (/ (* (pow x.re 6) y.re) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -2 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ -1 x.im)))) (/ (* (pow x.re 2) y.re) (pow x.im 2))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ -1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -2 (* y.re (log (/ -1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/3 (/ (* (pow x.re 6) y.re) (pow x.im 6))) (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -2 (log (/ -1 x.im))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/6 (* (pow x.re 6) y.im)))) (pow x.im 6))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/6 (/ (* (pow x.re 6) y.im) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re)))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (+ (* -1/6 (* (pow x.re 6) y.im)) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))) (pow x.im 6))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re))))) (pow x.im 6))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/6 (/ (* (pow x.re 6) y.re) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/6 (/ (* (pow x.re 6) y.re) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) (pow x.im 4))) (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) (pow x.im 4)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) (pow x.im 4))) (/ (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))) (+ (* -1/6 (* (pow x.re 6) y.im)) (* 1/48 (* (pow x.re 6) (pow y.im 3))))) (pow x.im 6))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* -1/6 (/ (* (pow x.re 6) y.im) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* y.im (log (/ -1 x.im)))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (* -2 (* y.im (log (/ -1 x.im)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ -1 x.im)))) (/ (* (pow x.re 2) y.im) (pow x.im 2))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ -1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (+ (* -2 (* y.im (log (/ -1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/3 (/ (* (pow x.re 6) y.im) (pow x.im 6))) (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/48 (* (pow x.re 6) (pow y.re 3))) (* 1/6 (* (pow x.re 6) y.re)))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 2))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (pow x.im 4)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (* y.re (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/4 (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (pow x.im 4))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (/ (* (cos (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))) (pow x.im 6))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (PI))) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* 1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/6 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* 1/2 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* 1/2 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (* 1/8 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))))))))) (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* 1/2 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/8 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))) (* y.re (+ (* -1/4 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/48 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))))))))))))))) (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/8 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* 1/48 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 3)))) (* 1/8 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))))) (* y.re (+ (* -1/2 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (* 1/8 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))))) (* y.re (+ (* -1/2 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/8 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))))) (* y.re (+ (* -1/4 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (* (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (atan2 x.im x.re))))) (+ (* 1/48 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 3) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))))) (* 1/6 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/8 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* 1/48 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 3)))) (* 1/8 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* y.re 1/2) #s(hole binary64 (* 1/2 y.re))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* -1 (* y.re (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* y.re (+ (* -1 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* -1/2 (* y.re (* (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (* y.re (+ (* -1 (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* (sin (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (cos (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3))))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (neg y.re) #s(hole binary64 (* -1 y.re))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/8 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (atan2 x.im x.re)))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/8 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (+ (pow x.im 2) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/48 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 3) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* 1/8 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (atan2 x.im x.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/6 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 1)) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1 (* y.re (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* -1/2 (* y.re (* (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* (sin (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (cos (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3))))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1 (* y.re (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)) (* 1/2 (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (* y.im (log (+ (pow x.im 2) (pow x.re 2)))) y.re)) (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI)))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)) (* 1/2 (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (* y.re (+ (* -1 (atan2 x.im x.re)) (+ (* -1/2 (/ (* y.im (log (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* 1/2 (/ (PI) y.re))))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* -1 (atan2 x.im x.re)) (* 1/2 (/ (PI) y.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (- (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (- (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (- (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1/2 (log (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (* y.im (log (+ (pow x.im 2) (pow x.re 2)))) y.re))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1/2 (log (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))) (* 1/2 (PI))) y.re)) (atan2 x.im x.re)))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (- (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.re (- (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* -1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (* y.re (atan2 x.im x.re)))))))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* -1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (+ (* -1/8 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* -1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (+ (* -1/8 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.im (+ (* -1/4 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/48 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 3) (sin (* y.re (atan2 x.im x.re)))))) (* 1/8 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.im (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* 1/2 (* y.im (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (* y.im (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (* y.im (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/8 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2)))) (* 1/2 (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/8 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 2))) (* 1/48 (* y.im (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (log (+ (pow x.im 2) (pow x.re 2))) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* y.im 1/2) #s(hole binary64 (* 1/2 y.im))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (log (+ (pow x.im 2) (pow x.re 2)))))))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1/2 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (+ (* -1/8 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI))))))) (+ (* 1/2 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (atan2 x.im x.re))))) (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))))))))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1/2 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (+ (* -1/8 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI))))))) (+ (* 1/2 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (atan2 x.im x.re))))) (+ (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/4 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (+ (pow x.im 2) (pow x.re 2))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/48 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 3)))) (* 1/8 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (* (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))))))))))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.im (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* 1/2 (* y.im (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (* y.im (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* -1/2 (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* y.im (+ (* -1/2 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (log (+ (pow x.im 2) (pow x.re 2))))) (* -1/8 (* y.im (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (* y.im (+ (* -1/2 (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (log (+ (pow x.im 2) (pow x.re 2))))) (* y.im (+ (* -1/8 (* (pow (log (+ (pow x.im 2) (pow x.re 2))) 2) (sin (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))))) (* 1/48 (* y.im (* (cos (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI)))) (pow (log (+ (pow x.im 2) (pow x.re 2))) 3))))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) #s(hole binary64 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (+ (* -1/6 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (exp (* 1/2 (* y.re (log (+ (pow x.im 2) (pow x.re 2)))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 1)) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1 (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/6 (* y.im (* (cos (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* 1/2 (PI))) (* y.re (atan2 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (/ (* y.re (log (+ (pow x.im 2) (pow x.re 2)))) y.im)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (* 1/2 (log (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (* 1/2 (/ (* y.re (log (+ (pow x.im 2) (pow x.re 2)))) y.im)) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (* y.im (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (+ (* -1/2 (log (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (* y.im (- (* 1/2 (/ (PI) y.im)) (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (- (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (/ (* y.re (log (+ (pow x.im 2) (pow x.re 2)))) y.im)) (atan2 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (* -1/2 (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1/2 (/ (* y.re (log (+ (pow x.im 2) (pow x.re 2)))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (+ (* -1 (* y.re (atan2 x.im x.re))) (* 1/2 (PI))) y.im)) (* 1/2 (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (- (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (- (/ (* y.re (atan2 x.im x.re)) y.im) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
| Outputs |
|---|
(/.f64 (neg.f64 (*.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))) |
(/.f64 (*.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) |
(*.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64))) |
(pow.f64 (hypot.f64 x.im x.re) y.re) |
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.re)) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) |
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re)) |
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re)) |
(hypot.f64 (neg.f64 x.im) x.re) |
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re)) |
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re)) |
(hypot.f64 (fabs.f64 x.im) x.re) |
(hypot.f64 x.im (neg.f64 x.re)) |
(hypot.f64 x.im (fabs.f64 x.re)) |
(hypot.f64 x.im x.re) |
x.im |
x.re |
y.re |
(fma.f64 (sin.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(-.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(+.f64 (*.f64 (sin.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(+.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 (atan2.f64 x.im x.re) y.re)) |
y.im |
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) |
(log.f64 (hypot.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(atan2.f64 x.im x.re) |
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im) |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(+.f64 (cosh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(*.f64 (exp.f64 (fma.f64 (log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) |
(exp.f64 (fma.f64 (log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(+.f64 (cosh.f64 (fma.f64 (log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sinh.f64 (fma.f64 (log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(fma.f64 (log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 y.re (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) |
(log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) |
(log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) |
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im)) |
(fma.f64 x.re x.re (*.f64 x.im x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 x.im #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
#s(literal 1/2 binary64) |
(*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) |
(neg.f64 y.im) |
(sin.f64 (+.f64 (fma.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (fma.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (fma.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(+.f64 (*.f64 (*.f64 y.im #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 y.im #s(literal 1/2 binary64)) |
(*.f64 (exp.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im) (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(/.f64 (exp.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))))) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) |
(exp.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im)))) |
(-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) |
(log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) (*.f64 y.re #s(literal 1/2 binary64)))) |
(*.f64 y.re #s(literal 1/2 binary64)) |
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im))) (cos.f64 (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im))) (sin.f64 (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(sin.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im) (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im))) (cos.f64 (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im))) (sin.f64 (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im) (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im)) (fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
#s(literal -1/2 binary64) |
(*.f64 (log.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) y.im) |
(fma.f64 (neg.f64 y.re) (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(neg.f64 y.re) |
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64)) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(*.f64 (exp.f64 (fma.f64 (log.f64 (pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) y.re)) #s(literal 1/2 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) |
(sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) |
(fma.f64 (atan2.f64 x.im x.re) y.re (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(+.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(*.f64 (*.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) |
(pow.f64 (hypot.f64 x.re x.im) y.re) |
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) (/.f64 y.re #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) |
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im)) |
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im)) |
(hypot.f64 (neg.f64 x.re) x.im) |
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im)) |
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im)) |
(hypot.f64 (fabs.f64 x.re) x.im) |
(hypot.f64 x.re (neg.f64 x.im)) |
(hypot.f64 x.re (fabs.f64 x.im)) |
(hypot.f64 x.re x.im) |
(pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) |
(exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(+.f64 (cosh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(fma.f64 (sin.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(-.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(+.f64 (*.f64 (sin.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(+.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 x.im x.im))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (pow.f64 x.im y.re))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))))))) |
#s(approx x.re x.re) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.im)) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64))))))) |
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))))) (*.f64 x.im x.im))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))))) (*.f64 x.im x.im))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 y.re (*.f64 x.im x.im)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))) (/.f64 y.re (*.f64 x.im x.im)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal 2 binary64) (log.f64 x.im))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal -2 binary64)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (pow.f64 x.im #s(literal -2 binary64)))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im)) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re))) |
#s(approx (* (neg y.im) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x.im x.im))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 y.im (*.f64 x.im x.im)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))) (/.f64 y.im (*.f64 x.im x.im)))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.im)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (*.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 x.im x.im)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 x.im y.re)) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (pow.f64 x.im y.re))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))))))) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -2 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (*.f64 #s(literal -2 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 x.re x.re)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -2 binary64)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (*.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 x.re x.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (pow.f64 x.re y.re))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re)))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64))))))) |
#s(approx x.im x.im) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.re)) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))))) (*.f64 x.re x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))))) (*.f64 x.re x.re))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 y.re (*.f64 x.re x.re)))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))) (/.f64 y.re (*.f64 x.re x.re)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal 2 binary64) (log.f64 x.re))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal -2 binary64)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (pow.f64 x.re #s(literal -2 binary64)))))) |
#s(approx (* x.im x.im) (*.f64 x.im x.im)) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x.re x.re))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (*.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 y.im (*.f64 x.re x.re)))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 y.im (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))) (/.f64 y.im (*.f64 x.re x.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 #s(literal 2 binary64) (log.f64 x.re)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (*.f64 x.re x.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 x.re y.re)) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (pow.f64 x.re y.re))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -2 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.im)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (*.f64 #s(literal -2 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -2 binary64)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (*.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (fma.f64 #s(literal -2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (log.f64 (hypot.f64 x.im x.re)))))))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (log.f64 (hypot.f64 x.im x.re)))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))))) |
#s(approx y.re y.re) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (-.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/8 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/48 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)))))))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))))) |
#s(approx (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (*.f64 y.re (-.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/8 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/48 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))) |
#s(approx (* y.re 1/2) (*.f64 #s(literal 1/2 binary64) y.re)) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (neg y.re) (*.f64 #s(literal -1 binary64) y.re)) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(literal 1 binary64)) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re) (log.f64 (hypot.f64 x.im x.re))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re) (log.f64 (hypot.f64 x.im x.re))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re)))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) |
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (*.f64 y.re (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re)) (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re)) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) y.re)))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) y.re) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx y.im y.im) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re)))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im)) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (cos (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* y.im 1/2) (*.f64 #s(literal 1/2 binary64) y.im)) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re)))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 #s(literal -1/8 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) |
#s(approx (sin (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 3 binary64))))))))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (* (log (+ (* x.re x.re) (* x.im x.im))) y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (sin (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (* (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re))) |
#s(approx (* (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re))) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (sin (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)) y.im))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)) y.im)) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (*.f64 #s(literal -1/2 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.im)))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (fma.f64 #s(literal -1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im)) (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (log.f64 (hypot.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (+ (* (* y.re (log (+ (* x.re x.re) (* x.im x.im)))) 1/2) (* (neg y.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)) y.im) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (* y.im 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal -1/2 binary64))))))) |
#s(approx (- (* (* y.re 1/2) (log (+ (* x.re x.re) (* x.im x.im)))) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (log (+ (* x.re x.re) (* x.im x.im))) y.im)) (+ (* (neg y.re) (atan2 x.im x.re)) (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) y.im) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) y.im)))))) |
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))) |
#s(approx (+ (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re))) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) #s(literal -1 binary64))))))) |
#s(approx (neg (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (log.f64 (pow.f64 (hypot.f64 x.im x.re) #s(literal -1 binary64))))))) |