math.log10 on complex, real part

Time bar (total: 2.8s)

start0.0ms (0%)

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

analyze62.0ms (2.2%)

Memory
-16.4MiB live, 127.0MiB allocated; 20ms collecting garbage
Algorithm
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)

sample908.0ms (32.7%)

Memory
87.1MiB live, 1 328.0MiB allocated; 168ms collecting garbage
Samples
669.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 418.0ms
ival-hypot: 256.0ms (61.2% of total)
ival-log: 101.0ms (24.2% of total)
ival-div!: 60.0ms (14.4% of total)
adjust: 1.0ms (0.2% of total)
Bogosity

explain197.0ms (7.1%)

Memory
-49.5MiB live, 218.0MiB allocated; 144ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1340-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-rescue1230
(+.f64 (*.f64 re re) (*.f64 im im))overflow123
(*.f64 re re)overflow67
(*.f64 im im)overflow78
sqrt.f64(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))uflow-rescue110
(+.f64 (*.f64 re re) (*.f64 im im))underflow11
(*.f64 re re)underflow45
(*.f64 im im)underflow63
Confusion
Predicted +Predicted -
+1340
-0122
Precision
1.0
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+13400
-00122
Precision?
1.0
Recall?
1.0
Freqs
test
numberfreq
0122
1134
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
54.0ms512×0valid
Compiler

Compiled 110 to 34 computations (69.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 39.0ms
ival-hypot: 22.0ms (56.6% of total)
ival-log: 8.0ms (20.6% of total)
ival-mult!: 5.0ms (12.9% of total)
ival-div!: 2.0ms (5.1% of total)
ival-add!: 1.0ms (2.6% of total)
adjust: 0.0ms (0% of total)

preprocess16.0ms (0.6%)

Memory
28.5MiB live, 28.5MiB allocated; 0ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02874
16074
211074
313574
417374
01012
01712
12812
26712
312412
416112
01617
Stop Event
iter limit
saturated
iter limit
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)

prune0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.9%
(/.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)

series18.0ms (0.7%)

Memory
-20.5MiB live, 26.8MiB allocated; 5ms 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
6.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)
3.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)
3.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)
1.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)

rewrite182.0ms (6.5%)

Memory
8.2MiB live, 234.1MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03602530
03712390
120122358
096231900
Stop Event
iter limit
node limit
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))))

eval27.0ms (1%)

Memory
6.6MiB live, 52.3MiB allocated; 4ms collecting garbage
Compiler

Compiled 4 158 to 936 computations (77.5% saved)

prune5.0ms (0.2%)

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

4 alts after pruning (4 fresh and 0 done)

PrunedKeptTotal
New2134217
Fresh000
Picked101
Done000
Total2144218
Accuracy
99.7%
Counts
218 → 4
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.9%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
98.9%
(/.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.8%
(/.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)

series27.0ms (1%)

Memory
-13.4MiB live, 42.7MiB allocated; 5ms 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
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))
4.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))
3.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))
3.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))
3.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))

rewrite239.0ms (8.6%)

Memory
7.8MiB live, 280.7MiB allocated; 93ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07637339
07866597
141086445
096406163
Stop Event
iter limit
node limit
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))))))

eval25.0ms (0.9%)

Memory
3.4MiB live, 49.2MiB allocated; 3ms collecting garbage
Compiler

Compiled 6 013 to 962 computations (84% saved)

prune7.0ms (0.3%)

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

7 alts after pruning (3 fresh and 4 done)

PrunedKeptTotal
New2313234
Fresh000
Picked044
Done000
Total2317238
Accuracy
99.7%
Counts
238 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.5%
(/.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)))
48.8%
(/.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))))
48.9%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
98.9%
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
98.6%
(/.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.8%
(/.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)

series176.0ms (6.3%)

Memory
-2.6MiB live, 277.3MiB allocated; 82ms 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
57.0ms
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)
37.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)
22.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)
21.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)
16.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)

rewrite255.0ms (9.2%)

Memory
-36.8MiB live, 316.2MiB allocated; 48ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0112312460
0116311251
1669111251
0817010301
Stop Event
iter limit
node limit
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)))))))

eval51.0ms (1.8%)

Memory
15.0MiB live, 60.7MiB allocated; 6ms collecting garbage
Compiler

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

prune49.0ms (1.8%)

Memory
-22.3MiB live, 25.3MiB allocated; 2ms collecting garbage
Pruning

7 alts after pruning (1 fresh and 6 done)

PrunedKeptTotal
New4251426
Fresh000
Picked123
Done044
Total4267433
Accuracy
99.7%
Counts
433 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.8%
(/.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))))
48.9%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
85.9%
(/.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)))
98.9%
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
98.6%
(/.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.8%
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
Compiler

Compiled 114 to 91 computations (20.2% saved)

series101.0ms (3.7%)

Memory
7.8MiB live, 96.7MiB allocated; 22ms collecting garbage
Counts
17 → 101
Calls
Call 1
Inputs
(/.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)
(log.f64 im)
im
(/.f64 (*.f64 re re) (*.f64 im im))
(*.f64 re 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)
Outputs
#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 (* 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 (/ (- (* -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 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 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 (log im) #s(hole binary64 (log im)))
#s(approx im #s(hole binary64 im))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx (* 4 (log im)) #s(hole binary64 (* 4 (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 (/ (- (* -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 (log im) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (* 4 (log im)) #s(hole binary64 (* -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)))))) (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 (log im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 im))))))
#s(approx (* 4 (log im)) #s(hole binary64 (* 4 (+ (log -1) (* -1 (log (/ -1 im)))))))
Calls

6 calls:

TimeVariablePointExpression
57.0ms
im
@0
((/ (* 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 (log im) im (/ (* re re) (* im im)) (* re re) re (* im im) (* 4 (log im)) 4 (log 10) 10)
22.0ms
im
@-inf
((/ (* 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 (log im) im (/ (* re re) (* im im)) (* re re) re (* im im) (* 4 (log im)) 4 (log 10) 10)
8.0ms
im
@inf
((/ (* 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 (log im) im (/ (* re re) (* im im)) (* re re) re (* im im) (* 4 (log im)) 4 (log 10) 10)
6.0ms
re
@0
((/ (* 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 (log im) im (/ (* re re) (* im im)) (* re re) re (* im im) (* 4 (log im)) 4 (log 10) 10)
3.0ms
re
@inf
((/ (* 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 (log im) im (/ (* re re) (* im im)) (* re re) re (* im im) (* 4 (log im)) 4 (log 10) 10)

rewrite220.0ms (7.9%)

Memory
17.4MiB live, 253.5MiB allocated; 30ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04675303
04824494
129554321
091024232
Stop Event
iter limit
node limit
iter limit
Counts
118 → 189
Calls
Call 1
Inputs
(/.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)
(log.f64 im)
im
(/.f64 (*.f64 re re) (*.f64 im im))
(*.f64 re 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)
#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 (* 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 (/ (- (* -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 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 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 (log im) #s(hole binary64 (log im)))
#s(approx im #s(hole binary64 im))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx (* 4 (log im)) #s(hole binary64 (* 4 (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 (/ (- (* -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 (log im) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (* 4 (log im)) #s(hole binary64 (* -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)))))) (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 (log im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 im))))))
#s(approx (* 4 (log im)) #s(hole binary64 (* 4 (+ (log -1) (* -1 (log (/ -1 im)))))))
Outputs
(*.f64 #s(literal 1/2 binary64) (/.f64 #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 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (*.f64 #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 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))) #s(literal 1/2 binary64))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (*.f64 #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 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))) #s(literal 1/2 binary64)) (log.f64 #s(literal 10 binary64)))
(*.f64 #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 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))) #s(literal 1/2 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 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))))
#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 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64))))))
(fma.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 4 binary64))))
(fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 4 binary64))))
(fma.f64 (log.f64 im) #s(literal 6 binary64) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 4 binary64))))
(fma.f64 #s(literal 6 binary64) (log.f64 im) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 4 binary64))))
(-.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))
(+.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (neg.f64 (log.f64 im))))
(+.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 #s(literal -4 binary64) (log.f64 im)))
(+.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (log.f64 im) #s(literal 3 binary64)) #s(literal 216 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (/.f64 re im)) (neg.f64 (/.f64 re im)) (*.f64 (log.f64 im) #s(literal 6 binary64)))
(fma.f64 (fabs.f64 (/.f64 re im)) (fabs.f64 (/.f64 re im)) (*.f64 (log.f64 im) #s(literal 6 binary64)))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 6 binary64)))
(fma.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 im)) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(fma.f64 #s(literal 6 binary64) (log.f64 im) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(fma.f64 re (/.f64 re (*.f64 im im)) (*.f64 (log.f64 im) #s(literal 6 binary64)))
(+.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(+.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 6 binary64)))
#s(literal 6 binary64)
(*.f64 (neg.f64 (log.f64 im)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 im)))
(neg.f64 (neg.f64 (log.f64 im)))
(log.f64 im)
im
(*.f64 (neg.f64 (/.f64 re im)) (neg.f64 (/.f64 re im)))
(*.f64 (fabs.f64 (/.f64 re im)) (fabs.f64 (/.f64 re im)))
(*.f64 (/.f64 re im) (/.f64 re im))
(*.f64 re (/.f64 re (*.f64 im im)))
(pow.f64 (/.f64 re im) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 re re) im) im)
(/.f64 (neg.f64 (*.f64 re re)) (neg.f64 (*.f64 im im)))
(/.f64 (*.f64 re re) (*.f64 im im))
(exp.f64 (-.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 2 binary64))))
(*.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 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 re)))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 re re)
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 2 binary64))
(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))
(/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64)))
(fabs.f64 (*.f64 re re))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(exp.f64 (log.f64 (*.f64 re re)))
(+.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 (pow.f64 im #s(literal 6 binary64)) (exp.f64 (*.f64 #s(literal -4 binary64) (log.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))
(/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 4 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))))
(*.f64 (neg.f64 (log.f64 im)) #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) (neg.f64 (log.f64 im)))
(*.f64 (log.f64 im) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (log.f64 im))
(fma.f64 (neg.f64 (log.f64 im)) #s(literal -2 binary64) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (log.f64 im) #s(literal 2 binary64) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(+.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(log.f64 (pow.f64 im #s(literal 4 binary64)))
#s(literal 4 binary64)
(log.f64 #s(literal 10 binary64))
#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)) (*.f64 (/.f64 (*.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 (log.f64 im) #s(literal 2 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 (/.f64 re im) #s(literal 2 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 (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 (*.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)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 6 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 (*.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.f64 (pow.f64 (*.f64 im im) #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 im) #s(literal 2 binary64) (pow.f64 (/.f64 re 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 (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 (pow.f64 (*.f64 im im) #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)))))) (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 (pow.f64 (*.f64 im 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 (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 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.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 (log.f64 im) #s(literal 6 binary64) (*.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 (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 (log.f64 im) #s(literal 6 binary64) (*.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 (log.f64 im) #s(literal 4 binary64))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (-.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 (log.f64 im) #s(literal 6 binary64)))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
#s(approx (/ (* re re) (* im im)) (pow.f64 (/.f64 re im) #s(literal 2 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 (log.f64 (pow.f64 (*.f64 re re) #s(literal 1/2 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)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (*.f64 re re)) (log.f64 #s(literal 10 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 (/.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 (*.f64 re re)) (log.f64 #s(literal 10 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 (/.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 (*.f64 re 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)) (*.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 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.f64 (pow.f64 (*.f64 re 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 (neg.f64 (log.f64 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 (/.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) (*.f64 #s(literal 1/2 binary64) (fma.f64 (neg.f64 (log.f64 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 (/.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 (*.f64 re 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))))) (log.f64 (*.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 (log.f64 re) #s(literal 6 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (log.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 (log.f64 re) #s(literal 6 binary64) (/.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 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))))) (-.f64 (fma.f64 (log.f64 re) #s(literal 6 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (fma.f64 (log.f64 re) #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re 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))) (/.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 (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (fma.f64 (/.f64 (log.f64 im) (*.f64 re re)) #s(literal 6 binary64) (-.f64 (pow.f64 im #s(literal -2 binary64)) (/.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) (*.f64 re re)))) (*.f64 re re)))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 (fma.f64 (/.f64 (log.f64 im) (*.f64 re re)) #s(literal 6 binary64) (pow.f64 im #s(literal -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)))))) (log 10)) (*.f64 (/.f64 (*.f64 (log.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 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64)) (log.f64 #s(literal 10 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 (/.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 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64)) (log.f64 #s(literal 10 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 (/.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 (log.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)) (*.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 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 (*.f64 (log.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 (/.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) (*.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 (/.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 (log.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))))) (*.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 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 #s(literal -1 binary64) (/.f64 (*.f64 im im) (*.f64 re 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))) (/.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 (+ (pow re 6) (pow im 6))) (log (+ (pow re 4) (- (pow im 4) (pow (* re im) 2)))))) (log 10)) (/.f64 (log.f64 (pow.f64 (*.f64 re re) #s(literal 1/2 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)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (*.f64 re re)) (log.f64 #s(literal 10 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 (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 (log.f64 (pow.f64 (*.f64 re re) #s(literal 1/2 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 (fma.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 re #s(literal 6 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 (pow.f64 (*.f64 re re) #s(literal 1/2 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.f64 (pow.f64 (*.f64 re 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 (neg.f64 (log.f64 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 (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 (pow.f64 (*.f64 re 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)))))) (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 (pow.f64 (*.f64 re re) #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))))) (log.f64 (*.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 (log.f64 re) #s(literal 6 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (log.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 (log.f64 re) #s(literal 6 binary64) (*.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 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 (log.f64 re) #s(literal 6 binary64) (*.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 4 binary64))))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (/.f64 (fma.f64 (*.f64 im im) (*.f64 (log.f64 im) #s(literal 2 binary64)) (*.f64 re re)) (*.f64 im im)))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (/.f64 (fma.f64 (*.f64 #s(literal 6 binary64) (*.f64 im im)) (log.f64 im) (*.f64 re re)) (*.f64 im im)))
#s(approx (log im) (log.f64 im))
#s(approx im im)
#s(approx (* im im) (*.f64 im im))
#s(approx (* 4 (log im)) (*.f64 (log.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)))))) (log 10)) (*.f64 (/.f64 (*.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 (log.f64 im) #s(literal 2 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 (/.f64 re im) #s(literal 2 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 (/.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 (log.f64 im) #s(literal 2 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 (/.f64 re im) #s(literal 2 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 (/.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 (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)) (*.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 (pow.f64 (/.f64 re im) #s(literal 2 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.f64 (pow.f64 (*.f64 im im) #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 im) #s(literal 2 binary64) (pow.f64 (/.f64 re 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 (/.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 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re 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 (/.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 (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))) (pow.f64 (/.f64 re 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 (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 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.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 (log.f64 im) #s(literal 6 binary64))) (fma.f64 (log.f64 im) #s(literal 4 binary64) (neg.f64 (pow.f64 (/.f64 re 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 im) #s(literal 6 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (+.f64 (fma.f64 (log.f64 im) #s(literal 4 binary64) (neg.f64 (pow.f64 (/.f64 re im) #s(literal 2 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 (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (-.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 (log.f64 im) #s(literal 6 binary64)))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
#s(approx (log im) (log.f64 im))
#s(approx (* 4 (log im)) (*.f64 (log.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)))))) (log 10)) (*.f64 (/.f64 (*.f64 (log.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 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 (/.f64 re im) #s(literal 2 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 (/.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 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 (/.f64 re im) #s(literal 2 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 (/.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 (log.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)) (*.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 (pow.f64 (/.f64 re im) #s(literal 2 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)))))) (*.f64 (*.f64 (log.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) (pow.f64 (/.f64 re 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 (/.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 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (pow.f64 (/.f64 re 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 (/.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 (log.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))) (pow.f64 (/.f64 re 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 (log.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) (pow.f64 (/.f64 re im) #s(literal 2 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))))) (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 (pow.f64 (/.f64 re 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 (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 #s(literal -1 binary64) (pow.f64 (/.f64 re im) #s(literal 2 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 (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (*.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (log.f64 #s(literal -1 binary64))) #s(literal 2 binary64)))
#s(approx (- (+ (* 6 (log im)) (/ (* re re) (* im im))) (* 4 (log im))) (-.f64 (fma.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (log.f64 #s(literal -1 binary64))) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 4 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 6 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (fma.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (log.f64 #s(literal -1 binary64))) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
#s(approx (log im) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64) (log.f64 #s(literal -1 binary64))))
#s(approx (* 4 (log im)) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 4 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))

eval23.0ms (0.8%)

Memory
14.0MiB live, 59.8MiB allocated; 3ms collecting garbage
Compiler

Compiled 9 377 to 1 058 computations (88.7% saved)

prune12.0ms (0.4%)

Memory
-11.3MiB live, 35.7MiB allocated; 2ms collecting garbage
Pruning

11 alts after pruning (5 fresh and 6 done)

PrunedKeptTotal
New1795184
Fresh000
Picked101
Done066
Total18011191
Accuracy
99.8%
Counts
191 → 11
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.8%
(/.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))))
48.9%
(/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (*.f64 re re)))) (log.f64 #s(literal 10 binary64)))
98.4%
(/.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 (-.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))))))) (log.f64 #s(literal 10 binary64)))
98.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))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
98.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 #s(approx (+ (* 6 (log im)) (/ (* re re) (* im im))) (*.f64 (log.f64 im) #s(literal 6 binary64))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
46.7%
(/.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 (fma.f64 (*.f64 im im) (*.f64 (log.f64 im) #s(literal 2 binary64)) (*.f64 re re)) (*.f64 im im))))) (log.f64 #s(literal 10 binary64)))
98.5%
(/.f64 (neg.f64 (*.f64 #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 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))) #s(literal 1/2 binary64))) (log.f64 #s(literal 1/10 binary64)))
98.9%
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
98.6%
(/.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.8%
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
Compiler

Compiled 823 to 370 computations (55% saved)

regimes52.0ms (1.9%)

Memory
3.8MiB live, 55.6MiB allocated; 8ms collecting garbage
Counts
14 → 1
Calls
Call 1
Inputs
(/.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 (*.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 (fma.f64 (*.f64 im im) (*.f64 (log.f64 im) #s(literal 2 binary64)) (*.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 (log.f64 im) #s(literal 6 binary64))) (*.f64 #s(literal 4 binary64) (log.f64 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))))) (-.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 (neg.f64 (*.f64 #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 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))) #s(literal 1/2 binary64))) (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 (*.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 (-.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #s(literal 4 binary64)))))) (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 (-.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (fma.f64 (log.f64 im) #s(literal 6 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (*.f64 (log.f64 im) #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:

25.0ms
(log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
4.0ms
re
4.0ms
im
4.0ms
(/.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
4.0ms
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
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)

regimes34.0ms (1.2%)

Memory
-6.2MiB live, 40.9MiB allocated; 2ms collecting garbage
Accuracy

Total -33.6b remaining (-4255.9%)

Threshold costs -33.6b (-4255.9%)

Counts
6 → 1
Calls
Call 1
Inputs
(/.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 (*.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 (fma.f64 (*.f64 im im) (*.f64 (log.f64 im) #s(literal 2 binary64)) (*.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:

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

Compiled 44 to 38 computations (13.6% saved)

derivations56.0ms (2%)

Memory
-13.3MiB live, 76.6MiB allocated; 9ms collecting garbage
Stop Event
fuel
Compiler

Compiled 21 to 14 computations (33.3% saved)

preprocess35.0ms (1.2%)

Memory
-10.8MiB live, 47.9MiB allocated; 14ms collecting garbage
Compiler

Compiled 192 to 156 computations (18.8% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...