math.log10 on complex, real part

Time bar (total: 9.1s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze152.0ms (1.7%)

Memory
-11.9MiB live, 133.9MiB allocated; 26ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
0%0%99.9%0.1%0%0%0%3
0%0%99.9%0.1%0%0%0%4
18.8%18.7%81.2%0.1%0%0%0%5
34.4%34.3%65.6%0.1%0%0%0%6
54.7%54.6%45.3%0.1%0%0%0%7
64.8%64.8%35.1%0.1%0%0%0%8
76.2%76.1%23.8%0.1%0%0%0%9
81.8%81.8%18.1%0.1%0%0%0%10
87.8%87.7%12.2%0.1%0%0%0%11
90.8%90.7%9.2%0.1%0%0%0%12
Compiler

Compiled 14 to 9 computations (35.7% saved)

sample2.0s (21.7%)

Memory
26.9MiB live, 1 633.7MiB allocated; 520ms collecting garbage
Samples
1.3s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 742.0ms
ival-hypot: 310.0ms (41.8% of total)
ival-log: 294.0ms (39.6% of total)
ival-div: 122.0ms (16.4% of total)
exact: 10.0ms (1.3% of total)
ival-assert: 4.0ms (0.5% of total)
adjust: 3.0ms (0.4% of total)
Bogosity

explain251.0ms (2.8%)

Memory
-9.3MiB live, 285.8MiB allocated; 57ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1310-0-(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
00-0-(log.f64 #s(literal 10 binary64))
00-0-(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
00-0-(*.f64 re re)
00-0-im
00-0-(+.f64 (*.f64 re re) (*.f64 im im))
00-0-re
00-0-(*.f64 im im)
00-0-#s(literal 10 binary64)
00-0-(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sqrt.f64(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))oflow-rescue1160
↳(+.f64 (*.f64 re re) (*.f64 im im))overflow116
↳(*.f64 re re)overflow66
↳(*.f64 im im)overflow67
sqrt.f64(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))uflow-rescue150
↳(+.f64 (*.f64 re re) (*.f64 im im))underflow15
↳(*.f64 re re)underflow60
↳(*.f64 im im)underflow61
Confusion
Predicted +Predicted -
+1310
-0125
Precision
1.0
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+13100
-00125
Precision?
1.0
Recall?
1.0
Freqs
test
numberfreq
0125
1131
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
87.0ms512×0valid
Compiler

Compiled 110 to 34 computations (69.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 56.0ms
ival-log: 18.0ms (32.2% of total)
ival-hypot: 15.0ms (26.8% of total)
ival-mult: 11.0ms (19.6% of total)
ival-div: 5.0ms (8.9% of total)
ival-add: 4.0ms (7.1% of total)
ival-assert: 1.0ms (1.8% of total)
ival-true: 1.0ms (1.8% of total)
exact: 1.0ms (1.8% of total)
adjust: 0.0ms (0% of total)

preprocess36.0ms (0.4%)

Memory
17.8MiB live, 53.6MiB allocated; 15ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02874
16074
211074
313574
417374
01012
01712
12812
26712
312412
416112
01617
Stop Event
1×iter limit
1×saturated
1×iter limit
1×saturated
Calls
Call 1
Inputs
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
Outputs
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))
Symmetry

(abs re)

(abs im)

(sort re im)

Compiler

Compiled 12 to 10 computations (16.7% saved)

eval0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler

Compiled 0 to 2 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.6MiB live, 1.6MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶50.1%
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
Compiler

Compiled 12 to 10 computations (16.7% saved)

series34.0ms (0.4%)

Memory
5.7MiB live, 47.5MiB allocated; 12ms collecting garbage
Counts
10 → 79
Calls
Call 1
Inputs
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(+.f64 (*.f64 re re) (*.f64 im im))
(*.f64 re re)
re
(*.f64 im im)
im
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
Outputs
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log im) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx re #s(hole binary64 re))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log re) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx im #s(hole binary64 im))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
Calls

6 calls:

TimeVariablePointExpression
11.0ms
im
@inf
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* re re) re (* im im) im (log 10) 10)
5.0ms
im
@0
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* re re) re (* im im) im (log 10) 10)
5.0ms
re
@inf
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* re re) re (* im im) im (log 10) 10)
5.0ms
re
@0
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* re re) re (* im im) im (log 10) 10)
3.0ms
re
@-inf
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* re re) re (* im im) im (log 10) 10)

rewrite737.0ms (8.1%)

Memory
41.5MiB live, 402.2MiB allocated; 263ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03602530
03712390
120122358
096231900
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
89 → 221
Calls
Call 1
Inputs
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(+.f64 (*.f64 re re) (*.f64 im im))
(*.f64 re re)
re
(*.f64 im im)
im
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log im) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx re #s(hole binary64 re))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log re) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx im #s(hole binary64 im))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
Outputs
(/.f64 (neg.f64 (neg.f64 (log.f64 (hypot.f64 im re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re))))
(log.f64 (hypot.f64 im re))
(pow.f64 (hypot.f64 im re) #s(literal 1 binary64))
(pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(/.f64 (hypot.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(sqrt.f64 (fma.f64 im im (*.f64 re re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) re)
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) re)
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) im)
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) im)
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) re)
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) im)
(hypot.f64 (neg.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) (fabs.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) (fabs.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (fabs.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (neg.f64 re))
(hypot.f64 (fabs.f64 im) (fabs.f64 re))
(hypot.f64 (fabs.f64 im) re)
(hypot.f64 (fabs.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (neg.f64 im))
(hypot.f64 (fabs.f64 re) (fabs.f64 im))
(hypot.f64 (fabs.f64 re) im)
(hypot.f64 im (neg.f64 (neg.f64 re)))
(hypot.f64 im (neg.f64 (fabs.f64 re)))
(hypot.f64 im (fabs.f64 (fabs.f64 re)))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im (fabs.f64 re))
(hypot.f64 im re)
(hypot.f64 re (neg.f64 (neg.f64 im)))
(hypot.f64 re (neg.f64 (fabs.f64 im)))
(hypot.f64 re (fabs.f64 (fabs.f64 im)))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re (fabs.f64 im))
(hypot.f64 re im)
(exp.f64 (*.f64 (log.f64 (fma.f64 im im (*.f64 re re))) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (neg.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (-.f64 (*.f64 im im) (*.f64 re re)))
(/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 im im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 re re))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 im im))
(-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (*.f64 re re) (*.f64 im im))))
(-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (*.f64 im im) (*.f64 re re))))
(-.f64 (*.f64 re re) (*.f64 (neg.f64 im) im))
(+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(+.f64 (*.f64 im im) (*.f64 re re))
(+.f64 (*.f64 re re) (*.f64 im im))
(*.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)))
(*.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 re re)
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (fabs.f64 re) #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1 binary64))
(pow.f64 re #s(literal 2 binary64))
(fabs.f64 (*.f64 re re))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 re) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 re) #s(literal 2 binary64))))
re
(*.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)))
(*.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)))
(*.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)))
(*.f64 (neg.f64 im) (neg.f64 im))
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 im im)
(pow.f64 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 (fabs.f64 im) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 im #s(literal 2 binary64))
(fabs.f64 (*.f64 im im))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 im) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 im) #s(literal 2 binary64))))
im
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (pow.f64 im #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal -4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 re re) (*.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (pow.f64 im #s(literal -2 binary64)))) (*.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 im))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 re re) (log.f64 im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re) (log.f64 im)))
#s(approx (sqrt (+ (* re re) (* im im))) im)
#s(approx (sqrt (+ (* re re) (* im im))) (fma.f64 (/.f64 (*.f64 re re) im) #s(literal 1/2 binary64) im))
#s(approx (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re) im))
#s(approx (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 5 binary64))) #s(literal 1/16 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal -3 binary64)))) (*.f64 re re) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re) im))
#s(approx (+ (* re re) (* im im)) (*.f64 im im))
#s(approx (+ (* re re) (* im im)) (fma.f64 im im (*.f64 re re)))
#s(approx (* re re) (*.f64 re re))
#s(approx re re)
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (+.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 #s(literal 1/720 binary64) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (+.f64 (log.f64 re) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (+.f64 (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (/.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* re re) (* im im))) re)
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) #s(literal 1 binary64)) re))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 1 binary64)) re))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) #s(literal 1 binary64)) re))
#s(approx (+ (* re re) (* im im)) (*.f64 re re))
#s(approx (+ (* re re) (* im im)) (*.f64 (fma.f64 (/.f64 im re) (/.f64 im re) #s(literal 1 binary64)) (*.f64 re re)))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (neg.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (neg.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 #s(literal 1/720 binary64) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (/.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (neg.f64 re) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (neg.f64 re) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (neg.f64 re) (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) #s(literal 1 binary64))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (pow.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal -4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 im im) (*.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (pow.f64 re #s(literal -2 binary64)))) (*.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (fma.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 im im) (log.f64 re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (*.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 im im) (log.f64 re)))
#s(approx (sqrt (+ (* re re) (* im im))) (fma.f64 (/.f64 (*.f64 im im) re) #s(literal 1/2 binary64) re))
#s(approx (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im im) re))
#s(approx (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 5 binary64))) #s(literal 1/16 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 im im) (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im im) re))
#s(approx (* im im) (*.f64 im im))
#s(approx im im)
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (+.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))))) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 im))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (log.f64 im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (/.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 im #s(literal 6 binary64))))) (log.f64 im)))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) #s(literal 1 binary64)) im))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 1 binary64)) im))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64))))) #s(literal 1 binary64)) im))
#s(approx (+ (* re re) (* im im)) (*.f64 (fma.f64 (/.f64 re im) (/.f64 re im) #s(literal 1 binary64)) (*.f64 im im)))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (neg.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (neg.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (fma.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (/.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (neg.f64 im) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (neg.f64 im) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (neg.f64 im) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64))))) #s(literal 1 binary64))))

eval72.0ms (0.8%)

Memory
-11.0MiB live, 86.7MiB allocated; 49ms collecting garbage
Compiler

Compiled 4 158 to 936 computations (77.5% saved)

prune10.0ms (0.1%)

Memory
23.7MiB live, 23.7MiB allocated; 0ms collecting garbage
Pruning

4 alts after pruning (4 fresh and 0 done)

PrunedKeptTotal
New2134217
Fresh000
Picked101
Done000
Total2144218
Accuracy
99.8%
Counts
218 → 4
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶50.1%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
▶99.0%
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
▶99.1%
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
▶98.5%
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
Compiler

Compiled 41 to 36 computations (12.2% saved)

series49.0ms (0.5%)

Memory
-10.6MiB live, 84.1MiB allocated; 9ms collecting garbage
Counts
22 → 244
Calls
Call 1
Inputs
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
#s(approx (sqrt (+ (* re re) (* im im))) im)
im
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
(log.f64 (hypot.f64 re im))
(hypot.f64 re im)
re
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 (hypot.f64 im re)))
(log.f64 (hypot.f64 im re))
(hypot.f64 im re)
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re))))
#s(literal 1/2 binary64)
(log.f64 (fma.f64 im im (*.f64 re re)))
(fma.f64 im im (*.f64 re re))
(*.f64 re re)
Outputs
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log im) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx re #s(hole binary64 re))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow re 2) (- (* 1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))) (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))) (log im))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 im))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* 1/2 (/ (log (pow im 2)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow im 2)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow im 2)) (log 10))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow im 2)) (log 10))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* 1/2 (log (pow im 2)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow im 2))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ 1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow im 4) (pow re 4))) (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 re))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/6 (/ (pow im 6) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/6 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 re)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* 1/3 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ -1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow im 4) (pow re 4))) (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/6 (/ (pow im 6) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/6 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 re)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* 1/3 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log re) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx im #s(hole binary64 im))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log re) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow im 2) (- (* 1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))) (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))) (log re))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* 1/2 (/ (log (pow re 2)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow re 2)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow re 2)) (log 10))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow re 2)) (log 10))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* 1/2 (log (pow re 2)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow re 2))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ 1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow re 4) (pow im 4))) (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/6 (/ (pow re 6) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/6 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (+ (* 1/3 (/ (pow re 6) (pow im 6))) (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ -1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow re 4) (pow im 4))) (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/6 (/ (pow re 6) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/6 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 im)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (+ (* 1/3 (/ (pow re 6) (pow im 6))) (/ (pow re 2) (pow im 2)))))))
Calls

6 calls:

TimeVariablePointExpression
9.0ms
re
@0
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))
8.0ms
re
@-inf
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))
8.0ms
im
@0
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))
6.0ms
re
@inf
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))
6.0ms
im
@inf
((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))

rewrite633.0ms (7%)

Memory
-7.3MiB live, 395.3MiB allocated; 300ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07637339
07866597
141086445
096406163
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
266 → 368
Calls
Call 1
Inputs
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
#s(approx (sqrt (+ (* re re) (* im im))) im)
im
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
(log.f64 (hypot.f64 re im))
(hypot.f64 re im)
re
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 (hypot.f64 im re)))
(log.f64 (hypot.f64 im re))
(hypot.f64 im re)
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re))))
#s(literal 1/2 binary64)
(log.f64 (fma.f64 im im (*.f64 re re)))
(fma.f64 im im (*.f64 re re))
(*.f64 re re)
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log im) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx re #s(hole binary64 re))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow re 2) (- (* 1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))) (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))) (log im))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 im))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* 1/2 (/ (log (pow im 2)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow im 2)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow im 2)) (log 10))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow im 2)) (log 10))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* 1/2 (log (pow im 2)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow im 2))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ 1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow im 4) (pow re 4))) (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 re))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/6 (/ (pow im 6) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/6 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 re)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* 1/3 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ -1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow im 4) (pow re 4))) (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/6 (/ (pow im 6) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/6 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 re)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* 1/3 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log re) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx im #s(hole binary64 im))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log re) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow im 2) (- (* 1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))) (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))) (log re))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* 1/2 (/ (log (pow re 2)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow re 2)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow re 2)) (log 10))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (log (pow re 2)) (log 10))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* 1/2 (log (pow re 2)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow re 2))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ 1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow re 4) (pow im 4))) (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/6 (/ (pow re 6) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/6 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (+ (* 1/3 (/ (pow re 6) (pow im 6))) (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ -1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow re 4) (pow im 4))) (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/6 (/ (pow re 6) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/6 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 im)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (+ (* 1/3 (/ (pow re 6) (pow im 6))) (/ (pow re 2) (pow im 2)))))))
Outputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im)) (log.f64 #s(literal 10 binary64)))
(log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))
#s(approx (sqrt (+ (* im im) (* re re))) im)
im
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 im im (*.f64 re re))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 1/10 binary64))))
(*.f64 (log.f64 (fma.f64 im im (*.f64 re re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re))))
(neg.f64 (neg.f64 (log.f64 (hypot.f64 im re))))
(log.f64 (hypot.f64 im re))
(pow.f64 (hypot.f64 im re) #s(literal 1 binary64))
(pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(/.f64 (hypot.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (hypot.f64 im re) #s(literal -1 binary64)))
(sqrt.f64 (fma.f64 im im (*.f64 re re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) re)
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) im)
(hypot.f64 (neg.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 im (neg.f64 (neg.f64 re)))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im re)
(hypot.f64 re (neg.f64 (neg.f64 im)))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re im)
(exp.f64 (log.f64 (hypot.f64 im re)))
re
(*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 im im (*.f64 re re))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 1/10 binary64))))
(neg.f64 (log.f64 (hypot.f64 im re)))
(-.f64 #s(literal 0 binary64) (log.f64 (hypot.f64 im re)))
(log.f64 (pow.f64 (hypot.f64 im re) #s(literal -1 binary64)))
(*.f64 (log.f64 (fma.f64 im im (*.f64 re re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re))))
(neg.f64 (neg.f64 (log.f64 (hypot.f64 im re))))
(log.f64 (hypot.f64 im re))
(pow.f64 (hypot.f64 im re) #s(literal 1 binary64))
(pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(/.f64 (hypot.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (hypot.f64 im re) #s(literal -1 binary64)))
(sqrt.f64 (fma.f64 im im (*.f64 re re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) re)
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) im)
(hypot.f64 (neg.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 im (neg.f64 (neg.f64 re)))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im re)
(hypot.f64 re (neg.f64 (neg.f64 im)))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re im)
(exp.f64 (log.f64 (hypot.f64 im re)))
(neg.f64 (log.f64 #s(literal 10 binary64)))
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 im im (*.f64 re re))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 1/10 binary64))))
(*.f64 (log.f64 (fma.f64 im im (*.f64 re re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re))))
(neg.f64 (neg.f64 (log.f64 (hypot.f64 im re))))
(log.f64 (hypot.f64 im re))
#s(literal 1/2 binary64)
(-.f64 (log.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(-.f64 (log.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(log.f64 (fma.f64 im im (*.f64 re re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (-.f64 (*.f64 im im) (*.f64 re re)))
(/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 im im))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 im im))
(-.f64 (*.f64 im im) (*.f64 (neg.f64 re) re))
(-.f64 (*.f64 re re) (*.f64 (neg.f64 im) im))
(+.f64 (*.f64 im im) (*.f64 re re))
(+.f64 (*.f64 re re) (*.f64 im im))
(*.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 re re)
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (pow.f64 re #s(literal -1 binary64)) #s(literal -2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1 binary64))
(pow.f64 re #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 re #s(literal -1 binary64)) #s(literal 2 binary64)))
(fabs.f64 (*.f64 re re))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 re) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 re) #s(literal 2 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal -4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 re re) (*.f64 (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))) (*.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 im))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 re re) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re) (log.f64 im)))
#s(approx (sqrt (+ (* im im) (* re re))) im)
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 (*.f64 re re) im) #s(literal 1/2 binary64) im))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re) im))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 5 binary64))) #s(literal 1/16 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal -3 binary64)))) (*.f64 re re) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re) im))
#s(approx re re)
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (/.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal -4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 re re)) (*.f64 (log.f64 #s(literal 1/10 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 re re) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) (*.f64 im im)) (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -2 binary64)))) (*.f64 re re)) (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 (pow.f64 im #s(literal -4 binary64)) #s(literal 1/4 binary64))) (*.f64 re re) (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -2 binary64)))) (*.f64 re re)) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 im))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 re re) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re) (log.f64 im)))
#s(approx (sqrt (+ (* im im) (* re re))) im)
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 (*.f64 re re) im) #s(literal 1/2 binary64) im))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re) im))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 5 binary64))) #s(literal 1/16 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal -3 binary64)))) (*.f64 re re) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re) im))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal -4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 re re) (*.f64 (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))) (*.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 im))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 re re) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re) (log.f64 im)))
#s(approx (log (+ (* im im) (* re re))) (*.f64 #s(literal 2 binary64) (log.f64 im)))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal 2 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (+ (* im im) (* re re)) (*.f64 im im))
#s(approx (+ (* im im) (* re re)) (fma.f64 im im (*.f64 re re)))
#s(approx (* re re) (*.f64 re re))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 re))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (sqrt (+ (* im im) (* re re))) re)
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) #s(literal 1 binary64)) re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) #s(literal 1 binary64)) re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))) #s(literal 1 binary64)) re))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) (*.f64 re re)) (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (log.f64 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 re #s(literal 6 binary64))) (log.f64 re)) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 re))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (sqrt (+ (* im im) (* re re))) re)
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) #s(literal 1 binary64)) re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) #s(literal 1 binary64)) re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))) #s(literal 1 binary64)) re))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 re))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 re) #s(literal 2 binary64)))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 re) #s(literal 2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 re) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 re) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (+ (* im im) (* re re)) (*.f64 re re))
#s(approx (+ (* im im) (* re re)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1 binary64)) (*.f64 re re)))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))) #s(literal 1 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -1/2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))) #s(literal 1 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal -4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 im im) (*.f64 (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))) (*.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 re))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 im im) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (*.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 im im) (log.f64 re)))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 (*.f64 im im) re) #s(literal 1/2 binary64) re))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im im) re))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 5 binary64))) #s(literal 1/16 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 im im) (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im im) re))
#s(approx im im)
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (/.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal -4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 im im)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) (*.f64 re re)) (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal -2 binary64)))) (*.f64 im im)) (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (pow.f64 re #s(literal -4 binary64)) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 im im)) (pow.f64 re #s(literal 6 binary64)))) (*.f64 im im) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal -2 binary64)))) (*.f64 im im)) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 re))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 im im) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (*.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 im im) (log.f64 re)))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 (*.f64 im im) re) #s(literal 1/2 binary64) re))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im im) re))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 5 binary64))) #s(literal 1/16 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 im im) (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im im) re))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal -4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 im im) (*.f64 (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))) (*.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 re))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 im im) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (*.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 im im) (log.f64 re)))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 re) #s(literal 2 binary64)))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 re) #s(literal 2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (pow.f64 re #s(literal -2 binary64))) (*.f64 im im) (*.f64 (log.f64 re) #s(literal 2 binary64))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (pow.f64 re #s(literal -2 binary64))) (*.f64 im im) (*.f64 (log.f64 re) #s(literal 2 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))))) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 im))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) (log.f64 im)))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) #s(literal 1 binary64)) im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) #s(literal 1 binary64)) im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) #s(literal 1 binary64)) im))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) (*.f64 im im)) (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (log.f64 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 im #s(literal 6 binary64))) (log.f64 im)) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 im))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) (log.f64 im)))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) #s(literal 1 binary64)) im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) #s(literal 1 binary64)) im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) #s(literal 1 binary64)) im))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))))) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 im))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) (log.f64 im)))
#s(approx (log (+ (* im im) (* re re))) (*.f64 #s(literal 2 binary64) (log.f64 im)))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal 2 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal 2 binary64) (log.f64 im) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal 2 binary64) (log.f64 im) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))))
#s(approx (+ (* im im) (* re re)) (*.f64 (+.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1 binary64)) (*.f64 im im)))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) #s(literal 1 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal 1 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) #s(literal 1 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64)))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))))

eval197.0ms (2.2%)

Memory
-35.7MiB live, 62.8MiB allocated; 19ms collecting garbage
Compiler

Compiled 6 013 to 962 computations (84% saved)

prune15.0ms (0.2%)

Memory
29.3MiB live, 29.2MiB allocated; 0ms collecting garbage
Pruning

7 alts after pruning (3 fresh and 4 done)

PrunedKeptTotal
New2313234
Fresh000
Picked044
Done000
Total2317238
Accuracy
99.8%
Counts
238 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶15.7%
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (log.f64 #s(literal 10 binary64)))
▶49.9%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
✓50.1%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
✓99.0%
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
▶98.3%
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
✓99.1%
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
✓98.5%
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
Compiler

Compiled 97 to 81 computations (16.5% saved)

series1.4s (15.3%)

Memory
-118.4MiB live, 547.4MiB allocated; 1.7s collecting garbage
Counts
34 → 321
Calls
Call 1
Inputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im)))
(log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))
#s(approx (sqrt (+ (* im im) (* re re))) im)
im
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re))))
#s(literal 1/2 binary64)
(log.f64 (fma.f64 im im (*.f64 re re)))
(fma.f64 im im (*.f64 re re))
(*.f64 re re)
re
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))
(-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))
(pow.f64 re #s(literal 6 binary64))
#s(literal 6 binary64)
(pow.f64 im #s(literal 6 binary64))
(log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(pow.f64 re #s(literal 4 binary64))
#s(literal 4 binary64)
(-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(pow.f64 im #s(literal 4 binary64))
(pow.f64 (*.f64 re im) #s(literal 2 binary64))
(*.f64 re im)
#s(literal 2 binary64)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
Outputs
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow re 2) (- (* 1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))) (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))) (log im))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 im))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* 1/2 (log (pow im 2)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow im 2))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx re #s(hole binary64 re))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* -1/2 (/ (pow re 6) (pow im 12))) (/ 1 (pow im 6)))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* (pow re 6) (- (* 1/3 (/ (pow re 6) (pow im 18))) (* 1/2 (/ 1 (pow im 12))))) (/ 1 (pow im 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (pow im 6)))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (+ (pow im 6) (pow re 6))))
#s(approx (pow re 6) #s(hole binary64 (pow re 6)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (pow im 4)))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (pow re 4) #s(hole binary64 (pow re 4)))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (pow im 4)))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (pow (* re im) 2) #s(hole binary64 (* (pow im 2) (pow re 2))))
#s(approx (* re im) #s(hole binary64 (* im re)))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ 1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow im 4) (pow re 4))) (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 re))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/6 (/ (pow im 6) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/6 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 re)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* 1/3 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow im 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 10)))) (pow re 6))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (pow re 6)))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (* (pow re 6) (+ 1 (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (pow re 4)))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow re 2) (- (/ (pow im 4) (pow re 2)) (pow im 2)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ -1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow im 4) (pow re 4))) (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/6 (/ (pow im 6) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/6 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 re)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* 1/3 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow im 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 10)))) (pow re 6))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log re) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow im 2) (- (* 1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))) (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))) (log re))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx im #s(hole binary64 im))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow re 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* 1/2 (log (pow re 2)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow re 2))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* -1/2 (/ (pow im 6) (pow re 12))) (/ 1 (pow re 6)))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* (pow im 6) (- (* 1/3 (/ (pow im 6) (pow re 18))) (* 1/2 (/ 1 (pow re 12))))) (/ 1 (pow re 6)))))))
#s(approx (pow im 6) #s(hole binary64 (pow im 6)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 2) (- (pow im 2) (pow re 2)))))
#s(approx (pow im 4) #s(hole binary64 (pow im 4)))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ 1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow re 4) (pow im 4))) (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/6 (/ (pow re 6) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/6 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (+ (* 1/3 (/ (pow re 6) (pow im 6))) (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow re 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 10)))) (pow im 6))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (* (pow im 6) (+ 1 (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ -1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow re 4) (pow im 4))) (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/6 (/ (pow re 6) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/6 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 im)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (+ (* 1/3 (/ (pow re 6) (pow im 6))) (/ (pow re 2) (pow im 2)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow re 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 10)))) (pow im 6))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
Calls

6 calls:

TimeVariablePointExpression
1.1s
im
@0
((/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) im (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re) re (neg (log 1/10)) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) 6 (pow im 6) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (pow re 4) 4 (- (pow im 4) (pow (* re im) 2)) (pow im 4) (pow (* re im) 2) (* re im) 2 (log 10) 10)
79.0ms
re
@0
((/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) im (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re) re (neg (log 1/10)) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) 6 (pow im 6) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (pow re 4) 4 (- (pow im 4) (pow (* re im) 2)) (pow im 4) (pow (* re im) 2) (* re im) 2 (log 10) 10)
53.0ms
re
@inf
((/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) im (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re) re (neg (log 1/10)) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) 6 (pow im 6) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (pow re 4) 4 (- (pow im 4) (pow (* re im) 2)) (pow im 4) (pow (* re im) 2) (* re im) 2 (log 10) 10)
38.0ms
im
@inf
((/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) im (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re) re (neg (log 1/10)) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) 6 (pow im 6) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (pow re 4) 4 (- (pow im 4) (pow (* re im) 2)) (pow im 4) (pow (* re im) 2) (* re im) 2 (log 10) 10)
34.0ms
re
@-inf
((/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) im (log 1/10) 1/10 (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) 1/2 (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re) re (neg (log 1/10)) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) 6 (pow im 6) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (pow re 4) 4 (- (pow im 4) (pow (* re im) 2)) (pow im 4) (pow (* re im) 2) (* re im) 2 (log 10) 10)

rewrite554.0ms (6.1%)

Memory
26.5MiB live, 343.9MiB allocated; 120ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0112312460
0116311251
1669111251
0817010301
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
355 → 436
Calls
Call 1
Inputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im)))
(log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))
#s(approx (sqrt (+ (* im im) (* re re))) im)
im
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re))))
#s(literal 1/2 binary64)
(log.f64 (fma.f64 im im (*.f64 re re)))
(fma.f64 im im (*.f64 re re))
(*.f64 re re)
re
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))
(-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))
(pow.f64 re #s(literal 6 binary64))
#s(literal 6 binary64)
(pow.f64 im #s(literal 6 binary64))
(log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(pow.f64 re #s(literal 4 binary64))
#s(literal 4 binary64)
(-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(pow.f64 im #s(literal 4 binary64))
(pow.f64 (*.f64 re im) #s(literal 2 binary64))
(*.f64 re im)
#s(literal 2 binary64)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow re 2) (- (* 1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))) (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))) (log im))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 im))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* 1/2 (log (pow im 2)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow im 2))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow im 2))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow im 2)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx re #s(hole binary64 re))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* -1/2 (/ (pow re 6) (pow im 12))) (/ 1 (pow im 6)))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* (pow re 6) (- (* 1/3 (/ (pow re 6) (pow im 18))) (* 1/2 (/ 1 (pow im 12))))) (/ 1 (pow im 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (pow im 6)))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (+ (pow im 6) (pow re 6))))
#s(approx (pow re 6) #s(hole binary64 (pow re 6)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (pow im 4)))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (pow re 4) #s(hole binary64 (pow re 4)))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (pow im 4)))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (pow (* re im) 2) #s(hole binary64 (* (pow im 2) (pow re 2))))
#s(approx (* re im) #s(hole binary64 (* im re)))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ 1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow im 4) (pow re 4))) (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 re))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/6 (/ (pow im 6) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/6 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 re)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* 1/3 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow im 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 10)))) (pow re 6))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (pow re 6)))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (* (pow re 6) (+ 1 (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (pow re 4)))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow re 2) (- (/ (pow im 4) (pow re 2)) (pow im 2)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ -1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow im 4) (pow re 4))) (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/6 (/ (pow im 6) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/6 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 re)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* 1/3 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow im 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 10)))) (pow re 6))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log re) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log re) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow im 2) (- (* 1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))) (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))) (log re))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx im #s(hole binary64 im))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow re 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* 1/2 (log (pow re 2)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* 1/2 (log (pow re 2))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow re 2))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (/ (pow im 2) (pow re 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (log (pow re 2)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* -1/2 (/ (pow im 6) (pow re 12))) (/ 1 (pow re 6)))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* (pow im 6) (- (* 1/3 (/ (pow im 6) (pow re 18))) (* 1/2 (/ 1 (pow re 12))))) (/ 1 (pow re 6)))))))
#s(approx (pow im 6) #s(hole binary64 (pow im 6)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 2) (- (pow im 2) (pow re 2)))))
#s(approx (pow im 4) #s(hole binary64 (pow im 4)))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ 1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow re 4) (pow im 4))) (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/6 (/ (pow re 6) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/6 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (+ (* 1/3 (/ (pow re 6) (pow im 6))) (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow re 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 10)))) (pow im 6))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (* (pow im 6) (+ 1 (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10))))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ -1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* 1/4 (/ (pow re 4) (pow im 4))) (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (* -1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/6 (/ (pow re 6) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/6 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 im)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (+ (* -2 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 4) (pow im 4))) (+ (* 1/3 (/ (pow re 6) (pow im 6))) (/ (pow re 2) (pow im 2)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow re 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 10)))) (pow im 6))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
Outputs
(/.f64 (neg.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (/.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im)) (log.f64 #s(literal 1/10 binary64))))
(neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im)))
(-.f64 #s(literal 0 binary64) (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im)))
(log.f64 (pow.f64 #s(approx (sqrt (+ (* im im) (* re re))) im) #s(literal -1 binary64)))
(log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))
#s(approx (sqrt (+ (* im im) (* re re))) im)
im
(neg.f64 (log.f64 #s(literal 10 binary64)))
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 re re (*.f64 im im))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (neg.f64 (log.f64 (hypot.f64 re im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 (hypot.f64 re im))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 1/10 binary64))))
(*.f64 (log.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im))))
(log.f64 (hypot.f64 re im))
#s(literal 1/2 binary64)
(-.f64 (log.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(log.f64 (fma.f64 re re (*.f64 im im)))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (-.f64 (*.f64 im im) (*.f64 re re)))
(/.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 im im))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 re re))
(fma.f64 re re (*.f64 im im))
(fma.f64 im im (*.f64 re re))
(-.f64 (*.f64 im im) (*.f64 (neg.f64 re) re))
(+.f64 (*.f64 im im) (*.f64 re re))
(+.f64 (*.f64 re re) (*.f64 im im))
(*.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 re re)
(pow.f64 re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 re) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 re) #s(literal 2 binary64))))
re
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(-.f64 #s(literal 0 binary64) (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 10 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (*.f64 (log.f64 (/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) #s(literal 1/2 binary64))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 (log.f64 (/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) #s(literal 1/2 binary64)) (log.f64 #s(literal 10 binary64)))
(*.f64 (log.f64 (/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(log.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 3 binary64))) (fma.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (fma.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))))
(-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(log.f64 (/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(-.f64 (log.f64 (-.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64)))) (log.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
(-.f64 (log.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64)))) (log.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
(-.f64 (log.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 12 binary64)) (-.f64 (pow.f64 re #s(literal 12 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
(-.f64 (log.f64 (+.f64 (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 12 binary64)) (-.f64 (pow.f64 im #s(literal 12 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
(log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(/.f64 (-.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 12 binary64)) (-.f64 (pow.f64 re #s(literal 12 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 12 binary64)) (-.f64 (pow.f64 im #s(literal 12 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64)))
(+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))
(+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))
(*.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))
(pow.f64 re #s(literal 6 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 6 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 re) #s(literal 6 binary64))) (sinh.f64 (*.f64 (log.f64 re) #s(literal 6 binary64))))
#s(literal 6 binary64)
(*.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))
(pow.f64 im #s(literal 6 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 im) #s(literal 6 binary64))) (sinh.f64 (*.f64 (log.f64 im) #s(literal 6 binary64))))
(-.f64 (log.f64 (-.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))) (log.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(-.f64 (log.f64 (+.f64 (pow.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)))) (log.f64 (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)) (-.f64 (*.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))))
(log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)) (-.f64 (*.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))
(fma.f64 (*.f64 re re) (*.f64 re re) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(-.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(*.f64 (*.f64 re re) (*.f64 re re))
(pow.f64 re #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 re) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 re) #s(literal 4 binary64))))
#s(literal 4 binary64)
(/.f64 (-.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)) (fma.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(*.f64 (*.f64 im im) (*.f64 im im))
(pow.f64 im #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 im) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 im) #s(literal 4 binary64))))
(*.f64 (pow.f64 (*.f64 re im) #s(literal 1 binary64)) (pow.f64 (*.f64 re im) #s(literal 1 binary64)))
(*.f64 (*.f64 re im) (*.f64 re im))
(*.f64 (*.f64 im im) (*.f64 re re))
(*.f64 (*.f64 re re) (*.f64 im im))
(pow.f64 (*.f64 re im) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 re im)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 re im)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 re im)) #s(literal 2 binary64))))
(*.f64 re im)
(*.f64 im re)
#s(literal 2 binary64)
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(-.f64 #s(literal 0 binary64) (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 re re) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal -4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 re re)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 re re) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 re re) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) (*.f64 im im)) (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -2 binary64)))) (*.f64 re re)) (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (pow.f64 im #s(literal -4 binary64)) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 re re)) (pow.f64 im #s(literal 6 binary64)))) (*.f64 re re) (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -2 binary64)))) (*.f64 re re)) (log.f64 im)))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (log.f64 im))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (log.f64 im)))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re) (log.f64 im)))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re) (log.f64 im)))
#s(approx (sqrt (+ (* im im) (* re re))) im)
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 (*.f64 re re) im) #s(literal 1/2 binary64) im))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re) im))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 5 binary64))) #s(literal 1/16 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal -3 binary64)))) (*.f64 re re) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re) im))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 im))) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 re re) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 im))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal -4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 re re)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 re re) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 re re) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 im))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 #s(literal 2 binary64) (log.f64 im)))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal 2 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (+ (* im im) (* re re)) (*.f64 im im))
#s(approx (+ (* im im) (* re re)) (fma.f64 re re (*.f64 im im)))
#s(approx (* re re) (*.f64 re re))
#s(approx re re)
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64))))) (*.f64 re re) (*.f64 (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (log.f64 #s(literal 10 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal -4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 re re) (*.f64 (/.f64 (pow.f64 im #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))) (*.f64 re re) (*.f64 (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (*.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 re re))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re) (*.f64 #s(literal 6 binary64) (log.f64 im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 re re) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re) (*.f64 #s(literal 6 binary64) (log.f64 im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (log (+ (pow re 6) (pow im 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 12 binary64))) #s(literal -1/2 binary64) (pow.f64 im #s(literal -6 binary64))) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 6 binary64) (log.f64 im))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 18 binary64))) #s(literal 1/3 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -12 binary64)))) (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal -6 binary64))) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 6 binary64) (log.f64 im))))
#s(approx (+ (pow re 6) (pow im 6)) (pow.f64 im #s(literal 6 binary64)))
#s(approx (+ (pow re 6) (pow im 6)) (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
#s(approx (pow re 6) (pow.f64 re #s(literal 6 binary64)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (*.f64 #s(literal 4 binary64) (log.f64 im)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (pow.f64 im #s(literal 4 binary64))) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 (pow.f64 im #s(literal -4 binary64)) #s(literal 1/2 binary64))) (*.f64 re re)) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (pow.f64 im #s(literal 4 binary64)))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (fma.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (fma.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re) (pow.f64 im #s(literal 4 binary64))))
#s(approx (pow re 4) (pow.f64 re #s(literal 4 binary64)))
#s(approx (- (pow im 4) (pow (* re im) 2)) (pow.f64 im #s(literal 4 binary64)))
#s(approx (- (pow im 4) (pow (* re im) 2)) (fma.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64))))
#s(approx (pow (* re im) 2) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
#s(approx (* re im) (*.f64 re im))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) (*.f64 re re)) (neg.f64 (neg.f64 (log.f64 re)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (log.f64 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (neg.f64 (log.f64 re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (neg.f64 (neg.f64 (log.f64 re))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (log.f64 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (neg.f64 (log.f64 re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (neg.f64 (log.f64 re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (sqrt (+ (* im im) (* re re))) re)
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) #s(literal 1 binary64)) re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) #s(literal 1 binary64)) re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))) #s(literal 1 binary64)) re))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (neg.f64 (neg.f64 (log.f64 re))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (log.f64 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (neg.f64 (log.f64 re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (neg.f64 (log.f64 re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re)) (/.f64 (*.f64 im im) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re)) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re)) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (+ (* im im) (* re re)) (*.f64 re re))
#s(approx (+ (* im im) (* re re)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1 binary64)) (*.f64 re re)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re))) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/48 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re))) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/48 binary64) (fma.f64 (/.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64)) (log.f64 #s(literal 10 binary64)))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 10 binary64))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re))) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re)) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re)) (/.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 re #s(literal 4 binary64)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/48 binary64) (fma.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 im im) (*.f64 re re)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (-.f64 (/.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re re)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -1 binary64) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (fma.f64 (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (fma.f64 (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) #s(literal 1/3 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (+ (pow re 6) (pow im 6)) (pow.f64 re #s(literal 6 binary64)))
#s(approx (+ (pow re 6) (pow im 6)) (*.f64 (+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1 binary64)) (pow.f64 re #s(literal 6 binary64))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -1 binary64) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (pow.f64 re #s(literal 4 binary64)))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (*.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 im im) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (neg.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (*.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 re re)) (*.f64 im im)) (*.f64 re re)))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -1/2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 re))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 re) (+.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))) #s(literal 1 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64))) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/48 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64))) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/48 binary64) (fma.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64)) (log.f64 #s(literal 10 binary64)))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 10 binary64))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 re #s(literal 4 binary64)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/48 binary64) (fma.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 im im) (*.f64 re re)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -2 binary64))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64) (-.f64 (/.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re re)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64) (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -1 binary64) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) #s(literal 1/3 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -1 binary64) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal -4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 im im)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) (*.f64 re re)) (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal -2 binary64)))) (*.f64 im im)) (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (pow.f64 re #s(literal -4 binary64)) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 im im)) (pow.f64 re #s(literal 6 binary64)))) (*.f64 im im) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal -2 binary64)))) (*.f64 im im)) (log.f64 re)))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (log.f64 re))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1/2 binary64) (log.f64 re)))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 im im) (log.f64 re)))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (*.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 im im) (log.f64 re)))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 (*.f64 im im) re) #s(literal 1/2 binary64) re))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im im) re))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 5 binary64))) #s(literal 1/16 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 im im) (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im im) re))
#s(approx im im)
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 re))) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) (log.f64 #s(literal 1/10 binary64))) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 re))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal -4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 im im)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 re))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (log.f64 re) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 im im))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (*.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 #s(literal 2 binary64) (log.f64 re)))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 #s(literal 2 binary64) (log.f64 re) (/.f64 (*.f64 im im) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (pow.f64 re #s(literal -2 binary64))) (*.f64 im im) (*.f64 #s(literal 2 binary64) (log.f64 re))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (pow.f64 re #s(literal -2 binary64))) (*.f64 im im) (*.f64 #s(literal 2 binary64) (log.f64 re))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 re #s(literal 4 binary64))))) (*.f64 im im) (*.f64 (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) (log.f64 #s(literal 10 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal -4 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 im im) (*.f64 (/.f64 (pow.f64 re #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))) (*.f64 im im) (*.f64 (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 im im))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (*.f64 (pow.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 im im))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 re) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (pow.f64 re #s(literal -2 binary64))) (*.f64 im im) (*.f64 #s(literal 6 binary64) (log.f64 re))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 im im) (pow.f64 re #s(literal -2 binary64))) (*.f64 im im) (*.f64 #s(literal 6 binary64) (log.f64 re))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (log (+ (pow re 6) (pow im 6))) (*.f64 #s(literal 6 binary64) (log.f64 re)))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal 6 binary64) (log.f64 re) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 12 binary64))) #s(literal -1/2 binary64) (pow.f64 re #s(literal -6 binary64))) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 6 binary64) (log.f64 re))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 18 binary64))) #s(literal 1/3 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal -12 binary64)))) (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal -6 binary64))) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 6 binary64) (log.f64 re))))
#s(approx (pow im 6) (pow.f64 im #s(literal 6 binary64)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (*.f64 #s(literal 4 binary64) (log.f64 re)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal -2 binary64))) (*.f64 im im) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (-.f64 (*.f64 (fma.f64 (pow.f64 re #s(literal -4 binary64)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 im im)) (pow.f64 re #s(literal 6 binary64)))) (*.f64 im im)) (pow.f64 re #s(literal -2 binary64))) (*.f64 im im) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (fma.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (fma.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (*.f64 im im) (pow.f64 re #s(literal 4 binary64))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (*.f64 im im)))
#s(approx (pow im 4) (pow.f64 im #s(literal 4 binary64)))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) (*.f64 im im)) (neg.f64 (neg.f64 (log.f64 im)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (log.f64 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 im #s(literal 6 binary64))) (neg.f64 (neg.f64 (log.f64 im)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (neg.f64 (neg.f64 (log.f64 im))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (log.f64 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) #s(literal 1 binary64)) im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) #s(literal 1 binary64)) im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) #s(literal 1 binary64)) im))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (neg.f64 (neg.f64 (log.f64 im))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (log.f64 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64)))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))))
#s(approx (+ (* im im) (* re re)) (*.f64 (+.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1 binary64)) (*.f64 im im)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 (/.f64 (*.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/48 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/48 binary64) (fma.f64 (/.f64 (*.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64)) (log.f64 #s(literal 10 binary64)))) (pow.f64 im #s(literal 6 binary64))) (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 10 binary64))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 (*.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/48 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/48 binary64) (fma.f64 (*.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64))) (pow.f64 im #s(literal 6 binary64))) (/.f64 (*.f64 re re) (*.f64 im im)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (*.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64)))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (neg.f64 (log.f64 im)) #s(literal -4 binary64))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/24 binary64) (*.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -4 binary64) (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 480 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (*.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64)))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) #s(literal 1/3 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (+ (pow re 6) (pow im 6)) (*.f64 (+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1 binary64)) (pow.f64 im #s(literal 6 binary64))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (*.f64 (neg.f64 (log.f64 im)) #s(literal -4 binary64)))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -4 binary64) (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/24 binary64) (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 480 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (*.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (*.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/720 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal -1/2 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal 1 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 im))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 (neg.f64 im) (+.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) #s(literal 1 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) #s(literal 1/4 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64))) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/48 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64))) (log.f64 #s(literal 10 binary64))) (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/48 binary64) (fma.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64)) (log.f64 #s(literal 10 binary64)))) (pow.f64 im #s(literal 6 binary64))) (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (log.f64 #s(literal 10 binary64))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/48 binary64) (fma.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 480 binary64)) #s(literal 1/720 binary64))) (pow.f64 im #s(literal 6 binary64))) (/.f64 (*.f64 re re) (*.f64 im im)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -2 binary64))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64) (-.f64 (/.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64) (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64) (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 480 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) #s(literal 1/3 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64) (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im)))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/24 binary64) (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im))))))
#s(approx (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 480 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64))) (pow.f64 im #s(literal 4 binary64)))))))

eval94.0ms (1%)

Memory
3.5MiB live, 106.2MiB allocated; 44ms collecting garbage
Compiler

Compiled 15 842 to 2 070 computations (86.9% saved)

prune25.0ms (0.3%)

Memory
-7.2MiB live, 39.2MiB allocated; 8ms collecting garbage
Pruning

10 alts after pruning (4 fresh and 6 done)

PrunedKeptTotal
New4224426
Fresh000
Picked123
Done044
Total42310433
Accuracy
99.8%
Counts
433 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶9.4%
(/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))) (log.f64 #s(literal 10 binary64)))
▶15.7%
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
✓49.9%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
✓50.1%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
▶86.3%
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
✓99.0%
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
✓98.3%
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
✓99.1%
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
✓98.5%
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
▶86.6%
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
Compiler

Compiled 255 to 167 computations (34.5% saved)

series781.0ms (8.6%)

Memory
-5.4MiB live, 608.8MiB allocated; 208ms collecting garbage
Counts
58 → 542
Calls
Call 1
Inputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
(fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
(/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))))
(*.f64 re re)
re
(*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))
(*.f64 im im)
im
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 im))
(log.f64 im)
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im)))))
#s(literal 1/2 binary64)
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
(-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im)))
(fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im)))
#s(literal 6 binary64)
(/.f64 (*.f64 re re) (*.f64 im im))
(*.f64 #s(literal 4 binary64) (log.f64 im))
#s(literal 4 binary64)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))
(-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))))
(+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))
(pow.f64 (*.f64 im im) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 re re) #s(literal 3 binary64))
(log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(pow.f64 im #s(literal 4 binary64))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(pow.f64 re #s(literal 4 binary64))
(pow.f64 (*.f64 re im) #s(literal 2 binary64))
(*.f64 re im)
#s(literal 2 binary64)
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
(/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
(log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))
(pow.f64 re #s(literal 6 binary64))
(pow.f64 im #s(literal 6 binary64))
(*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))
(-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
Outputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* re re) (* (* im im) (log 1/10))) #s(hole binary64 (/ (pow re 2) (* (pow im 2) (log 1/10)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx re #s(hole binary64 re))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (* 6 (log im)) (* 4 (log im)))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (+ (* 6 (log im)) (/ (pow re 2) (pow im 2))) (* 4 (log im)))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (* 6 (log im))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (+ (* 6 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (/ (* re re) (* im im)) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* -1/2 (/ (pow re 6) (pow im 12))) (/ 1 (pow im 6)))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* (pow re 6) (- (* 1/3 (/ (pow re 6) (pow im 18))) (* 1/2 (/ 1 (pow im 12))))) (/ 1 (pow im 6)))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (pow im 6)))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (+ (pow im 6) (pow re 6))))
#s(approx (pow (* re re) 3) #s(hole binary64 (pow re 6)))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (pow im 4)))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (* (pow re 2) (- (pow re 2) (pow im 2)))))
#s(approx (pow re 4) #s(hole binary64 (pow re 4)))
#s(approx (pow (* re im) 2) #s(hole binary64 (* (pow im 2) (pow re 2))))
#s(approx (* re im) #s(hole binary64 (* im re)))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (log 10) (log (pow im 10)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (* (pow re 2) (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (log 10) (log (pow im 10))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (log 10) (log (pow im 10))))) (* (pow re 2) (+ (* 1/2 (* (pow re 2) (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (* (log 10) (log (pow im 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (* (log 10) (pow (log (pow im 10)) 2))))))))) (* 1/2 (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2))))))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (log 10) (log (pow im 10))))) (* (pow re 2) (+ (* 1/2 (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2))))))) (* (pow re 2) (+ (* 1/2 (* (pow re 2) (- (+ (* 2 (/ (log (pow im 6)) (* (pow im 6) (* (log 10) (log (pow im 10)))))) (/ 1 (* (pow im 6) (* (log 10) (log (pow im 10)))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (* (log 10) (log (pow im 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (* (log 10) (pow (log (pow im 10)) 2))))))) (* (pow im 2) (log (pow im 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))) (* (pow im 4) (log (pow im 10))))) (+ (* 4/3 (/ (log (pow im 4)) (* (pow im 6) (* (log 10) (log (pow im 10)))))) (* 5/3 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 6) (* (log 10) (pow (log (pow im 10)) 2))))))))))) (* 1/2 (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (* (log 10) (log (pow im 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (* (log 10) (pow (log (pow im 10)) 2)))))))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (* (pow re 2) (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10)))) (* (pow re 2) (+ (* 1/2 (* (pow re 2) (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))))) (* 1/2 (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10)))) (* (pow re 2) (+ (* 1/2 (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))) (* (pow re 2) (+ (* 1/2 (* (pow re 2) (- (+ (* 2 (/ (log (pow im 6)) (* (pow im 6) (log (pow im 10))))) (/ 1 (* (pow im 6) (log (pow im 10))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 4) (log (pow im 10))))) (+ (* 4/3 (/ (log (pow im 4)) (* (pow im 6) (log (pow im 10))))) (* 5/3 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 6) (pow (log (pow im 10)) 2)))))))))) (* 1/2 (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2))))))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))) (/ (pow (log (pow im 6)) 2) (log (pow im 10)))) (/ (pow (log (pow im 4)) 2) (log (pow im 10))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (+ (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* (pow re 2) (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))) (/ (pow (log (pow im 6)) 2) (log (pow im 10)))) (/ (pow (log (pow im 4)) 2) (log (pow im 10))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (+ (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* (pow re 2) (- (+ (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (* (pow re 2) (- (+ (* 2 (/ (log (pow im 6)) (* (pow im 6) (log (pow im 10))))) (/ 1 (* (pow im 6) (log (pow im 10))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 4) (log (pow im 10))))) (+ (* 4/3 (/ (log (pow im 4)) (* (pow im 6) (log (pow im 10))))) (* 5/3 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 6) (pow (log (pow im 10)) 2)))))))))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))) (/ (pow (log (pow im 6)) 2) (log (pow im 10)))) (/ (pow (log (pow im 4)) 2) (log (pow im 10))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* 2 (/ (* (pow re 2) (log (pow im 4))) (pow im 2))) (pow (log (pow im 6)) 2)) (pow (log (pow im 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (* -1 (* (pow re 2) (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))))) (* -2 (/ (log (pow im 4)) (pow im 2))))) (pow (log (pow im 6)) 2)) (pow (log (pow im 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (* (pow re 2) (- (* (pow re 2) (- (+ (* 2 (/ (log (pow im 6)) (pow im 6))) (/ 1 (pow im 6))) (* 4/3 (/ (log (pow im 4)) (pow im 6))))) (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))))) (* -2 (/ (log (pow im 4)) (pow im 2))))) (pow (log (pow im 6)) 2)) (pow (log (pow im 4)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (pow (log (pow im 6)) 2)))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* 2 (/ (* (pow re 6) (log (pow im 6))) (pow im 6))) (pow (log (pow im 6)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* (pow re 6) (+ (* 2 (/ (log (pow im 6)) (pow im 6))) (* (pow re 6) (+ (* -1 (/ (log (pow im 6)) (pow im 12))) (/ 1 (pow im 12)))))) (pow (log (pow im 6)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* (pow re 6) (+ (* 2 (/ (log (pow im 6)) (pow im 6))) (* (pow re 6) (+ (* -1 (/ (log (pow im 6)) (pow im 12))) (+ (* (pow re 6) (- (* 2/3 (/ (log (pow im 6)) (pow im 18))) (/ 1 (pow im 18)))) (/ 1 (pow im 12))))))) (pow (log (pow im 6)) 2))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* -1/2 (/ (pow re 6) (pow im 12))) (/ 1 (pow im 6)))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* (pow re 6) (- (* 1/3 (/ (pow re 6) (pow im 18))) (* 1/2 (/ 1 (pow im 12))))) (/ 1 (pow im 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (pow im 6)))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (+ (pow im 6) (pow re 6))))
#s(approx (pow re 6) #s(hole binary64 (pow re 6)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (pow (log (pow im 4)) 2)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -2 (/ (* (pow re 2) (log (pow im 4))) (pow im 2))) (pow (log (pow im 4)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* (pow re 2) (+ (* -2 (/ (log (pow im 4)) (pow im 2))) (* (pow re 2) (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4)))))) (pow (log (pow im 4)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* (pow re 2) (+ (* -2 (/ (log (pow im 4)) (pow im 2))) (* (pow re 2) (+ (* (pow re 2) (- (* 4/3 (/ (log (pow im 4)) (pow im 6))) (/ 1 (pow im 6)))) (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))))))) (pow (log (pow im 4)) 2))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (pow im 4)))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (pow im 4)))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (log (pow im 10))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow im 10)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow im 10)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow im 10)) (* (pow re 2) (- (* (pow re 2) (+ (* 5/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (pow im 10)))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -1 (* (pow im 8) (pow re 2))) (pow im 10))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* (pow re 2) (+ (* -1 (pow im 8)) (* (pow im 6) (pow re 2)))) (pow im 10))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* (pow re 2) (+ (* -1 (pow im 8)) (* (pow re 2) (+ (* (pow im 4) (pow re 2)) (pow im 6))))) (pow im 10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/6 (/ (pow im 6) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (* (pow re 2) (- (* -1 (/ (log im) (* (pow re 2) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow im 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 10)))) (pow re 6))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (* (pow re 2) (- (+ (* 6 (/ (log im) (pow re 2))) (/ 1 (pow im 2))) (* 4 (/ (log im) (pow re 2)))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (* (pow re 2) (+ (* 6 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 1/10))) (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 1/10))) (+ (* -1/2 (/ (- (/ (pow im 6) (log 1/10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 1/10)))) (pow re 6))) (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (pow re 6)))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (* (pow re 6) (+ 1 (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (pow re 4)))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (pow re 4)))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (* (log 10) (log (/ 1 re)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (* (log 10) (log (/ 1 re))))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2))))) (pow re 2))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (* (log 10) (log (/ 1 re))))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ 1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))))) (log (/ 1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2))))) (pow re 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (* (log 10) (log (/ 1 re))))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ 1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (* (log 10) (log (/ 1 re))))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))))) (log (/ 1 re)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ 1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))))) (log (/ 1 re))))))) (log (/ 1 re))))))) (pow re 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ 1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))))) (log (/ 1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2))))) (pow re 2))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2)))) (pow re 2))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ 1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2)))) (pow re 2)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ 1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (log (/ 1 re)))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ 1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re))))))) (log (/ 1 re))))))) (pow re 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ 1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2)))) (pow re 2))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (* -1/10 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (* 4/5 (/ (pow im 2) (pow re 2)))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 2) (pow (log (/ 1 re)) 2)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (pow re 4) (log (/ 1 re))))) (* 4/5 (/ (pow im 2) (pow re 2))))) (+ (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 2) (pow (log (/ 1 re)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 4) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (* (pow re 4) (log (/ 1 re))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ 1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (* (pow re 6) (log (/ 1 re))))) (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (pow re 4) (log (/ 1 re))))) (* 4/5 (/ (pow im 2) (pow re 2)))))) (+ (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 2) (pow (log (/ 1 re)) 2)))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (* (pow re 6) (log (/ 1 re))))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 6) (pow (log (/ 1 re)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 4) (pow (log (/ 1 re)) 2)))) (+ (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ 1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re))))))) (* (pow re 6) (log (/ 1 re))))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (* (pow re 4) (log (/ 1 re)))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (* 36 (pow (log (/ 1 re)) 2))) (* 16 (pow (log (/ 1 re)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (pow re 4))) (* 36 (pow (log (/ 1 re)) 2))) (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (* 16 (pow (log (/ 1 re)) 2))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -12 (/ (* (pow im 6) (log (/ 1 re))) (pow re 6))) (* 36 (pow (log (/ 1 re)) 2))) (+ (* -1/3 (/ (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* -1/12 (/ (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 6))) (+ (* -1/90 (/ (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6)))) (pow re 6))) (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (+ (* 16 (pow (log (/ 1 re)) 2)) (/ (pow im 4) (pow re 4))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (* 36 (pow (log (/ 1 re)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ 1 re))) (pow re 6))) (* 36 (pow (log (/ 1 re)) 2)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ 1 re))) (pow re 6))) (+ (* 6 (/ (* (pow im 12) (log (/ 1 re))) (pow re 12))) (+ (* 36 (pow (log (/ 1 re)) 2)) (/ (pow im 12) (pow re 12)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ 1 re))) (pow re 6))) (+ (* -4 (/ (* (pow im 18) (log (/ 1 re))) (pow re 18))) (+ (* -1 (/ (pow im 18) (pow re 18))) (+ (* 6 (/ (* (pow im 12) (log (/ 1 re))) (pow re 12))) (+ (* 36 (pow (log (/ 1 re)) 2)) (/ (pow im 12) (pow re 12)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (pow re 6)))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (* (pow re 6) (+ 1 (/ (pow im 6) (pow re 6))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* 16 (pow (log (/ 1 re)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (* 16 (pow (log (/ 1 re)) 2)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (+ (* 16 (pow (log (/ 1 re)) 2)) (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* -1/12 (/ (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 6))) (+ (* -1/90 (/ (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6)))) (pow re 6))) (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (+ (* 16 (pow (log (/ 1 re)) 2)) (/ (pow im 4) (pow re 4)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (pow re 4)))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow re 2) (- (/ (pow im 4) (pow re 2)) (pow im 2)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* -10 (log (/ 1 re)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (pow re 10)))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow re 10) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow re 10) (+ 1 (+ (* -1 (/ (pow im 2) (pow re 2))) (/ (pow im 4) (pow re 4)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow re 10) (+ 1 (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (/ (pow im 4) (pow re 4)) (/ (pow im 6) (pow re 6))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/6 (/ (pow im 6) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow im 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 10)))) (pow re 6))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 1/10))) (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 1/10))) (+ (* -1/2 (/ (- (/ (pow im 6) (log 1/10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 1/10)))) (pow re 6))) (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (* (log 10) (log (/ -1 re)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (* (log 10) (log (/ -1 re))))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2))))) (pow re 2))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (* (log 10) (log (/ -1 re))))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ -1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))))) (log (/ -1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2))))) (pow re 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (* (log 10) (log (/ -1 re))))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ -1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (* (log 10) (log (/ -1 re))))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))))) (log (/ -1 re)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ -1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))))) (log (/ -1 re))))))) (log (/ -1 re))))))) (pow re 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ -1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))))) (log (/ -1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2))))) (pow re 2))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2)))) (pow re 2))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ -1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2)))) (pow re 2)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ -1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (log (/ -1 re)))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ -1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re))))))) (log (/ -1 re))))))) (pow re 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ -1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2)))) (pow re 2))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (* -1/10 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (* 4/5 (/ (pow im 2) (pow re 2)))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 2) (pow (log (/ -1 re)) 2)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (pow re 4) (log (/ -1 re))))) (* 4/5 (/ (pow im 2) (pow re 2))))) (+ (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 2) (pow (log (/ -1 re)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 4) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (* (pow re 4) (log (/ -1 re))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ -1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (* (pow re 6) (log (/ -1 re))))) (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (pow re 4) (log (/ -1 re))))) (* 4/5 (/ (pow im 2) (pow re 2)))))) (+ (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 2) (pow (log (/ -1 re)) 2)))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (* (pow re 6) (log (/ -1 re))))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 6) (pow (log (/ -1 re)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 4) (pow (log (/ -1 re)) 2)))) (+ (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ -1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re))))))) (* (pow re 6) (log (/ -1 re))))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (* (pow re 4) (log (/ -1 re)))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (* 36 (pow (log (/ -1 re)) 2))) (* 16 (pow (log (/ -1 re)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (pow re 4))) (* 36 (pow (log (/ -1 re)) 2))) (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (* 16 (pow (log (/ -1 re)) 2))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -12 (/ (* (pow im 6) (log (/ -1 re))) (pow re 6))) (* 36 (pow (log (/ -1 re)) 2))) (+ (* -1/3 (/ (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* -1/12 (/ (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 6))) (+ (* -1/90 (/ (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6)))) (pow re 6))) (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (+ (* 16 (pow (log (/ -1 re)) 2)) (/ (pow im 4) (pow re 4))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (* 36 (pow (log (/ -1 re)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ -1 re))) (pow re 6))) (* 36 (pow (log (/ -1 re)) 2)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ -1 re))) (pow re 6))) (+ (* 6 (/ (* (pow im 12) (log (/ -1 re))) (pow re 12))) (+ (* 36 (pow (log (/ -1 re)) 2)) (/ (pow im 12) (pow re 12)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ -1 re))) (pow re 6))) (+ (* -4 (/ (* (pow im 18) (log (/ -1 re))) (pow re 18))) (+ (* -1 (/ (pow im 18) (pow re 18))) (+ (* 6 (/ (* (pow im 12) (log (/ -1 re))) (pow re 12))) (+ (* 36 (pow (log (/ -1 re)) 2)) (/ (pow im 12) (pow re 12)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* 16 (pow (log (/ -1 re)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (* 16 (pow (log (/ -1 re)) 2)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (+ (* 16 (pow (log (/ -1 re)) 2)) (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* -1/12 (/ (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 6))) (+ (* -1/90 (/ (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6)))) (pow re 6))) (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (+ (* 16 (pow (log (/ -1 re)) 2)) (/ (pow im 4) (pow re 4)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* -10 (log (/ -1 re)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow re 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow im 2) (log im)) (log 1/10))) (* -1/2 (/ (pow re 2) (log 1/10)))) (pow im 2))))
#s(approx (* (* im im) (log 1/10)) #s(hole binary64 (* (pow im 2) (log 1/10))))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx im #s(hole binary64 im))
#s(approx (/ (neg (log im)) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (neg (log im)) #s(hole binary64 (* -1 (log im))))
#s(approx (log im) #s(hole binary64 (log im)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (/ (+ (* (pow im 2) (- (* 6 (log im)) (* 4 (log im)))) (pow re 2)) (pow im 2))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (/ (+ (* 6 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (* 4 (log im)) #s(hole binary64 (* 4 (log im))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* -1/2 (/ (pow im 6) (pow re 12))) (/ 1 (pow re 6)))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* (pow im 6) (- (* 1/3 (/ (pow im 6) (pow re 18))) (* 1/2 (/ 1 (pow re 12))))) (/ 1 (pow re 6)))))))
#s(approx (pow (* im im) 3) #s(hole binary64 (pow im 6)))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (pow im 4) #s(hole binary64 (pow im 4)))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (log 10) (log (pow re 10)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (* (pow im 2) (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (log 10) (log (pow re 10))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (log 10) (log (pow re 10))))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (* (log 10) (log (pow re 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (* (log 10) (pow (log (pow re 10)) 2))))))))) (* 1/2 (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2))))))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (log 10) (log (pow re 10))))) (* (pow im 2) (+ (* 1/2 (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2))))))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (- (+ (* 2 (/ (log (pow re 6)) (* (pow re 6) (* (log 10) (log (pow re 10)))))) (/ 1 (* (pow re 6) (* (log 10) (log (pow re 10)))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (* (log 10) (log (pow re 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (* (log 10) (pow (log (pow re 10)) 2))))))) (* (pow re 2) (log (pow re 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))) (* (pow re 4) (log (pow re 10))))) (+ (* 4/3 (/ (log (pow re 4)) (* (pow re 6) (* (log 10) (log (pow re 10)))))) (* 5/3 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 6) (* (log 10) (pow (log (pow re 10)) 2))))))))))) (* 1/2 (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (* (log 10) (log (pow re 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (* (log 10) (pow (log (pow re 10)) 2)))))))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (* (pow im 2) (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10)))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))))) (* 1/2 (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10)))) (* (pow im 2) (+ (* 1/2 (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (- (+ (* 2 (/ (log (pow re 6)) (* (pow re 6) (log (pow re 10))))) (/ 1 (* (pow re 6) (log (pow re 10))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 4) (log (pow re 10))))) (+ (* 4/3 (/ (log (pow re 4)) (* (pow re 6) (log (pow re 10))))) (* 5/3 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 6) (pow (log (pow re 10)) 2)))))))))) (* 1/2 (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2))))))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))) (/ (pow (log (pow re 6)) 2) (log (pow re 10)))) (/ (pow (log (pow re 4)) 2) (log (pow re 10))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (+ (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* (pow im 2) (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))) (/ (pow (log (pow re 6)) 2) (log (pow re 10)))) (/ (pow (log (pow re 4)) 2) (log (pow re 10))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (+ (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* (pow im 2) (- (+ (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (* (pow im 2) (- (+ (* 2 (/ (log (pow re 6)) (* (pow re 6) (log (pow re 10))))) (/ 1 (* (pow re 6) (log (pow re 10))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 4) (log (pow re 10))))) (+ (* 4/3 (/ (log (pow re 4)) (* (pow re 6) (log (pow re 10))))) (* 5/3 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 6) (pow (log (pow re 10)) 2)))))))))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))) (/ (pow (log (pow re 6)) 2) (log (pow re 10)))) (/ (pow (log (pow re 4)) 2) (log (pow re 10))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* 2 (/ (* (pow im 2) (log (pow re 4))) (pow re 2))) (pow (log (pow re 6)) 2)) (pow (log (pow re 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1 (* (pow im 2) (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))))) (* -2 (/ (log (pow re 4)) (pow re 2))))) (pow (log (pow re 6)) 2)) (pow (log (pow re 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (* (pow im 2) (- (* (pow im 2) (- (+ (* 2 (/ (log (pow re 6)) (pow re 6))) (/ 1 (pow re 6))) (* 4/3 (/ (log (pow re 4)) (pow re 6))))) (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))))) (* -2 (/ (log (pow re 4)) (pow re 2))))) (pow (log (pow re 6)) 2)) (pow (log (pow re 4)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (pow (log (pow re 6)) 2)))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* 2 (/ (* (pow im 6) (log (pow re 6))) (pow re 6))) (pow (log (pow re 6)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* (pow im 6) (+ (* 2 (/ (log (pow re 6)) (pow re 6))) (* (pow im 6) (+ (* -1 (/ (log (pow re 6)) (pow re 12))) (/ 1 (pow re 12)))))) (pow (log (pow re 6)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* (pow im 6) (+ (* 2 (/ (log (pow re 6)) (pow re 6))) (* (pow im 6) (+ (* -1 (/ (log (pow re 6)) (pow re 12))) (+ (* (pow im 6) (- (* 2/3 (/ (log (pow re 6)) (pow re 18))) (/ 1 (pow re 18)))) (/ 1 (pow re 12))))))) (pow (log (pow re 6)) 2))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* -1/2 (/ (pow im 6) (pow re 12))) (/ 1 (pow re 6)))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* (pow im 6) (- (* 1/3 (/ (pow im 6) (pow re 18))) (* 1/2 (/ 1 (pow re 12))))) (/ 1 (pow re 6)))))))
#s(approx (pow im 6) #s(hole binary64 (pow im 6)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (pow (log (pow re 4)) 2)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -2 (/ (* (pow im 2) (log (pow re 4))) (pow re 2))) (pow (log (pow re 4)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* (pow im 2) (+ (* -2 (/ (log (pow re 4)) (pow re 2))) (* (pow im 2) (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4)))))) (pow (log (pow re 4)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* (pow im 2) (+ (* -2 (/ (log (pow re 4)) (pow re 2))) (* (pow im 2) (+ (* (pow im 2) (- (* 4/3 (/ (log (pow re 4)) (pow re 6))) (/ 1 (pow re 6)))) (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))))))) (pow (log (pow re 4)) 2))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 2) (- (pow im 2) (pow re 2)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (log (pow re 10))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow re 10)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow re 10)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow re 10)) (* (pow im 2) (- (* (pow im 2) (+ (* 5/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 8))) (pow re 10))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* (pow im 2) (+ (* -1 (pow re 8)) (* (pow im 2) (pow re 6)))) (pow re 10))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* (pow im 2) (+ (* -1 (pow re 8)) (* (pow im 2) (+ (* (pow im 2) (pow re 4)) (pow re 6))))) (pow re 10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/6 (/ (pow re 6) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log im)) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (neg (log im)) #s(hole binary64 (log (/ 1 im))))
#s(approx (log im) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow re 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 10)))) (pow im 6))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (* 4 (log im)) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 1/10))) (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 1/10))) (+ (* -1/2 (/ (- (/ (pow re 6) (log 1/10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 1/10)))) (pow im 6))) (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (* (pow im 6) (+ 1 (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 2) (- (/ (pow re 4) (pow im 2)) (pow re 2)))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (* (log 10) (log (/ 1 im)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (* (log 10) (log (/ 1 im))))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2))))) (pow im 2))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (* (log 10) (log (/ 1 im))))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ 1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))))) (log (/ 1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2))))) (pow im 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (* (log 10) (log (/ 1 im))))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ 1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (* (log 10) (log (/ 1 im))))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))))) (log (/ 1 im)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ 1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))))) (log (/ 1 im))))))) (log (/ 1 im))))))) (pow im 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ 1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))))) (log (/ 1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2))))) (pow im 2))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2)))) (pow im 2))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ 1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2)))) (pow im 2)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ 1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (log (/ 1 im)))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ 1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im))))))) (log (/ 1 im))))))) (pow im 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ 1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2)))) (pow im 2))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (* -1/10 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (* 4/5 (/ (pow re 2) (pow im 2)))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 2) (pow (log (/ 1 im)) 2)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (pow im 4) (log (/ 1 im))))) (* 4/5 (/ (pow re 2) (pow im 2))))) (+ (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 2) (pow (log (/ 1 im)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 4) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (* (pow im 4) (log (/ 1 im))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ 1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (* (pow im 6) (log (/ 1 im))))) (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (pow im 4) (log (/ 1 im))))) (* 4/5 (/ (pow re 2) (pow im 2)))))) (+ (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 2) (pow (log (/ 1 im)) 2)))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (* (pow im 6) (log (/ 1 im))))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 6) (pow (log (/ 1 im)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 4) (pow (log (/ 1 im)) 2)))) (+ (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ 1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im))))))) (* (pow im 6) (log (/ 1 im))))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (* (pow im 4) (log (/ 1 im)))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (* 36 (pow (log (/ 1 im)) 2))) (* 16 (pow (log (/ 1 im)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (pow im 4))) (* 36 (pow (log (/ 1 im)) 2))) (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (* 16 (pow (log (/ 1 im)) 2))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -12 (/ (* (pow re 6) (log (/ 1 im))) (pow im 6))) (* 36 (pow (log (/ 1 im)) 2))) (+ (* -1/3 (/ (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* -1/12 (/ (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 6))) (+ (* -1/90 (/ (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6)))) (pow im 6))) (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (+ (* 16 (pow (log (/ 1 im)) 2)) (/ (pow re 4) (pow im 4))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (* 36 (pow (log (/ 1 im)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ 1 im))) (pow im 6))) (* 36 (pow (log (/ 1 im)) 2)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ 1 im))) (pow im 6))) (+ (* 6 (/ (* (pow re 12) (log (/ 1 im))) (pow im 12))) (+ (* 36 (pow (log (/ 1 im)) 2)) (/ (pow re 12) (pow im 12)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ 1 im))) (pow im 6))) (+ (* -4 (/ (* (pow re 18) (log (/ 1 im))) (pow im 18))) (+ (* -1 (/ (pow re 18) (pow im 18))) (+ (* 6 (/ (* (pow re 12) (log (/ 1 im))) (pow im 12))) (+ (* 36 (pow (log (/ 1 im)) 2)) (/ (pow re 12) (pow im 12)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (* (pow im 6) (+ 1 (/ (pow re 6) (pow im 6))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* 16 (pow (log (/ 1 im)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (* 16 (pow (log (/ 1 im)) 2)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (+ (* 16 (pow (log (/ 1 im)) 2)) (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* -1/12 (/ (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 6))) (+ (* -1/90 (/ (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6)))) (pow im 6))) (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (+ (* 16 (pow (log (/ 1 im)) 2)) (/ (pow re 4) (pow im 4)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* -10 (log (/ 1 im)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow im 10) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow im 10) (+ 1 (+ (* -1 (/ (pow re 2) (pow im 2))) (/ (pow re 4) (pow im 4)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow im 10) (+ 1 (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (/ (pow re 4) (pow im 4)) (/ (pow re 6) (pow im 6))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/6 (/ (pow re 6) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (* -1 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (log 1/10)))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log im)) (log 1/10)) #s(hole binary64 (* -1 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (log 1/10)))))
#s(approx (neg (log im)) #s(hole binary64 (* -1 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (log im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 im))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow re 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 10)))) (pow im 6))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (* 6 (+ (log -1) (* -1 (log (/ -1 im))))) (* 4 (+ (log -1) (* -1 (log (/ -1 im))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (+ (* 6 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2))) (* 4 (+ (log -1) (* -1 (log (/ -1 im))))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (* 6 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (+ (* 6 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (* 4 (log im)) #s(hole binary64 (* 4 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 1/10))) (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 1/10))) (+ (* -1/2 (/ (- (/ (pow re 6) (log 1/10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 1/10)))) (pow im 6))) (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (* (log 10) (log (/ -1 im)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (* (log 10) (log (/ -1 im))))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2))))) (pow im 2))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (* (log 10) (log (/ -1 im))))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ -1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))))) (log (/ -1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2))))) (pow im 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (* (log 10) (log (/ -1 im))))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ -1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (* (log 10) (log (/ -1 im))))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))))) (log (/ -1 im)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ -1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))))) (log (/ -1 im))))))) (log (/ -1 im))))))) (pow im 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ -1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))))) (log (/ -1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2))))) (pow im 2))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2)))) (pow im 2))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ -1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2)))) (pow im 2)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ -1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (log (/ -1 im)))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ -1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im))))))) (log (/ -1 im))))))) (pow im 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ -1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2)))) (pow im 2))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (* -1/10 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (* 4/5 (/ (pow re 2) (pow im 2)))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 2) (pow (log (/ -1 im)) 2)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (pow im 4) (log (/ -1 im))))) (* 4/5 (/ (pow re 2) (pow im 2))))) (+ (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 2) (pow (log (/ -1 im)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 4) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (* (pow im 4) (log (/ -1 im))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ -1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (* (pow im 6) (log (/ -1 im))))) (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (pow im 4) (log (/ -1 im))))) (* 4/5 (/ (pow re 2) (pow im 2)))))) (+ (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 2) (pow (log (/ -1 im)) 2)))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (* (pow im 6) (log (/ -1 im))))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 6) (pow (log (/ -1 im)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 4) (pow (log (/ -1 im)) 2)))) (+ (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ -1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im))))))) (* (pow im 6) (log (/ -1 im))))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (* (pow im 4) (log (/ -1 im)))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (* 36 (pow (log (/ -1 im)) 2))) (* 16 (pow (log (/ -1 im)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (pow im 4))) (* 36 (pow (log (/ -1 im)) 2))) (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (* 16 (pow (log (/ -1 im)) 2))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -12 (/ (* (pow re 6) (log (/ -1 im))) (pow im 6))) (* 36 (pow (log (/ -1 im)) 2))) (+ (* -1/3 (/ (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* -1/12 (/ (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 6))) (+ (* -1/90 (/ (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6)))) (pow im 6))) (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (+ (* 16 (pow (log (/ -1 im)) 2)) (/ (pow re 4) (pow im 4))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (* 36 (pow (log (/ -1 im)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ -1 im))) (pow im 6))) (* 36 (pow (log (/ -1 im)) 2)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ -1 im))) (pow im 6))) (+ (* 6 (/ (* (pow re 12) (log (/ -1 im))) (pow im 12))) (+ (* 36 (pow (log (/ -1 im)) 2)) (/ (pow re 12) (pow im 12)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ -1 im))) (pow im 6))) (+ (* -4 (/ (* (pow re 18) (log (/ -1 im))) (pow im 18))) (+ (* -1 (/ (pow re 18) (pow im 18))) (+ (* 6 (/ (* (pow re 12) (log (/ -1 im))) (pow im 12))) (+ (* 36 (pow (log (/ -1 im)) 2)) (/ (pow re 12) (pow im 12)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* 16 (pow (log (/ -1 im)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (* 16 (pow (log (/ -1 im)) 2)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (+ (* 16 (pow (log (/ -1 im)) 2)) (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* -1/12 (/ (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 6))) (+ (* -1/90 (/ (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6)))) (pow im 6))) (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (+ (* 16 (pow (log (/ -1 im)) 2)) (/ (pow re 4) (pow im 4)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* -10 (log (/ -1 im)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
Calls

6 calls:

TimeVariablePointExpression
193.0ms
im
@-inf
((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/ (* re re) (* (* im im) (log 1/10))) (* re re) re (* (* im im) (log 1/10)) (* im im) im (log 1/10) 1/10 -1/2 (/ (neg (log im)) (log 1/10)) (neg (log im)) (log im) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (+ (* 6 (log im)) (/ (* re re) (* im im))) 6 (/ (* re re) (* im im)) (* 4 (log im)) 4 (log 10) 10 (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (log (+ (pow (* im im) 3) (pow (* re re) 3))) (+ (pow (* im im) 3) (pow (* re re) 3)) (pow (* im im) 3) 3 (pow (* re re) 3) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (pow im 4) (- (pow re 4) (pow (* re im) 2)) (pow re 4) (pow (* re im) 2) (* re im) 2 (neg (log 1/10)) (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) (pow im 6) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (- (pow im 4) (pow (* re im) 2)) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))
129.0ms
im
@inf
((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/ (* re re) (* (* im im) (log 1/10))) (* re re) re (* (* im im) (log 1/10)) (* im im) im (log 1/10) 1/10 -1/2 (/ (neg (log im)) (log 1/10)) (neg (log im)) (log im) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (+ (* 6 (log im)) (/ (* re re) (* im im))) 6 (/ (* re re) (* im im)) (* 4 (log im)) 4 (log 10) 10 (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (log (+ (pow (* im im) 3) (pow (* re re) 3))) (+ (pow (* im im) 3) (pow (* re re) 3)) (pow (* im im) 3) 3 (pow (* re re) 3) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (pow im 4) (- (pow re 4) (pow (* re im) 2)) (pow re 4) (pow (* re im) 2) (* re im) 2 (neg (log 1/10)) (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) (pow im 6) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (- (pow im 4) (pow (* re im) 2)) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))
117.0ms
re
@0
((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/ (* re re) (* (* im im) (log 1/10))) (* re re) re (* (* im im) (log 1/10)) (* im im) im (log 1/10) 1/10 -1/2 (/ (neg (log im)) (log 1/10)) (neg (log im)) (log im) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (+ (* 6 (log im)) (/ (* re re) (* im im))) 6 (/ (* re re) (* im im)) (* 4 (log im)) 4 (log 10) 10 (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (log (+ (pow (* im im) 3) (pow (* re re) 3))) (+ (pow (* im im) 3) (pow (* re re) 3)) (pow (* im im) 3) 3 (pow (* re re) 3) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (pow im 4) (- (pow re 4) (pow (* re im) 2)) (pow re 4) (pow (* re im) 2) (* re im) 2 (neg (log 1/10)) (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) (pow im 6) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (- (pow im 4) (pow (* re im) 2)) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))
96.0ms
im
@0
((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/ (* re re) (* (* im im) (log 1/10))) (* re re) re (* (* im im) (log 1/10)) (* im im) im (log 1/10) 1/10 -1/2 (/ (neg (log im)) (log 1/10)) (neg (log im)) (log im) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (+ (* 6 (log im)) (/ (* re re) (* im im))) 6 (/ (* re re) (* im im)) (* 4 (log im)) 4 (log 10) 10 (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (log (+ (pow (* im im) 3) (pow (* re re) 3))) (+ (pow (* im im) 3) (pow (* re re) 3)) (pow (* im im) 3) 3 (pow (* re re) 3) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (pow im 4) (- (pow re 4) (pow (* re im) 2)) (pow re 4) (pow (* re im) 2) (* re im) 2 (neg (log 1/10)) (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) (pow im 6) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (- (pow im 4) (pow (* re im) 2)) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))
63.0ms
re
@inf
((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/ (* re re) (* (* im im) (log 1/10))) (* re re) re (* (* im im) (log 1/10)) (* im im) im (log 1/10) 1/10 -1/2 (/ (neg (log im)) (log 1/10)) (neg (log im)) (log im) (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (+ (* 6 (log im)) (/ (* re re) (* im im))) 6 (/ (* re re) (* im im)) (* 4 (log im)) 4 (log 10) 10 (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (log (+ (pow (* im im) 3) (pow (* re re) 3))) (+ (pow (* im im) 3) (pow (* re re) 3)) (pow (* im im) 3) 3 (pow (* re re) 3) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (pow im 4) (- (pow re 4) (pow (* re im) 2)) (pow re 4) (pow (* re im) 2) (* re im) 2 (neg (log 1/10)) (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (log (+ (pow re 6) (pow im 6))) (+ (pow re 6) (pow im 6)) (pow re 6) (pow im 6) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (- (pow im 4) (pow (* re im) 2)) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))

rewrite800.0ms (8.8%)

Memory
10.4MiB live, 487.0MiB allocated; 168ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0243742828
0253639170
0916538025
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
600 → 667
Calls
Call 1
Inputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
(fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
(/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))))
(*.f64 re re)
re
(*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))
(*.f64 im im)
im
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 im))
(log.f64 im)
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im)))))
#s(literal 1/2 binary64)
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
(-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im)))
(fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im)))
#s(literal 6 binary64)
(/.f64 (*.f64 re re) (*.f64 im im))
(*.f64 #s(literal 4 binary64) (log.f64 im))
#s(literal 4 binary64)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))
(-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))))
(+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))
(pow.f64 (*.f64 im im) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 re re) #s(literal 3 binary64))
(log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(pow.f64 im #s(literal 4 binary64))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(pow.f64 re #s(literal 4 binary64))
(pow.f64 (*.f64 re im) #s(literal 2 binary64))
(*.f64 re im)
#s(literal 2 binary64)
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
(/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
(log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))
(pow.f64 re #s(literal 6 binary64))
(pow.f64 im #s(literal 6 binary64))
(*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))
(-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* re re) (* (* im im) (log 1/10))) #s(hole binary64 (/ (pow re 2) (* (pow im 2) (log 1/10)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx re #s(hole binary64 re))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (* 6 (log im)) (* 4 (log im)))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (+ (* 6 (log im)) (/ (pow re 2) (pow im 2))) (* 4 (log im)))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (* 6 (log im))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (+ (* 6 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (/ (* re re) (* im im)) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* -1/2 (/ (pow re 6) (pow im 12))) (/ 1 (pow im 6)))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* (pow re 6) (- (* 1/3 (/ (pow re 6) (pow im 18))) (* 1/2 (/ 1 (pow im 12))))) (/ 1 (pow im 6)))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (pow im 6)))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (+ (pow im 6) (pow re 6))))
#s(approx (pow (* re re) 3) #s(hole binary64 (pow re 6)))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (pow im 4)))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (* (pow re 2) (- (pow re 2) (pow im 2)))))
#s(approx (pow re 4) #s(hole binary64 (pow re 4)))
#s(approx (pow (* re im) 2) #s(hole binary64 (* (pow im 2) (pow re 2))))
#s(approx (* re im) #s(hole binary64 (* im re)))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (log 10) (log (pow im 10)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (* (pow re 2) (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (log 10) (log (pow im 10))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (log 10) (log (pow im 10))))) (* (pow re 2) (+ (* 1/2 (* (pow re 2) (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (* (log 10) (log (pow im 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (* (log 10) (pow (log (pow im 10)) 2))))))))) (* 1/2 (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2))))))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (log 10) (log (pow im 10))))) (* (pow re 2) (+ (* 1/2 (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2))))))) (* (pow re 2) (+ (* 1/2 (* (pow re 2) (- (+ (* 2 (/ (log (pow im 6)) (* (pow im 6) (* (log 10) (log (pow im 10)))))) (/ 1 (* (pow im 6) (* (log 10) (log (pow im 10)))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (* (log 10) (log (pow im 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (* (log 10) (pow (log (pow im 10)) 2))))))) (* (pow im 2) (log (pow im 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))) (* (pow im 4) (log (pow im 10))))) (+ (* 4/3 (/ (log (pow im 4)) (* (pow im 6) (* (log 10) (log (pow im 10)))))) (* 5/3 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 6) (* (log 10) (pow (log (pow im 10)) 2))))))))))) (* 1/2 (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (* (log 10) (log (pow im 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (* (log 10) (log (pow im 10)))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (* (log 10) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (* (log 10) (pow (log (pow im 10)) 2)))))))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (* (pow re 2) (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10)))) (* (pow re 2) (+ (* 1/2 (* (pow re 2) (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))))) (* 1/2 (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10)))) (* (pow re 2) (+ (* 1/2 (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))) (* (pow re 2) (+ (* 1/2 (* (pow re 2) (- (+ (* 2 (/ (log (pow im 6)) (* (pow im 6) (log (pow im 10))))) (/ 1 (* (pow im 6) (log (pow im 10))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 4) (log (pow im 10))))) (+ (* 4/3 (/ (log (pow im 4)) (* (pow im 6) (log (pow im 10))))) (* 5/3 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 6) (pow (log (pow im 10)) 2)))))))))) (* 1/2 (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2))))))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (log (pow im 10)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))) (/ (pow (log (pow im 6)) 2) (log (pow im 10)))) (/ (pow (log (pow im 4)) 2) (log (pow im 10))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (+ (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* (pow re 2) (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))) (/ (pow (log (pow im 6)) 2) (log (pow im 10)))) (/ (pow (log (pow im 4)) 2) (log (pow im 10))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (+ (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* (pow re 2) (- (+ (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (* (pow re 2) (- (+ (* 2 (/ (log (pow im 6)) (* (pow im 6) (log (pow im 10))))) (/ 1 (* (pow im 6) (log (pow im 10))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))) (log (pow im 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))) (* (pow im 2) (log (pow im 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 4) (log (pow im 10))))) (+ (* 4/3 (/ (log (pow im 4)) (* (pow im 6) (log (pow im 10))))) (* 5/3 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 6) (pow (log (pow im 10)) 2)))))))))) (+ (* -1 (/ (- (* 2 (/ (log (pow im 4)) (* (pow im 2) (log (pow im 10))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2))))) (* (pow im 2) (log (pow im 10))))) (* 1/2 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 4) (pow (log (pow im 10)) 2)))))))) (* -1 (/ (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2)) (* (pow im 2) (pow (log (pow im 10)) 2)))))) (/ (pow (log (pow im 6)) 2) (log (pow im 10)))) (/ (pow (log (pow im 4)) 2) (log (pow im 10))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (pow (log (pow im 6)) 2) (pow (log (pow im 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* 2 (/ (* (pow re 2) (log (pow im 4))) (pow im 2))) (pow (log (pow im 6)) 2)) (pow (log (pow im 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (* -1 (* (pow re 2) (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))))) (* -2 (/ (log (pow im 4)) (pow im 2))))) (pow (log (pow im 6)) 2)) (pow (log (pow im 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow re 2) (- (* (pow re 2) (- (* (pow re 2) (- (+ (* 2 (/ (log (pow im 6)) (pow im 6))) (/ 1 (pow im 6))) (* 4/3 (/ (log (pow im 4)) (pow im 6))))) (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))))) (* -2 (/ (log (pow im 4)) (pow im 2))))) (pow (log (pow im 6)) 2)) (pow (log (pow im 4)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (pow (log (pow im 6)) 2)))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* 2 (/ (* (pow re 6) (log (pow im 6))) (pow im 6))) (pow (log (pow im 6)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* (pow re 6) (+ (* 2 (/ (log (pow im 6)) (pow im 6))) (* (pow re 6) (+ (* -1 (/ (log (pow im 6)) (pow im 12))) (/ 1 (pow im 12)))))) (pow (log (pow im 6)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* (pow re 6) (+ (* 2 (/ (log (pow im 6)) (pow im 6))) (* (pow re 6) (+ (* -1 (/ (log (pow im 6)) (pow im 12))) (+ (* (pow re 6) (- (* 2/3 (/ (log (pow im 6)) (pow im 18))) (/ 1 (pow im 18)))) (/ 1 (pow im 12))))))) (pow (log (pow im 6)) 2))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* -1/2 (/ (pow re 6) (pow im 12))) (/ 1 (pow im 6)))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow im 6)) (* (pow re 6) (+ (* (pow re 6) (- (* 1/3 (/ (pow re 6) (pow im 18))) (* 1/2 (/ 1 (pow im 12))))) (/ 1 (pow im 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (pow im 6)))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (+ (pow im 6) (pow re 6))))
#s(approx (pow re 6) #s(hole binary64 (pow re 6)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (pow (log (pow im 4)) 2)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -2 (/ (* (pow re 2) (log (pow im 4))) (pow im 2))) (pow (log (pow im 4)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* (pow re 2) (+ (* -2 (/ (log (pow im 4)) (pow im 2))) (* (pow re 2) (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4)))))) (pow (log (pow im 4)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* (pow re 2) (+ (* -2 (/ (log (pow im 4)) (pow im 2))) (* (pow re 2) (+ (* (pow re 2) (- (* 4/3 (/ (log (pow im 4)) (pow im 6))) (/ 1 (pow im 6)))) (+ (/ 1 (pow im 4)) (/ (log (pow im 4)) (pow im 4))))))) (pow (log (pow im 4)) 2))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (pow im 4)))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (pow im 4)))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (log (pow im 10))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow im 10)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow im 10)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow im 10)) (* (pow re 2) (- (* (pow re 2) (+ (* 5/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (pow im 10)))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -1 (* (pow im 8) (pow re 2))) (pow im 10))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* (pow re 2) (+ (* -1 (pow im 8)) (* (pow im 6) (pow re 2)))) (pow im 10))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* (pow re 2) (+ (* -1 (pow im 8)) (* (pow re 2) (+ (* (pow im 4) (pow re 2)) (pow im 6))))) (pow im 10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/6 (/ (pow im 6) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ 1 re)) (log 1/10)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (* (pow re 2) (- (* -1 (/ (log im) (* (pow re 2) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow im 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 10)))) (pow re 6))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (* (pow re 2) (- (+ (* 6 (/ (log im) (pow re 2))) (/ 1 (pow im 2))) (* 4 (/ (log im) (pow re 2)))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (* (pow re 2) (+ (* 6 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 1/10))) (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 1/10))) (+ (* -1/2 (/ (- (/ (pow im 6) (log 1/10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 1/10)))) (pow re 6))) (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (pow re 6)))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (* (pow re 6) (+ 1 (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (pow re 4)))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (pow re 4)))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (* (log 10) (log (/ 1 re)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (* (log 10) (log (/ 1 re))))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2))))) (pow re 2))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (* (log 10) (log (/ 1 re))))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ 1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))))) (log (/ 1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2))))) (pow re 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (* (log 10) (log (/ 1 re))))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ 1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (* (log 10) (log (/ 1 re))))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))))) (log (/ 1 re)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ 1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))))) (log (/ 1 re))))))) (log (/ 1 re))))))) (pow re 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ 1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2)))))) (log (/ 1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (log 10) (pow (log (/ 1 re)) 2))))) (pow re 2))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2)))) (pow re 2))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ 1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2)))) (pow re 2)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ 1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (log (/ 1 re)))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ 1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re))))))) (log (/ 1 re))))))) (pow re 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ 1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2)))) (pow re 2))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (* -1/10 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (* 4/5 (/ (pow im 2) (pow re 2)))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 2) (pow (log (/ 1 re)) 2)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (pow re 4) (log (/ 1 re))))) (* 4/5 (/ (pow im 2) (pow re 2))))) (+ (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 2) (pow (log (/ 1 re)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 4) (pow (log (/ 1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (* (pow re 4) (log (/ 1 re))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ 1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (* (pow re 6) (log (/ 1 re))))) (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2))) (log (/ 1 re)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (pow re 4) (log (/ 1 re))))) (* 4/5 (/ (pow im 2) (pow re 2)))))) (+ (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 2) (pow (log (/ 1 re)) 2)))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (* (pow re 6) (log (/ 1 re))))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 6) (pow (log (/ 1 re)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (* (pow re 4) (pow (log (/ 1 re)) 2)))) (+ (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ 1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (log (/ 1 re))))))) (* (pow re 6) (log (/ 1 re))))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))) (pow (log (/ 1 re)) 2))))) (* (pow re 4) (log (/ 1 re)))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (* 36 (pow (log (/ 1 re)) 2)) (* 16 (pow (log (/ 1 re)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (* 36 (pow (log (/ 1 re)) 2))) (* 16 (pow (log (/ 1 re)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/3 (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (pow re 4))) (* 36 (pow (log (/ 1 re)) 2))) (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (* 16 (pow (log (/ 1 re)) 2))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -12 (/ (* (pow im 6) (log (/ 1 re))) (pow re 6))) (* 36 (pow (log (/ 1 re)) 2))) (+ (* -1/3 (/ (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* -1/12 (/ (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 6))) (+ (* -1/90 (/ (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6)))) (pow re 6))) (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (+ (* 16 (pow (log (/ 1 re)) 2)) (/ (pow im 4) (pow re 4))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (* 36 (pow (log (/ 1 re)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ 1 re))) (pow re 6))) (* 36 (pow (log (/ 1 re)) 2)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ 1 re))) (pow re 6))) (+ (* 6 (/ (* (pow im 12) (log (/ 1 re))) (pow re 12))) (+ (* 36 (pow (log (/ 1 re)) 2)) (/ (pow im 12) (pow re 12)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ 1 re))) (pow re 6))) (+ (* -4 (/ (* (pow im 18) (log (/ 1 re))) (pow re 18))) (+ (* -1 (/ (pow im 18) (pow re 18))) (+ (* 6 (/ (* (pow im 12) (log (/ 1 re))) (pow re 12))) (+ (* 36 (pow (log (/ 1 re)) 2)) (/ (pow im 12) (pow re 12)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (pow re 6)))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (* (pow re 6) (+ 1 (/ (pow im 6) (pow re 6))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* 16 (pow (log (/ 1 re)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (* 16 (pow (log (/ 1 re)) 2)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (+ (* 16 (pow (log (/ 1 re)) 2)) (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ 1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* -1/12 (/ (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 6))) (+ (* -1/90 (/ (* (log (/ 1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6)))) (pow re 6))) (+ (* 8 (/ (* (pow im 2) (log (/ 1 re))) (pow re 2))) (+ (* 16 (pow (log (/ 1 re)) 2)) (/ (pow im 4) (pow re 4)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (pow re 4)))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow re 2) (- (/ (pow im 4) (pow re 2)) (pow im 2)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* -10 (log (/ 1 re)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (pow re 10)))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow re 10) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow re 10) (+ 1 (+ (* -1 (/ (pow im 2) (pow re 2))) (/ (pow im 4) (pow re 4)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow re 10) (+ 1 (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (/ (pow im 4) (pow re 4)) (/ (pow im 6) (pow re 6))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (+ (* -1/6 (/ (pow im 6) (* (pow re 6) (log 1/10)))) (+ (* 1/4 (/ (pow im 4) (* (pow re 4) (log 1/10)))) (/ (log (/ -1 re)) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow im 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 10)))) (pow re 6))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 1/10))) (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 1/10))) (+ (* -1/2 (/ (- (/ (pow im 6) (log 1/10)) (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (log 1/10)))) (pow re 6))) (+ (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (* (pow re 4) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (* (log 10) (log (/ -1 re)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (* (log 10) (log (/ -1 re))))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2))))) (pow re 2))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (* (log 10) (log (/ -1 re))))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ -1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))))) (log (/ -1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2))))) (pow re 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (* (log 10) (log (/ -1 re))))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ -1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (* (log 10) (log (/ -1 re))))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))))) (log (/ -1 re)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ -1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))))) (log (/ -1 re))))))) (log (/ -1 re))))))) (pow re 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (log 10) (log (/ -1 re))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2)))))) (log (/ -1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (/ (pow im 2) (log 10))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (log 10) (pow (log (/ -1 re)) 2))))) (pow re 2))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2)))) (pow re 2))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ -1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2)))) (pow re 2)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ -1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (log (/ -1 re)))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ -1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re))))))) (log (/ -1 re))))))) (pow re 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ -1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re)))))) (pow re 4))) (* 1/2 (/ (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2)))) (pow re 2))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (* -1/10 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (* 4/5 (/ (pow im 2) (pow re 2)))) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 2) (pow (log (/ -1 re)) 2)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (pow re 4) (log (/ -1 re))))) (* 4/5 (/ (pow im 2) (pow re 2))))) (+ (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 2) (pow (log (/ -1 re)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 4) (pow (log (/ -1 re)) 2)))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (* (pow re 4) (log (/ -1 re))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* -12 (* (pow im 6) (log (/ -1 re)))) (+ (* -1/12 (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (* -1/90 (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6))))))) (* (pow re 6) (log (/ -1 re))))) (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2))) (log (/ -1 re)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (* (pow re 4) (log (/ -1 re))))) (* 4/5 (/ (pow im 2) (pow re 2)))))) (+ (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 2) (pow (log (/ -1 re)) 2)))) (+ (* -1/240 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (* (pow re 6) (log (/ -1 re))))) (+ (* 1/72000 (/ (* (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 6) (pow (log (/ -1 re)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (* (pow re 4) (pow (log (/ -1 re)) 2)))) (+ (* 1/10 (/ (* (pow im 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (log (/ -1 re)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (log (/ -1 re))))))) (* (pow re 6) (log (/ -1 re))))) (* 1/10 (/ (* (pow im 2) (- (* 4/5 (pow im 2)) (* -1/100 (/ (* (pow im 2) (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))) (pow (log (/ -1 re)) 2))))) (* (pow re 4) (log (/ -1 re)))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (* 36 (pow (log (/ -1 re)) 2)) (* 16 (pow (log (/ -1 re)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (* 36 (pow (log (/ -1 re)) 2))) (* 16 (pow (log (/ -1 re)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/3 (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4))))) (pow im 4)) (pow re 4))) (* 36 (pow (log (/ -1 re)) 2))) (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (* 16 (pow (log (/ -1 re)) 2))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -12 (/ (* (pow im 6) (log (/ -1 re))) (pow re 6))) (* 36 (pow (log (/ -1 re)) 2))) (+ (* -1/3 (/ (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* -1/12 (/ (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 6))) (+ (* -1/90 (/ (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6)))) (pow re 6))) (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (+ (* 16 (pow (log (/ -1 re)) 2)) (/ (pow im 4) (pow re 4))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (* 36 (pow (log (/ -1 re)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ -1 re))) (pow re 6))) (* 36 (pow (log (/ -1 re)) 2)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ -1 re))) (pow re 6))) (+ (* 6 (/ (* (pow im 12) (log (/ -1 re))) (pow re 12))) (+ (* 36 (pow (log (/ -1 re)) 2)) (/ (pow im 12) (pow re 12)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow im 6) (log (/ -1 re))) (pow re 6))) (+ (* -4 (/ (* (pow im 18) (log (/ -1 re))) (pow re 18))) (+ (* -1 (/ (pow im 18) (pow re 18))) (+ (* 6 (/ (* (pow im 12) (log (/ -1 re))) (pow re 12))) (+ (* 36 (pow (log (/ -1 re)) 2)) (/ (pow im 12) (pow re 12)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (/ (pow im 6) (pow re 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* 16 (pow (log (/ -1 re)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (* 16 (pow (log (/ -1 re)) 2)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (+ (* 16 (pow (log (/ -1 re)) 2)) (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ -1 re)) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 4))) (+ (* -1/12 (/ (* (pow im 2) (+ (* -12 (pow im 4)) (* 24 (pow im 4)))) (pow re 6))) (+ (* -1/90 (/ (* (log (/ -1 re)) (+ (* -240 (pow im 6)) (* 720 (pow im 6)))) (pow re 6))) (+ (* 8 (/ (* (pow im 2) (log (/ -1 re))) (pow re 2))) (+ (* 16 (pow (log (/ -1 re)) 2)) (/ (pow im 4) (pow re 4)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* -10 (log (/ -1 re)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 1440 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow re 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow re 2)) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow im 2) (log im)) (log 1/10))) (* -1/2 (/ (pow re 2) (log 1/10)))) (pow im 2))))
#s(approx (* (* im im) (log 1/10)) #s(hole binary64 (* (pow im 2) (log 1/10))))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx im #s(hole binary64 im))
#s(approx (/ (neg (log im)) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (neg (log im)) #s(hole binary64 (* -1 (log im))))
#s(approx (log im) #s(hole binary64 (log im)))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (/ (+ (* (pow im 2) (- (* 6 (log im)) (* 4 (log im)))) (pow re 2)) (pow im 2))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (/ (+ (* 6 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (* 4 (log im)) #s(hole binary64 (* 4 (log im))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 1/10))) (* -1/2 (/ (pow im 2) (* (pow re 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 1/10))) (* (pow im 2) (- (* 1/4 (/ (pow im 2) (* (pow re 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 1/10))) (* (pow im 2) (- (* (pow im 2) (+ (* -1/6 (/ (pow im 2) (* (pow re 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow re 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* -1/2 (/ (pow im 6) (pow re 12))) (/ 1 (pow re 6)))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* (pow im 6) (- (* 1/3 (/ (pow im 6) (pow re 18))) (* 1/2 (/ 1 (pow re 12))))) (/ 1 (pow re 6)))))))
#s(approx (pow (* im im) 3) #s(hole binary64 (pow im 6)))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (pow im 4) #s(hole binary64 (pow im 4)))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (log 10) (log (pow re 10)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (* (pow im 2) (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (log 10) (log (pow re 10))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (log 10) (log (pow re 10))))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (* (log 10) (log (pow re 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (* (log 10) (pow (log (pow re 10)) 2))))))))) (* 1/2 (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2))))))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (log 10) (log (pow re 10))))) (* (pow im 2) (+ (* 1/2 (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2))))))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (- (+ (* 2 (/ (log (pow re 6)) (* (pow re 6) (* (log 10) (log (pow re 10)))))) (/ 1 (* (pow re 6) (* (log 10) (log (pow re 10)))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (* (log 10) (log (pow re 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (* (log 10) (pow (log (pow re 10)) 2))))))) (* (pow re 2) (log (pow re 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))) (* (pow re 4) (log (pow re 10))))) (+ (* 4/3 (/ (log (pow re 4)) (* (pow re 6) (* (log 10) (log (pow re 10)))))) (* 5/3 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 6) (* (log 10) (pow (log (pow re 10)) 2))))))))))) (* 1/2 (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (* (log 10) (log (pow re 10))))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (* (log 10) (log (pow re 10)))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (* (log 10) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (* (log 10) (pow (log (pow re 10)) 2)))))))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (* (pow im 2) (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10)))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))))) (* 1/2 (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10)))) (* (pow im 2) (+ (* 1/2 (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (- (+ (* 2 (/ (log (pow re 6)) (* (pow re 6) (log (pow re 10))))) (/ 1 (* (pow re 6) (log (pow re 10))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 4) (log (pow re 10))))) (+ (* 4/3 (/ (log (pow re 4)) (* (pow re 6) (log (pow re 10))))) (* 5/3 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 6) (pow (log (pow re 10)) 2)))))))))) (* 1/2 (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2))))))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (log (pow re 10)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))) (/ (pow (log (pow re 6)) 2) (log (pow re 10)))) (/ (pow (log (pow re 4)) 2) (log (pow re 10))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (+ (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* (pow im 2) (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))) (/ (pow (log (pow re 6)) 2) (log (pow re 10)))) (/ (pow (log (pow re 4)) 2) (log (pow re 10))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (+ (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* (pow im 2) (- (+ (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (* (pow im 2) (- (+ (* 2 (/ (log (pow re 6)) (* (pow re 6) (log (pow re 10))))) (/ 1 (* (pow re 6) (log (pow re 10))))) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))) (log (pow re 10)))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))) (* (pow re 2) (log (pow re 10))))) (+ (* 1/2 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 4) (log (pow re 10))))) (+ (* 4/3 (/ (log (pow re 4)) (* (pow re 6) (log (pow re 10))))) (* 5/3 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 6) (pow (log (pow re 10)) 2)))))))))) (+ (* -1 (/ (- (* 2 (/ (log (pow re 4)) (* (pow re 2) (log (pow re 10))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2))))) (* (pow re 2) (log (pow re 10))))) (* 1/2 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 4) (pow (log (pow re 10)) 2)))))))) (* -1 (/ (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2)) (* (pow re 2) (pow (log (pow re 10)) 2)))))) (/ (pow (log (pow re 6)) 2) (log (pow re 10)))) (/ (pow (log (pow re 4)) 2) (log (pow re 10))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (pow (log (pow re 6)) 2) (pow (log (pow re 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* 2 (/ (* (pow im 2) (log (pow re 4))) (pow re 2))) (pow (log (pow re 6)) 2)) (pow (log (pow re 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1 (* (pow im 2) (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))))) (* -2 (/ (log (pow re 4)) (pow re 2))))) (pow (log (pow re 6)) 2)) (pow (log (pow re 4)) 2))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* (pow im 2) (- (* (pow im 2) (- (* (pow im 2) (- (+ (* 2 (/ (log (pow re 6)) (pow re 6))) (/ 1 (pow re 6))) (* 4/3 (/ (log (pow re 4)) (pow re 6))))) (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))))) (* -2 (/ (log (pow re 4)) (pow re 2))))) (pow (log (pow re 6)) 2)) (pow (log (pow re 4)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (pow (log (pow re 6)) 2)))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* 2 (/ (* (pow im 6) (log (pow re 6))) (pow re 6))) (pow (log (pow re 6)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* (pow im 6) (+ (* 2 (/ (log (pow re 6)) (pow re 6))) (* (pow im 6) (+ (* -1 (/ (log (pow re 6)) (pow re 12))) (/ 1 (pow re 12)))))) (pow (log (pow re 6)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* (pow im 6) (+ (* 2 (/ (log (pow re 6)) (pow re 6))) (* (pow im 6) (+ (* -1 (/ (log (pow re 6)) (pow re 12))) (+ (* (pow im 6) (- (* 2/3 (/ (log (pow re 6)) (pow re 18))) (/ 1 (pow re 18)))) (/ 1 (pow re 12))))))) (pow (log (pow re 6)) 2))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* -1/2 (/ (pow im 6) (pow re 12))) (/ 1 (pow re 6)))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (log (pow re 6)) (* (pow im 6) (+ (* (pow im 6) (- (* 1/3 (/ (pow im 6) (pow re 18))) (* 1/2 (/ 1 (pow re 12))))) (/ 1 (pow re 6)))))))
#s(approx (pow im 6) #s(hole binary64 (pow im 6)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (pow (log (pow re 4)) 2)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -2 (/ (* (pow im 2) (log (pow re 4))) (pow re 2))) (pow (log (pow re 4)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* (pow im 2) (+ (* -2 (/ (log (pow re 4)) (pow re 2))) (* (pow im 2) (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4)))))) (pow (log (pow re 4)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* (pow im 2) (+ (* -2 (/ (log (pow re 4)) (pow re 2))) (* (pow im 2) (+ (* (pow im 2) (- (* 4/3 (/ (log (pow re 4)) (pow re 6))) (/ 1 (pow re 6)))) (+ (/ 1 (pow re 4)) (/ (log (pow re 4)) (pow re 4))))))) (pow (log (pow re 4)) 2))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 2) (- (pow im 2) (pow re 2)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (log (pow re 10))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow re 10)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow re 10)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (log (pow re 10)) (* (pow im 2) (- (* (pow im 2) (+ (* 5/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 8))) (pow re 10))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* (pow im 2) (+ (* -1 (pow re 8)) (* (pow im 2) (pow re 6)))) (pow re 10))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* (pow im 2) (+ (* -1 (pow re 8)) (* (pow im 2) (+ (* (pow im 2) (pow re 4)) (pow re 6))))) (pow re 10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/6 (/ (pow re 6) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log im)) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (neg (log im)) #s(hole binary64 (log (/ 1 im))))
#s(approx (log im) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow re 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 10)))) (pow im 6))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (* 4 (log im)) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 1/10))) (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 1/10))) (+ (* -1/2 (/ (- (/ (pow re 6) (log 1/10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 1/10)))) (pow im 6))) (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) #s(hole binary64 (* (pow im 6) (+ 1 (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow re 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 2) (- (/ (pow re 4) (pow im 2)) (pow re 2)))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (* (log 10) (log (/ 1 im)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (* (log 10) (log (/ 1 im))))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2))))) (pow im 2))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (* (log 10) (log (/ 1 im))))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ 1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))))) (log (/ 1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2))))) (pow im 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (* (log 10) (log (/ 1 im))))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ 1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (* (log 10) (log (/ 1 im))))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))))) (log (/ 1 im)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ 1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))))) (log (/ 1 im))))))) (log (/ 1 im))))))) (pow im 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ 1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2)))))) (log (/ 1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (log 10) (pow (log (/ 1 im)) 2))))) (pow im 2))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2)))) (pow im 2))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ 1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2)))) (pow im 2)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ 1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (log (/ 1 im)))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ 1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im))))))) (log (/ 1 im))))))) (pow im 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ 1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2)))) (pow im 2))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (* -1/10 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (* 4/5 (/ (pow re 2) (pow im 2)))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 2) (pow (log (/ 1 im)) 2)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (pow im 4) (log (/ 1 im))))) (* 4/5 (/ (pow re 2) (pow im 2))))) (+ (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 2) (pow (log (/ 1 im)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 4) (pow (log (/ 1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (* (pow im 4) (log (/ 1 im))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ 1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (* (pow im 6) (log (/ 1 im))))) (+ (* -1/10 (/ (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2))) (log (/ 1 im)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (pow im 4) (log (/ 1 im))))) (* 4/5 (/ (pow re 2) (pow im 2)))))) (+ (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 2) (pow (log (/ 1 im)) 2)))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (* (pow im 6) (log (/ 1 im))))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 6) (pow (log (/ 1 im)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (* (pow im 4) (pow (log (/ 1 im)) 2)))) (+ (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ 1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (log (/ 1 im))))))) (* (pow im 6) (log (/ 1 im))))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))) (pow (log (/ 1 im)) 2))))) (* (pow im 4) (log (/ 1 im)))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (* 36 (pow (log (/ 1 im)) 2)) (* 16 (pow (log (/ 1 im)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (* 36 (pow (log (/ 1 im)) 2))) (* 16 (pow (log (/ 1 im)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/3 (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (pow im 4))) (* 36 (pow (log (/ 1 im)) 2))) (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (* 16 (pow (log (/ 1 im)) 2))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -12 (/ (* (pow re 6) (log (/ 1 im))) (pow im 6))) (* 36 (pow (log (/ 1 im)) 2))) (+ (* -1/3 (/ (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* -1/12 (/ (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 6))) (+ (* -1/90 (/ (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6)))) (pow im 6))) (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (+ (* 16 (pow (log (/ 1 im)) 2)) (/ (pow re 4) (pow im 4))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (* 36 (pow (log (/ 1 im)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ 1 im))) (pow im 6))) (* 36 (pow (log (/ 1 im)) 2)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ 1 im))) (pow im 6))) (+ (* 6 (/ (* (pow re 12) (log (/ 1 im))) (pow im 12))) (+ (* 36 (pow (log (/ 1 im)) 2)) (/ (pow re 12) (pow im 12)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ 1 im))) (pow im 6))) (+ (* -4 (/ (* (pow re 18) (log (/ 1 im))) (pow im 18))) (+ (* -1 (/ (pow re 18) (pow im 18))) (+ (* 6 (/ (* (pow re 12) (log (/ 1 im))) (pow im 12))) (+ (* 36 (pow (log (/ 1 im)) 2)) (/ (pow re 12) (pow im 12)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (+ (pow re 6) (pow im 6)) #s(hole binary64 (* (pow im 6) (+ 1 (/ (pow re 6) (pow im 6))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* 16 (pow (log (/ 1 im)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (* 16 (pow (log (/ 1 im)) 2)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (+ (* 16 (pow (log (/ 1 im)) 2)) (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ 1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* -1/12 (/ (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 6))) (+ (* -1/90 (/ (* (log (/ 1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6)))) (pow im 6))) (+ (* 8 (/ (* (pow re 2) (log (/ 1 im))) (pow im 2))) (+ (* 16 (pow (log (/ 1 im)) 2)) (/ (pow re 4) (pow im 4)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow im 4) (pow (* re im) 2)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* -10 (log (/ 1 im)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow im 10) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow im 10) (+ 1 (+ (* -1 (/ (pow re 2) (pow im 2))) (/ (pow re 4) (pow im 4)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* (pow im 10) (+ 1 (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (/ (pow re 4) (pow im 4)) (/ (pow re 6) (pow im 6))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (+ (* -1/6 (/ (pow re 6) (* (pow im 6) (log 1/10)))) (+ (* 1/4 (/ (pow re 4) (* (pow im 4) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (* -1 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (log 1/10)))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) #s(hole binary64 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log im)) (log 1/10)) #s(hole binary64 (* -1 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (log 1/10)))))
#s(approx (neg (log im)) #s(hole binary64 (* -1 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (log im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 im))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 10)))) (+ (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10))) (+ (* 1/2 (/ (- (/ (pow re 6) (log 10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 10)))) (pow im 6))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (* 6 (+ (log -1) (* -1 (log (/ -1 im))))) (* 4 (+ (log -1) (* -1 (log (/ -1 im))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) #s(hole binary64 (- (+ (* 6 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2))) (* 4 (+ (log -1) (* -1 (log (/ -1 im))))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (* 6 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) #s(hole binary64 (+ (* 6 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (* 4 (log im)) #s(hole binary64 (* 4 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 1/10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 1/10))) (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 1/10))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 1/10))) (+ (* -1/2 (/ (- (/ (pow re 6) (log 1/10)) (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (log 1/10)))) (pow im 6))) (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (* 1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (* (pow im 4) (log 1/10)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (* (log 10) (log (/ -1 im)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (* (log 10) (log (/ -1 im))))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2))))) (pow im 2))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (* (log 10) (log (/ -1 im))))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ -1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))))) (log (/ -1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2))))) (pow im 2)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (* (log 10) (log (/ -1 im))))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ -1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (* (log 10) (log (/ -1 im))))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))))) (log (/ -1 im)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ -1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))))) (log (/ -1 im))))))) (log (/ -1 im))))))) (pow im 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (log 10) (log (/ -1 im))))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2)))))) (log (/ -1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (/ (pow re 2) (log 10))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (log 10) (pow (log (/ -1 im)) 2))))) (pow im 2))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2)))) (pow im 2))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ -1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2)))) (pow im 2)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) #s(hole binary64 (+ (* -1/20 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (+ (* 1/2 (/ (- (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ -1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (log (/ -1 im)))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im)))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ -1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im))))))) (log (/ -1 im))))))) (pow im 6))) (+ (* 1/2 (/ (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ -1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im)))))) (pow im 4))) (* 1/2 (/ (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2)))) (pow im 2))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (* -1/10 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (* 4/5 (/ (pow re 2) (pow im 2)))) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 2) (pow (log (/ -1 im)) 2)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (pow im 4) (log (/ -1 im))))) (* 4/5 (/ (pow re 2) (pow im 2))))) (+ (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 2) (pow (log (/ -1 im)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 4) (pow (log (/ -1 im)) 2)))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (* (pow im 4) (log (/ -1 im))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1/10 (/ (- (* -12 (* (pow re 6) (log (/ -1 im)))) (+ (* -1/12 (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (* -1/90 (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6))))))) (* (pow im 6) (log (/ -1 im))))) (+ (* -1/10 (/ (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2))) (log (/ -1 im)))) (+ (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (* (pow im 4) (log (/ -1 im))))) (* 4/5 (/ (pow re 2) (pow im 2)))))) (+ (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 2) (pow (log (/ -1 im)) 2)))) (+ (* -1/240 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (* (pow im 6) (log (/ -1 im))))) (+ (* 1/72000 (/ (* (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 6) (pow (log (/ -1 im)) 2)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (* (pow im 4) (pow (log (/ -1 im)) 2)))) (+ (* 1/10 (/ (* (pow re 2) (- (* 1/10 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (log (/ -1 im)))) (+ (* 1/2400 (/ (* (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (log (/ -1 im))))))) (* (pow im 6) (log (/ -1 im))))) (* 1/10 (/ (* (pow re 2) (- (* 4/5 (pow re 2)) (* -1/100 (/ (* (pow re 2) (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))) (pow (log (/ -1 im)) 2))))) (* (pow im 4) (log (/ -1 im)))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (* 36 (pow (log (/ -1 im)) 2)) (* 16 (pow (log (/ -1 im)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (* 36 (pow (log (/ -1 im)) 2))) (* 16 (pow (log (/ -1 im)) 2)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/3 (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4))))) (pow re 4)) (pow im 4))) (* 36 (pow (log (/ -1 im)) 2))) (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (* 16 (pow (log (/ -1 im)) 2))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) #s(hole binary64 (- (+ (* -12 (/ (* (pow re 6) (log (/ -1 im))) (pow im 6))) (* 36 (pow (log (/ -1 im)) 2))) (+ (* -1/3 (/ (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* -1/12 (/ (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 6))) (+ (* -1/90 (/ (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6)))) (pow im 6))) (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (+ (* 16 (pow (log (/ -1 im)) 2)) (/ (pow re 4) (pow im 4))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (* 36 (pow (log (/ -1 im)) 2))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ -1 im))) (pow im 6))) (* 36 (pow (log (/ -1 im)) 2)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ -1 im))) (pow im 6))) (+ (* 6 (/ (* (pow re 12) (log (/ -1 im))) (pow im 12))) (+ (* 36 (pow (log (/ -1 im)) 2)) (/ (pow re 12) (pow im 12)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) #s(hole binary64 (+ (* -12 (/ (* (pow re 6) (log (/ -1 im))) (pow im 6))) (+ (* -4 (/ (* (pow re 18) (log (/ -1 im))) (pow im 18))) (+ (* -1 (/ (pow re 18) (pow im 18))) (+ (* 6 (/ (* (pow re 12) (log (/ -1 im))) (pow im 12))) (+ (* 36 (pow (log (/ -1 im)) 2)) (/ (pow re 12) (pow im 12)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (/ (pow re 6) (pow im 6))))))
#s(approx (log (+ (pow re 6) (pow im 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* 16 (pow (log (/ -1 im)) 2))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (* 16 (pow (log (/ -1 im)) 2)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (+ (* 16 (pow (log (/ -1 im)) 2)) (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -1/3 (/ (* (log (/ -1 im)) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 4))) (+ (* -1/12 (/ (* (pow re 2) (+ (* -12 (pow re 4)) (* 24 (pow re 4)))) (pow im 6))) (+ (* -1/90 (/ (* (log (/ -1 im)) (+ (* -240 (pow re 6)) (* 720 (pow re 6)))) (pow im 6))) (+ (* 8 (/ (* (pow re 2) (log (/ -1 im))) (pow im 2))) (+ (* 16 (pow (log (/ -1 im)) 2)) (/ (pow re 4) (pow im 4)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (* -10 (log (/ -1 im)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) #s(hole binary64 (+ (* -10 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 1440 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
Outputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))))
(fma.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
(+.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
(*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64))))
(/.f64 (neg.f64 (*.f64 re re)) (neg.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))))
(/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 re re)
(pow.f64 re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
re
(*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))
(log.f64 (pow.f64 #s(literal 1/10 binary64) (*.f64 im im)))
(*.f64 (neg.f64 im) (neg.f64 im))
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 im im)
(pow.f64 im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
im
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (neg.f64 (log.f64 im))) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))
(*.f64 #s(literal -1 binary64) (log.f64 im))
(neg.f64 (log.f64 im))
(-.f64 #s(literal 0 binary64) (log.f64 im))
(log.f64 (pow.f64 im #s(literal -1 binary64)))
(log.f64 im)
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im)))))) (neg.f64 (log.f64 #s(literal 10 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im)))))
#s(literal 1/2 binary64)
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (+.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))))
(-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 re im) (/.f64 re im)) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (*.f64 (/.f64 re im) (/.f64 re im))))))
(fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im)))
(+.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(literal 6 binary64)
(*.f64 (/.f64 re im) (/.f64 re im))
(/.f64 (neg.f64 (*.f64 re re)) (neg.f64 (*.f64 im im)))
(/.f64 (*.f64 re re) (*.f64 im im))
(*.f64 #s(literal 4 binary64) (log.f64 im))
(log.f64 (pow.f64 im #s(literal 4 binary64)))
#s(literal 4 binary64)
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))) (neg.f64 (log.f64 #s(literal 10 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (fma.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))) (*.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))))
(-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))))
(*.f64 (fma.f64 (*.f64 im im) (*.f64 im im) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))) (fma.f64 im im (*.f64 re re)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 re re) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 re re) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))) (*.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64))))))
(fma.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 im im) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))
(fma.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))
(+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 im im))
(*.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))
(*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))
(pow.f64 (*.f64 im im) #s(literal 3 binary64))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 3 binary64)))
#s(literal 3 binary64)
(*.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 re re))
(*.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))
(*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))
(pow.f64 (*.f64 re re) #s(literal 3 binary64))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 3 binary64)))
(log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)) (-.f64 (*.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))))
(+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(pow.f64 im #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)))
(/.f64 (-.f64 (pow.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)) (fma.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(pow.f64 re #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 4 binary64)))
(*.f64 (*.f64 re re) (*.f64 im im))
(*.f64 (*.f64 re im) (*.f64 re im))
(pow.f64 (*.f64 re im) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 re im)) #s(literal 2 binary64)))
(*.f64 re im)
#s(literal 2 binary64)
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 10 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))))) (neg.f64 (log.f64 #s(literal 10 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))) (log.f64 #s(literal 10 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64)))) (neg.f64 (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
(/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(-.f64 (/.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (/.f64 (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64)) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64)))
(*.f64 (neg.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (neg.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
(*.f64 (fabs.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (fabs.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
(*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
(pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64))
(log.f64 (pow.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
(log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)) (-.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (*.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
(+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))
(pow.f64 re #s(literal 6 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 6 binary64)))
(pow.f64 im #s(literal 6 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)))
(*.f64 (neg.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) (neg.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(*.f64 (fabs.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) (fabs.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) #s(literal 2 binary64))
(log.f64 (pow.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 3 binary64))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))
(/.f64 (-.f64 (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)) (fma.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))
(-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(+.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (*.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* re re) (* (* im im) (log 1/10))) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))
#s(approx (* re re) (*.f64 re re))
#s(approx re re)
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 (*.f64 re re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (*.f64 re re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -2 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -2 binary64)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (pow.f64 im #s(literal -2 binary64))))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -4 binary64)))) (pow.f64 im #s(literal -2 binary64))))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (/ (* re re) (* im im)) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 re re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (*.f64 re re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -2 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -2 binary64)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (pow.f64 im #s(literal -2 binary64))))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -4 binary64)))) (pow.f64 im #s(literal -2 binary64))))) (*.f64 #s(literal 4 binary64) (log.f64 im))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 12 binary64))) (pow.f64 im #s(literal -6 binary64))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (fma.f64 (pow.f64 re #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 18 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -12 binary64)))) (pow.f64 im #s(literal -6 binary64))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) (pow.f64 im #s(literal 6 binary64)))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
#s(approx (pow (* re re) 3) (pow.f64 re #s(literal 6 binary64)))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (*.f64 #s(literal 4 binary64) (log.f64 im)))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal -2 binary64))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (*.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -4 binary64))))) (pow.f64 im #s(literal -2 binary64))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (pow.f64 im #s(literal 4 binary64)))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (fma.f64 (*.f64 re re) (-.f64 (*.f64 re re) (*.f64 im im)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* re im) 2)) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
#s(approx (- (pow re 4) (pow (* re im) 2)) (*.f64 (*.f64 re re) (-.f64 (*.f64 re re) (*.f64 im im))))
#s(approx (pow re 4) (pow.f64 re #s(literal 4 binary64)))
#s(approx (pow (* re im) 2) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
#s(approx (* re im) (*.f64 im re))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 (*.f64 re re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 (*.f64 re re) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))) (*.f64 (*.f64 re re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re re) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (pow.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64)))))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal 5/3 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64)))))))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im))) (*.f64 (*.f64 re re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im))) (*.f64 (*.f64 re re) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (*.f64 re re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re re) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (pow.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 5/3 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 re re) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 re re) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 (*.f64 re re) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im))) (*.f64 (*.f64 re re) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (pow.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (fma.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 5/3 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (*.f64 (*.f64 im im) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 im)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 im (*.f64 #s(literal 10 binary64) (log.f64 im))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 #s(literal 4 binary64) (log.f64 im))) (*.f64 im im)) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 re re) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 im im)))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re re) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (pow.f64 im #s(literal 6 binary64))) (pow.f64 im #s(literal -6 binary64))) (*.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (pow.f64 im #s(literal 6 binary64)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 im im)))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 6 binary64) (log.f64 im))) (pow.f64 im #s(literal 6 binary64))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (pow.f64 im #s(literal 6 binary64))) (*.f64 (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (pow.f64 im #s(literal 12 binary64))) (pow.f64 im #s(literal -12 binary64))))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (pow.f64 im #s(literal 6 binary64))) (*.f64 (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (pow.f64 im #s(literal 12 binary64))) (fma.f64 (pow.f64 re #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) (pow.f64 im #s(literal 18 binary64)))) (pow.f64 im #s(literal -18 binary64))) (pow.f64 im #s(literal -12 binary64)))))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (log (+ (pow re 6) (pow im 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 12 binary64))) (pow.f64 im #s(literal -6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (fma.f64 (pow.f64 re #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 18 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -12 binary64)))) (pow.f64 im #s(literal -6 binary64))))))
#s(approx (+ (pow re 6) (pow im 6)) (pow.f64 im #s(literal 6 binary64)))
#s(approx (+ (pow re 6) (pow im 6)) (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
#s(approx (pow re 6) (pow.f64 re #s(literal 6 binary64)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 #s(literal 4 binary64) (log.f64 im))) (*.f64 im im)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 (*.f64 re re) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 im im)) (*.f64 (*.f64 re re) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 (*.f64 re re) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (*.f64 im im)) (*.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 im #s(literal -6 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 im))) (pow.f64 im #s(literal 4 binary64)))))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 #s(literal 4 binary64) (log.f64 im)))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal -2 binary64))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (*.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -4 binary64))))) (pow.f64 im #s(literal -2 binary64))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (pow.f64 im #s(literal 4 binary64)))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (fma.f64 (*.f64 re re) (-.f64 (*.f64 re re) (*.f64 im im)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (pow.f64 im #s(literal 4 binary64)))
#s(approx (- (pow im 4) (pow (* re im) 2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (*.f64 #s(literal 10 binary64) (log.f64 im)))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 10 binary64) (log.f64 im) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 10 binary64) (log.f64 im) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal -2 binary64))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 10 binary64) (log.f64 im) (*.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal 5/3 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -4 binary64))))) (pow.f64 im #s(literal -2 binary64))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (pow.f64 im #s(literal 10 binary64)))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) (*.f64 re re)) (pow.f64 im #s(literal 10 binary64))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 (*.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 8 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 re re))) (pow.f64 im #s(literal 10 binary64))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 (*.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 8 binary64)) (*.f64 (*.f64 re re) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 re re) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 im #s(literal 10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (log.f64 #s(literal 10 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (*.f64 re re) (-.f64 (fma.f64 #s(literal 6 binary64) (/.f64 (log.f64 im) (*.f64 re re)) (pow.f64 im #s(literal -2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (log.f64 im) (*.f64 re re))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 (*.f64 re re) (fma.f64 #s(literal 6 binary64) (/.f64 (log.f64 im) (*.f64 re re)) (pow.f64 im #s(literal -2 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (log.f64 #s(literal 1/10 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (log.f64 #s(literal 1/10 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 1/10 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) (pow.f64 re #s(literal 6 binary64)))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (pow.f64 re #s(literal 4 binary64)))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (- (pow re 4) (pow (* re im) 2)) (pow.f64 re #s(literal 4 binary64)))
#s(approx (- (pow re 4) (pow (* re im) 2)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 re))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))) (*.f64 re re)))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 re))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))))) (neg.f64 (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))) (*.f64 re re))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 re))))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))))) (neg.f64 (log.f64 re))) (fma.f64 #s(literal 1/72000 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 re))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))))) (neg.f64 (log.f64 re))))))) (neg.f64 (log.f64 re))))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 re))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))))) (neg.f64 (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))) (*.f64 re re)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (neg.f64 (log.f64 re)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (neg.f64 (log.f64 re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (*.f64 re re)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (neg.f64 (log.f64 re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (*.f64 re re))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (neg.f64 (log.f64 re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))))) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 re))) (fma.f64 #s(literal 1/72000 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 im #s(literal 6 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 re))))))) (neg.f64 (log.f64 re))))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (*.f64 re re)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (neg.f64 (log.f64 re)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (neg.f64 (log.f64 re))) (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (*.f64 re (neg.f64 (log.f64 re))) #s(literal 2 binary64))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (neg.f64 (log.f64 re))) (fma.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (log.f64 re)))) (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))) (fma.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (*.f64 re (neg.f64 (log.f64 re))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (neg.f64 (log.f64 re)))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 re #s(literal 6 binary64)) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (neg.f64 (log.f64 re))) (fma.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (log.f64 re)))) (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))) (fma.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (*.f64 re (neg.f64 (log.f64 re))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/240 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/72000 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (neg.f64 (log.f64 re)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 re)))))) (neg.f64 (log.f64 re)))) (*.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))) (neg.f64 (log.f64 re))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im im) (neg.f64 (log.f64 re))) (*.f64 re re)) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (neg.f64 (log.f64 re))) (*.f64 re re)) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (neg.f64 (log.f64 re))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (neg.f64 (log.f64 re))) (*.f64 re re)) (fma.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (neg.f64 (log.f64 re))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (neg.f64 (log.f64 re))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 6 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 12 binary64)) (neg.f64 (log.f64 re))) (pow.f64 re #s(literal 12 binary64))) (fma.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (neg.f64 (log.f64 re))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 18 binary64)) (neg.f64 (log.f64 re))) (pow.f64 re #s(literal 18 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) (fma.f64 #s(literal 6 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 12 binary64)) (neg.f64 (log.f64 re))) (pow.f64 re #s(literal 12 binary64))) (fma.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (+ (pow re 6) (pow im 6)) (pow.f64 re #s(literal 6 binary64)))
#s(approx (+ (pow re 6) (pow im 6)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (neg.f64 (log.f64 re))) (*.f64 re re)) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (neg.f64 (log.f64 re))) (*.f64 re re)) (fma.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (neg.f64 (log.f64 re))) (*.f64 re re)) (fma.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (pow.f64 re #s(literal 4 binary64)))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (*.f64 (*.f64 re re) (-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 re re)) (*.f64 im im))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (*.f64 #s(literal -10 binary64) (neg.f64 (log.f64 re))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (neg.f64 (log.f64 re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (neg.f64 (log.f64 re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (pow.f64 re #s(literal 10 binary64)))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 (pow.f64 re #s(literal 10 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 (pow.f64 re #s(literal 10 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 (pow.f64 re #s(literal 10 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (+.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (log.f64 #s(literal 10 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 (*.f64 im im) (*.f64 re re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 1/10 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 (*.f64 im im) (*.f64 re re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (*.f64 re re)))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (*.f64 re re))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal 1/72000 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (*.f64 re re)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (*.f64 re re)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (*.f64 re re))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal 1/72000 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 im #s(literal 6 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (*.f64 re re)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (*.f64 re (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 2 binary64))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))) (fma.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (*.f64 re (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))) (fma.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (*.f64 re (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/240 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal 1/72000 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 im im)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) re))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 re re)) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 re re)) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 re re)) (fma.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 6 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 12 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))) (pow.f64 re #s(literal 12 binary64))) (fma.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 18 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))) (pow.f64 re #s(literal 18 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) (fma.f64 #s(literal 6 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 12 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))) (pow.f64 re #s(literal 12 binary64))) (fma.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -6 binary64))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 re re)) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 re re)) (fma.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 re re)) (fma.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -4 binary64))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -10 binary64))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) (log.f64 #s(literal 1/10 binary64))) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) (log.f64 #s(literal 1/10 binary64))) (*.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im)))
#s(approx (* (* im im) (log 1/10)) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))))
#s(approx (* im im) (*.f64 im im))
#s(approx im im)
#s(approx (/ (neg (log im)) (log 1/10)) (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 im) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log im)) (neg.f64 (log.f64 im)))
#s(approx (log im) (log.f64 im))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) #s(literal -1 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -2 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -2 binary64)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 re) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 re) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal -2 binary64))))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 re) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -4 binary64)))) (pow.f64 re #s(literal -2 binary64))))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (/.f64 (fma.f64 (*.f64 im im) (log.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 re re)) (*.f64 im im)))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (/.f64 (fma.f64 #s(literal 6 binary64) (*.f64 (*.f64 im im) (log.f64 im)) (*.f64 re re)) (*.f64 im im)))
#s(approx (* 4 (log im)) (*.f64 #s(literal 4 binary64) (log.f64 im)))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 im im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -2 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -2 binary64)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (log.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 re) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 re) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal -2 binary64))))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 re) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -4 binary64)))) (pow.f64 re #s(literal -2 binary64))))) (*.f64 #s(literal 4 binary64) (log.f64 re))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (*.f64 #s(literal 6 binary64) (log.f64 re)))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal 6 binary64) (log.f64 re) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal 6 binary64) (log.f64 re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 12 binary64))) (pow.f64 re #s(literal -6 binary64))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal 6 binary64) (log.f64 re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 18 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -12 binary64)))) (pow.f64 re #s(literal -6 binary64))))))
#s(approx (pow (* im im) 3) (pow.f64 im #s(literal 6 binary64)))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (*.f64 #s(literal 4 binary64) (log.f64 re)))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal -2 binary64))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (*.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -4 binary64))))) (pow.f64 re #s(literal -2 binary64))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (fma.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (pow im 4) (pow.f64 im #s(literal 4 binary64)))
#s(approx (- (pow re 4) (pow (* re im) 2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))) (*.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (pow.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64)))))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal 5/3 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64)))))))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re))) (*.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re))) (*.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (pow.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 5/3 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 im im) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 im im) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 (*.f64 im im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re))) (*.f64 (*.f64 im im) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (pow.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (fma.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 5/3 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (*.f64 (*.f64 re re) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 10 binary64) (log.f64 re)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 re (*.f64 #s(literal 10 binary64) (log.f64 re))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 re)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (log.f64 re))) (*.f64 re re)) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 im im) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 re re)))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal -6 binary64))) (*.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (pow.f64 re #s(literal 6 binary64)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 re re)))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64)))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 6 binary64) (log.f64 re))) (pow.f64 re #s(literal 6 binary64))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (pow.f64 re #s(literal 6 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (pow.f64 re #s(literal 12 binary64))) (pow.f64 re #s(literal -12 binary64))))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (pow.f64 re #s(literal 6 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (pow.f64 re #s(literal 12 binary64))) (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) (pow.f64 re #s(literal 18 binary64)))) (pow.f64 re #s(literal -18 binary64))) (pow.f64 re #s(literal -12 binary64)))))) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (log (+ (pow re 6) (pow im 6))) (*.f64 #s(literal 6 binary64) (log.f64 re)))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal 6 binary64) (log.f64 re) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal 6 binary64) (log.f64 re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 12 binary64))) (pow.f64 re #s(literal -6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal 6 binary64) (log.f64 re) (*.f64 (pow.f64 im #s(literal 6 binary64)) (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 18 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -12 binary64)))) (pow.f64 re #s(literal -6 binary64))))))
#s(approx (pow im 6) (pow.f64 im #s(literal 6 binary64)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64)))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (log.f64 re))) (*.f64 re re)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 re re)) (*.f64 (*.f64 im im) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (*.f64 re re)) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 re #s(literal -6 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (log.f64 re))) (pow.f64 re #s(literal 4 binary64)))))) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 re)) #s(literal 2 binary64))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 #s(literal 4 binary64) (log.f64 re)))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal -2 binary64))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (*.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -4 binary64))))) (pow.f64 re #s(literal -2 binary64))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (fma.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (*.f64 #s(literal 10 binary64) (log.f64 re)))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 10 binary64) (log.f64 re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 10 binary64) (log.f64 re) (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal -2 binary64))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 10 binary64) (log.f64 re) (*.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal 5/3 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -4 binary64))))) (pow.f64 re #s(literal -2 binary64))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 im im) (pow.f64 re #s(literal 8 binary64))) (pow.f64 re #s(literal 10 binary64))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 8 binary64)) (*.f64 (*.f64 im im) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 re #s(literal 10 binary64))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 8 binary64)) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log im)) (log 1/10)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (neg (log im)) (neg.f64 (log.f64 im)))
#s(approx (log im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 im))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 10 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64))))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (* 4 (log im)) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 1/10 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 1/10 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 1/10 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (+ (pow (* im im) 3) (pow (* re re) 3)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (- (pow re 4) (pow (* re im) 2)) (*.f64 (*.f64 im im) (-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 im im)) (*.f64 re re))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))) (*.f64 im im)))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))))) (neg.f64 (log.f64 im)))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))) (*.f64 im im))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im))))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))))) (neg.f64 (log.f64 im))) (fma.f64 #s(literal 1/72000 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))))) (neg.f64 (log.f64 im))))))) (neg.f64 (log.f64 im))))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))))) (neg.f64 (log.f64 im)))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))) (*.f64 im im)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (neg.f64 (log.f64 im)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (neg.f64 (log.f64 im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (*.f64 im im)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (neg.f64 (log.f64 im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 im)))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (*.f64 im im))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (neg.f64 (log.f64 im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))))) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 im))) (fma.f64 #s(literal 1/72000 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 re #s(literal 6 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 im))))))) (neg.f64 (log.f64 im))))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 im)))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (*.f64 im im)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (neg.f64 (log.f64 im)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (neg.f64 (log.f64 im))) (*.f64 #s(literal 4/5 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (*.f64 im (neg.f64 (log.f64 im))) #s(literal 2 binary64))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (neg.f64 (log.f64 im))) (fma.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (neg.f64 (log.f64 im)))) (*.f64 #s(literal 4/5 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))) (fma.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (*.f64 im (neg.f64 (log.f64 im))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (neg.f64 (log.f64 im)))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (neg.f64 (log.f64 im))) (fma.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (neg.f64 (log.f64 im)))) (*.f64 #s(literal 4/5 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))) (fma.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (*.f64 im (neg.f64 (log.f64 im))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/240 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/72000 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (neg.f64 (log.f64 im)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))) (neg.f64 (log.f64 im)))))) (neg.f64 (log.f64 im)))) (*.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))) (neg.f64 (log.f64 im))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 re re) (neg.f64 (log.f64 im))) (*.f64 im im)) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (neg.f64 (log.f64 im))) (*.f64 im im)) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (neg.f64 (log.f64 im))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (neg.f64 (log.f64 im))) (*.f64 im im)) (fma.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (neg.f64 (log.f64 im))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (neg.f64 (log.f64 im))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 6 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 12 binary64)) (neg.f64 (log.f64 im))) (pow.f64 im #s(literal 12 binary64))) (fma.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (neg.f64 (log.f64 im))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 18 binary64)) (neg.f64 (log.f64 im))) (pow.f64 im #s(literal 18 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) (fma.f64 #s(literal 6 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 12 binary64)) (neg.f64 (log.f64 im))) (pow.f64 im #s(literal 12 binary64))) (fma.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (+ (pow re 6) (pow im 6)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (neg.f64 (log.f64 im))) (*.f64 im im)) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (neg.f64 (log.f64 im))) (*.f64 im im)) (fma.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (neg.f64 (log.f64 im))) (*.f64 im im)) (fma.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (- (pow im 4) (pow (* re im) 2)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (*.f64 #s(literal -10 binary64) (neg.f64 (log.f64 im))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (neg.f64 (log.f64 im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (neg.f64 (log.f64 im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 (pow.f64 im #s(literal 10 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 (pow.f64 im #s(literal 10 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (*.f64 (pow.f64 im #s(literal 10 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (+.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (neg (log im)) (log 1/10)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log im)) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64))))))
#s(approx (log im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (log.f64 #s(literal 10 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64))))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 10 binary64)))))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (* 1/2 (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 (/.f64 re im) (/.f64 re im))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (-.f64 (*.f64 #s(literal 6 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64))))) (*.f64 #s(literal 4 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (-.f64 (fma.f64 #s(literal 6 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))) (*.f64 (/.f64 re im) (/.f64 re im))) (*.f64 #s(literal 4 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 #s(literal 6 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (fma.f64 #s(literal 6 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (* 4 (log im)) (*.f64 #s(literal 4 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))))))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 1/10 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 (/.f64 re im) (/.f64 re im))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64)))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
#s(approx (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (log (+ (pow (* im im) 3) (pow (* re re) 3))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (*.f64 im im)))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (*.f64 im im))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))))) (log.f64 (/.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal 1/72000 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64)))) (*.f64 #s(literal -1/100 binary64) (*.f64 (/.f64 (*.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (*.f64 im im)))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (*.f64 im im)))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (*.f64 im im))))))
#s(approx (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (fma.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal 1/72000 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 re #s(literal 6 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (*.f64 im im)))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (*.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) im))) (*.f64 #s(literal 4/5 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (*.f64 im (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (*.f64 #s(literal 4/5 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))) (fma.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (*.f64 im (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))))))
#s(approx (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal -12 binary64) (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal -1/10 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (*.f64 #s(literal 4/5 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))) (fma.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (*.f64 im (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/240 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal 1/72000 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2400 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/10 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (fma.f64 #s(literal 1/2400 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/10 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (*.f64 #s(literal 1/10 binary64) (*.f64 (/.f64 (*.f64 re re) (pow.f64 im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 4/5 binary64) (*.f64 re re)) (*.f64 #s(literal -1/100 binary64) (/.f64 (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 re re) (log.f64 (/.f64 #s(literal -1 binary64) im))) (*.f64 im im)) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (log.f64 (/.f64 #s(literal -1 binary64) im))) (*.f64 im im)) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))))
#s(approx (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (-.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (log.f64 (/.f64 #s(literal -1 binary64) im))) (*.f64 im im)) (fma.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 6 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 12 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (pow.f64 im #s(literal 12 binary64))) (fma.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64)))))))
#s(approx (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (fma.f64 #s(literal -12 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 18 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (pow.f64 im #s(literal 18 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) (fma.f64 #s(literal 6 binary64) (/.f64 (*.f64 (pow.f64 re #s(literal 12 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (pow.f64 im #s(literal 12 binary64))) (fma.f64 #s(literal 36 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64)))))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -6 binary64))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (log (+ (pow re 6) (pow im 6))) (fma.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (log.f64 (/.f64 #s(literal -1 binary64) im))) (*.f64 im im)) (*.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (log.f64 (/.f64 #s(literal -1 binary64) im))) (*.f64 im im)) (fma.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 re re) (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re re) (log.f64 (/.f64 #s(literal -1 binary64) im))) (*.f64 im im)) (fma.f64 #s(literal 16 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -4 binary64))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (fma.f64 #s(literal -4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -10 binary64))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))) (fma.f64 #s(literal -10 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -240 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1440 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (pow.f64 re #s(literal 4 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))))))))

eval345.0ms (3.8%)

Memory
19.1MiB live, 295.6MiB allocated; 97ms collecting garbage
Compiler

Compiled 79 829 to 5 090 computations (93.6% saved)

prune70.0ms (0.8%)

Memory
-14.8MiB live, 84.5MiB allocated; 13ms collecting garbage
Pruning

16 alts after pruning (9 fresh and 7 done)

PrunedKeptTotal
New9389947
Fresh000
Picked314
Done066
Total94116957
Accuracy
100.0%
Counts
957 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓49.9%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
✓50.1%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
98.1%
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 #s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 #s(literal 6 binary64) (log.f64 im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
3.5%
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
✓99.0%
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
✓98.3%
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
✓99.1%
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
✓98.5%
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
97.6%
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))))))
98.4%
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im))))))
98.0%
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 1/10 binary64)))))
✓86.6%
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
92.8%
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))))))
47.1%
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im))))
48.0%
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
3.2%
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
Compiler

Compiled 1 631 to 636 computations (61% saved)

regimes78.0ms (0.9%)

Memory
30.6MiB live, 75.6MiB allocated; 17ms collecting garbage
Counts
21 → 1
Calls
Call 1
Inputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 #s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 #s(literal 6 binary64) (log.f64 im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow (* im im) 3) (pow (* re re) 3))) (log (+ (pow im 4) (- (pow re 4) (pow (* re im) 2)))))) (neg (log 1/10))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im))) (*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 (*.f64 re re) (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) (-.f64 (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 im im) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))))) (*.f64 im im))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 (*.f64 re re) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 im) (*.f64 (*.f64 re re) (log.f64 #s(literal 1/10 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 im im) (log.f64 #s(literal 1/10 binary64))) #s(literal -1 binary64)))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 10 binary64)) (*.f64 #s(literal 10 binary64) (log.f64 im))))))
#s(approx (/ (* 1/2 (/ (- (* (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 6) (pow im 6)))) (* (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))) (log (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4))))) (log (* (+ (pow re 6) (pow im 6)) (+ (- (pow im 4) (pow (* re im) 2)) (pow re 4)))))) (log 10)) (*.f64 #s(literal -1/20 binary64) (/.f64 (-.f64 (*.f64 #s(literal 36 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64))) (*.f64 #s(literal 16 binary64) (pow.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 10 binary64)) (neg.f64 (log.f64 im))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 (*.f64 im im) #s(literal 3 binary64)) (pow.f64 (*.f64 re re) #s(literal 3 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))) #s(literal -1/2 binary64)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (log.f64 (*.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))))) (log.f64 #s(literal 10 binary64)))
Outputs
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
Calls

8 calls:

20.0ms
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
8.0ms
im
8.0ms
re
8.0ms
(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
8.0ms
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
Results
AccuracySegmentsBranch
99.1%1(*.f64 im im)
99.1%1(*.f64 re re)
99.1%1(+.f64 (*.f64 re re) (*.f64 im im))
99.1%1(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
99.1%1(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
99.1%1(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
99.1%1re
99.1%1im
Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes43.0ms (0.5%)

Memory
-4.9MiB live, 40.0MiB allocated; 18ms collecting garbage
Counts
7 → 1
Calls
Call 1
Inputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* im im) (* re re))) im))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
Outputs
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
Calls

8 calls:

5.0ms
re
4.0ms
im
4.0ms
(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
4.0ms
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
3.0ms
(*.f64 im im)
Results
AccuracySegmentsBranch
98.5%1(*.f64 im im)
98.5%1(*.f64 re re)
98.5%1(+.f64 (*.f64 re re) (*.f64 im im))
98.5%1(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
98.5%1(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
98.5%1(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
98.5%1re
98.5%1im
Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes91.0ms (1%)

Memory
-39.7MiB live, 27.5MiB allocated; 140ms collecting garbage
Counts
2 → 1
Calls
Call 1
Inputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
Outputs
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
Calls

8 calls:

76.0ms
(+.f64 (*.f64 re re) (*.f64 im im))
2.0ms
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
2.0ms
im
2.0ms
re
2.0ms
(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
Results
AccuracySegmentsBranch
3.5%1(*.f64 im im)
3.5%1(+.f64 (*.f64 re re) (*.f64 im im))
3.5%1(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
3.5%1(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
3.5%1(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
3.5%1im
3.5%1(*.f64 re re)
3.5%1re
Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes14.0ms (0.2%)

Memory
24.2MiB live, 24.2MiB allocated; 0ms collecting garbage
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
Outputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
Calls

8 calls:

2.0ms
im
2.0ms
re
2.0ms
(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
2.0ms
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
1.0ms
(+.f64 (*.f64 re re) (*.f64 im im))
Results
AccuracySegmentsBranch
3.2%1(*.f64 re re)
3.2%1re
3.2%1(*.f64 im im)
3.2%1(+.f64 (*.f64 re re) (*.f64 im im))
3.2%1(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
3.2%1(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
3.2%1(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
3.2%1im
Compiler

Compiled 44 to 38 computations (13.6% saved)

simplify90.0ms (1%)

Memory
-7.1MiB live, 41.7MiB allocated; 21ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
064122
1118122
2336116
31603116
46240116
Stop Event
1×node limit
Calls
Call 1
Inputs
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))
Outputs
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2))))) #s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(approx (+ (* (/ (* re re) (* (* im im) (log 1/10))) -1/2) (/ (neg (log im)) (log 1/10))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 re (log.f64 #s(literal 1/10 binary64)))))))

derivations481.0ms (5.3%)

Memory
-9.0MiB live, 363.3MiB allocated; 92ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 122 to 67 computations (45.1% saved)

preprocess49.0ms (0.5%)

Memory
6.0MiB live, 51.7MiB allocated; 11ms collecting garbage
Remove

(sort re im)

(abs im)

(abs re)

Compiler

Compiled 310 to 196 computations (36.8% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...